Search results

I see what you mean. It wouldn't let me import directly into Access. When I opened it in Excel, I noticed a few things. First this is a semicolon delimited file. Second, there is a semi-colon missing in the header line between FMS01 and FMS02. So here's what I did: Opened the file in notepad...

Try importing the file as Delimited Tab.

When you open qryOverdue. Are there records? If so, what are they?

This is how it works. qryOverdue is a query that finds all overdue books and links the email address of the person who checked out the book. Sub Main in Module1 calls SendOverdueEmail which creates a recordset from the results of qryOverdue, then loops through the recordset sending an email...

Here's Access2K version. Not a big difference, but you need to reference the Microsoft DAO 3.6 Library. Let me know if you have any questions.

Here's the Access97 version.

I was waiting for you to let me know what version of Access you are using. You'll need to create a recordset to loop through when sending the emails, and how you create the recordset depends on your version of Access. If you have Access97, I can whip up the code in about a minute, but if you...

I think Mile-O-Phile misread your question. The method will work, but requires more coding in that the textboxes you want to display the extra information are unbound and require you to set the text property for each textbox in code.

Sorry about that, in my example my unique identifier was a text field, so the value needed to be enclosed in quotes. Yours is probably a numeric field, in which case you don't need the quotes. Try: Me.RecordsetClone.FindFirst "[FileID] = " & Me![cboFile]

If your form is unbound, where in the world to plan to add the records TO?? You can't just add records to nowhere.

The way I would do it is to set the datasource for the form=tblFile. In the AfterUpdate event of the second combo, set the bookmark of the form equal to the record corresponding to the selection you made in the combo Like: Me.RecordsetClone.FindFirst "[tblFileID] = '" & Me![cboFile] & "'"...

The email issue is probably something you can handle on the database startup. To get you started, create a query that will select all books that are overdue called qryOverdue. Then you will write a bit of code that will loop through the records selected by the query and email a notice. What...

I ran into the same issue years ago when using access as the backend database to a visual basic application our company developed and distributed. If I'm understanding your situation, you have tables that allow customers to save their specific information and you want to modify those tables...

You need an error handler in the Sub that is calling the DoCmd.OutputTo method. I tested for the exact error number that is generated when a user cancels the output and found that it is 2501, so something like this will bypass that particular error message while allowing an error message for...

If so, Set myFolder = NameSpace.GetDefaultFolder(olPublicFoldersAllPublicFolders) Set myFolder = myFolder.Folders("Marketing Reminders") Set objAppt = myFolder.Items.Add

Is the shared calendar in public folders?

This is a little inelegant, and I assumed a couple of things. I assumed that you wanted the box number for the employee that was entered last in the table. I created a query to select the Top 1 record from your table with the ID ordered descending. This will select the last record entered in...

A recommendation (not saying it's right or wrong) Store the original values in an array, create an IsDirty function that compares the present value of the controls to the values for the controls stored in the array. You might want to utilize the tag property of the control to keep track of the...

It needed a rework If I could have told you how to make your combo box work without restructuring the database, I definitely would have done that. Unfortunately, your tables structures were very unnormalized. I'm attaching a copy of the db with the new tables, form, and subforms, but I also...

Try using TotalGood:Nz(BookedInGood,0)-Nz(BookedoutGood,0) Nz is a function that converts Null to whatever you want, in the above case, I'm converting null to 0