Search results

I believe it's implied... I have this code (partial code showin here) and it works fine without declaring the current database. Dim rst As ADODB.Recordset Set rst = New ADODB.Recordset rst.Open "tblRequestsMaster", CurrentProject.Connection, _ adOpenDynamic, adLockOptimistic HTH E

Yes - my experience is that you need to follow the steps as MS outlines or you will have many problems.

You can install both versions on your machine. See this: http://support.microsoft.com/default.aspx?scid=kb;en-us;241141

Here is some sample code I use to loop through every record displayed on a form and then calculate an amount for each record and place the calculated amount in another table. 'calculate payment requests by underwriter Dim dbs As DAO.Database Dim rst1 As DAO.Recordset Dim rst2 As...

Try using Dlookup - here is a MS Knowledge Base article on the subject of searching for duplicate values. You can modify the code to confirm that a value already exists and if not, then.... http://support.microsoft.com/default.aspx?scid=kb;en-us;209479 HTH E

Have you considered using a combo or listbox to list available contract numbers?

I'm not sure what you mean by "try to lock the check box and make it disappear", because the code you posted doesn't doesn't lock or make it invisible. But here is what I would do: Set the check box control's Visible property to no. On the afterUpdate event of me.performancepoints, use the...

Hayley - Thanks for posting that sample code. I've struggled with trying to understand multiselect list boxes and have never been able to get my brain around it. Finally, I GET IT! Thanks so much. E

Is your bound column the first column in the combo box? If so, the column reference is 0. Just a thought.

All you need to do is go to the MS Knowledge Base site and enter the article ID, but I'll give you a link - http://support.microsoft.com/default.aspx?scid=kb;en-us;209932 This site is a tremendous resource for getting help. Good luck E

I'm not sure about the VCard issue, but you can import most Outlook items into Access using the Import Exchange/Outlook wizard. So, I'd give that a try. (Assuming you have A2k) As for your other question, I do have an application that allows users to add tasks from Access to Outlook. I...

An easy solution is to go to Options from the Tools menu - then select "Cursor stops and first/last field". This should prevent the user from accidentally tabbing to the next record. But, if a user thinks they want to add a record, purposely move to a new record and then decide they don't want...

Why not use the combobox wizard to have a combo box list the records available and then pull up the record selected (I will assume a combo box name of cboRecordNumber). Set the Limit to List property to true. On the NotInList event for the combobox, place code to offer the user to add a...

Create an Option Group called frSelectLetter. Within that option group create a toggle button for each letter of the alphabet. Assign a number of 1-26 to each toggle button. In the AfterUpdate event of the option Group, add this code: Dim strFilter As String Select Case...

Instead of docmd.requery "product id" put this: me.productid.requery Works fine then E

Delete the line "Me.PQR Then" We are using Select Case instead of If/Then, so no need to use "then." Sorry for the confusion - I typed my post too quickly and made some mistakes there. E

Sorry, Take the "> .05" out of the me.yourpctfield > .05 line. I should have taken that out when I submitted my post. Try again - it should work, but let me know if it doesn't. E

You can't disable it if you are in datasheet view, but if you change your format to continuous forms or single form, it doesn't happen...at least it didn't when I tested it. hth E

Since the first three digits can always be calculated, you don't need to create a field in the table to store them. Use this in your query to extract the first three digits: In the query grid, place this code: ZipFirstThree: Left([ZIP],3) That's it... hth Elana

Try this: On the OnFormat event of the section, place this code: Select Case me.yourpercentfield Case > .05 Me.YourPercentField > .05 Then Me.YourPercentField.FontBold = True Me.YourPercentField.FontSize = 10 Me.YourPercentField.FontName = "Copperplate Gothic Bold"...