-
Can you find where my error is. I don't see one. This code is from a module. The value of frmForm is a variable which pulls in the form that called the procedure. I keep getting the "Type mismatch" error on the astricked line.
rst.Open "SELECT * FROM " & strContactTable & " " & _
"WHERE '" & strComboBox & "' ='" & strComboContents & "' ;", cnn, adOpenKeyset, adLockOptimistic
'Filling in the contact Boxes
* frmForm!cboContact.Text = rst!contact
frmForm!mskPhone = rst!Phone
frmForm!txtExtension = rst!extension
frmForm!mskFax = rst!fax
frmForm!txtEmail = rst!Email
The contact field is a varchar field with a lenght of 50.
The mskPhone masked edit box has the following mask:
(___) ___ - ____
The phone field is a char field with a lenght of 16.
I do not have any problems after those two fields.
Any suggestions?
-
Use
frmForm.cboContact.Text = rst!contact
The ! notation only seems to apply for recordsets.
-
Tried
= cstr(rst!contact) ?
-
The cstr() fixed the error. I also had to take the single quotes off of the 'strComboBox' variable.
