Recent content by alloyd1

I believe I had the error msgbox wrong. I switched it out to this and it seems to have fixed the issues Exit_GetTitle_Click: Exit Function Err_GetTitle_Click: MsgBox Err.Description Resume Exit_GetTitle_Click:

It is at the end of the loop. Instead of finishing up I get the error which has nothing in it. So I am not sure what the error is. Err_GetTitle_Click: MsgBox Error() If I remove MsgBox Error() then it just finishes.

I am looping records and extracting data via imacros. The loop works but after it is done, I always get an error. I was hoping a fresh set of eyes can tell me where I am going wrong on the loop. Your help is greatly appreciated. Option Compare Database Public Function GetTitle() On Error GoTo...

Stopher, that worked PERFECT! I tried the NZ before, but not how you did it. I knew it was something simple, just could not see it. Thank you for opening my eyes.

I am really having an issue... here is what I want to do.. Like IIf([Forms]![frm_Reports]![fAgent] Is Null,Is Null Or Like "*","*" & [Forms]![frm_Reports]![fAgent] & "*") If the form has an fagent in it, it works perfectly, but if not, it returns no results. If I run just the --- Is Null Or...

Thank did work. It deleted each record. Is there an error with the code or we just tricking the system to move on regardless?

That field is formated as date.

Jpaulo, It is a text field and it has mixed data in the field. Some are straight up numbers such as 0912423 and then others are like U10231 or T09212312. I currently have it set with single quotes ' and it dont work. It works for the UPDATE queries with out a type mismatch error but not at all...

I determined I would just delete the record after it is done with it. Of course I will have it append to a differnt table before deleting, but testing my code, I now get a type mismatch and for the life of me I can not figure it out. The data type is text for the field [ListingId]. Any help...

Paul, Thank you for your help. I had to make a minor change but it worked like a champ. You put me in the right direction. Ultimately I am going to move the table to an SQL server database, and the logic I am attempting is to have multiple machines reading from the data source in differnt...

I am using Imacros, but I want to flag update each record with a date in the field [post] as it loops through the recordset. Here is my code, but the update part is not working at all. Can someone please let me know what I am doing wrong? Option Compare Database Public Function PostCL() On...

Ok, now I get the following message: "Object doesn't support this property or method" I put the code right under Do Until rs.EOF Am I missing something?

I added that code and I get the following message: "The Microsft Office Access databse engine cannot find the input table or query "Table1". Make sure it exists and that its name is spelled correctly." I confirmed names and it is not working. Also, I only would like to update each record as it...

I did try adding this statement right after Do Until re.EOF and it did not work. DoCmd.RunSQL "UPDATE Table1 SET Table1.inputted = -1;" Am I missing something? All I want is the one record that is selected at the time of the loop to be updated.

Need help having a field named [inputted] updated to Yes in the Table [TBL_Ready] . I am not using a yes/no field type, just a standard text type. Can someone please tell me how to do it? Public Function ImacroIE() On Error GoTo Err_ImacroIE_Click Dim rs, iim1, sql Dim myname, mypath...