would something like this work...
Private Sub txtZipCode_KeyUp(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
Select Case KeyCode
Case 13 'Enter Key
txtCity = "Load data from DB query here."
' txtZipCode.SetFocus 'Not sure if this is available...
I'm getting the same error msg, and 2 days later have come up with squat.
I'm using a userform as front end, ms access as backend, and sending records to a document to be printed. I have tried Background:=True and Background:=False. The only difference that I have found between the two is...
Is there no MouseUp event ?
If there is, then just...
private sub My_Main_Form_Event()
frmOne.Show
frmTwo.Show
end sub
private sub frmOne.listbox_MouseUp(stuff here)
frmTwo.MyObj.text = frmOne.listbox.list()
unload me
end sub
Else
ignore post
end if
I'm unsure of...
No, the problem is not with my code. The problem was with the installed ODBC drivers.
I went to MS's site and found/installed the Jet 4.0 SP8 update file. I searched for 'Jet Database Engine' and found the file at the following url...
OK...so then how do i change the drivers used by ODBC ?
I get the following error msg when trying to connect...
Microsoft OLE DB Provider for ODBC Drivers error '80004005'
[Microsoft][ODBC Microsoft Access 97 Driver] Can't open database '(unknown)'. It may not be a database that your...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.