Search results

how to compact and close completely out of access the VB command compact and close brings you back to the default access page

i have figured it out thx =)

ok i have a on load code: Private Sub Form_Load() Dim db As DAO.Database Dim rsv As DAO.Recordset Dim rsmv As DAO.Recordset Dim CurVer As String Dim MasVer As String Dim rs1 As DAO.Recordset Dim Version As String Dim Updatemsg As String Dim rsupdatemsg As...

no db attached

i read it but its referring to quotation marks (Quotation mark = " ) and my problem is with apostrophe (apostrophe = ' )

well im not having problems with a quotation mark it the apostrophe in O’Donnell i need that " ' " gone preferably a way for the code to ignore it without having to change the data.

well i think with the " ' " in there it is thinking im wrapping string such ad a where condition in a dlookup in trying to figure out a way around thin problem id rather not change the data if i do not have to

If a “ ‘ “ appears in a person’s name such as “O’Donnell” the program errors. i need to remove this or replace it with "" (No space) could i use the replace function for this. im not quite sure how this would work Thx -Jim

humm so what would be the best way of baking up schedule it on the server?

How do i run a batch from VBA? i want to put the code in my on load event of my opening form. the batch file backs up the database

Agreed this was my first thought also, dose the code work actively see if you can get it to error then debug it.

Wooot Works thanks guys!

Err now im getting too few parameters on Set rs = db.OpenRecordset("SELECT * FROM [ProductKeysAsigned] WHERE [Product Key] = PKey", dbOpenDynaset) is this wrong im bad at SQL lol

o lol duh why did i not see that

i have a subform that is filtered by the key of the main form. i want to count how many items are in the subform i tried this but it says i cannot use ".RecordCount = CountR" as read only On Error GoTo ErrorH Dim db As Database Dim rs As Recordset Dim PKey As String Dim...

ahh ic thanks!

Very nice A++

Iv never worked with SQL before how would i implement it here? ps there will be a form that opens up in the if before the else that will allow the user to put a e-mail address in =D

Humm came up with this but it loops thru ones that say "no" On Error GoTo ErrorRPT Dim db As Database Dim rs As Recordset Dim Sendto As String Set db = CurrentDb Set rs = db.OpenRecordset("User Name", dbOpenDynaset) Forms![Infokeeper]![Startdate] = Me.Startdate...

trying to loop thru all the users who are set to receive a report: On Error GoTo ErrorRPT Dim db As Database Dim rs As Recordset Dim Sendto As String Set db = CurrentDb Set rs = db.OpenRecordset("User Name", dbOpenDynaset)...