When I run the following code I get this error Syntax error (missing operator) in query expression 'validation='countryCode' AND'.
I'm not sure what the problem is and therefore I'm not sure how to change this code.
Thanks in advance for the help.
Roslyn
Private Sub Form_Load()
lngCurrentID = 1
strSql = "SELECT * FROM ValidationList WHERE fldvalidSection=" & SQLText("countryCode" & " AND order=" & SQLNumber("1"
countryCodes.Open strSql, gConnection, adOpenStatic, adLockOptimistic
lockCountryCode
If countryCodes.BOF Or countryCodes.EOF Then
MsgBox "There are no countries please add one.", vbOKOnly, "Country Maintenance - VisualToPowership"
txtCountry = ""
txtDescription = ""
countryCodes.Close
unlockCountryCode
Else
countryCodes.Close
displayRecord
End If
End Sub
I'm not sure what the problem is and therefore I'm not sure how to change this code.
Thanks in advance for the help.
Roslyn
Private Sub Form_Load()
lngCurrentID = 1
strSql = "SELECT * FROM ValidationList WHERE fldvalidSection=" & SQLText("countryCode" & " AND order=" & SQLNumber("1"
countryCodes.Open strSql, gConnection, adOpenStatic, adLockOptimistic
lockCountryCode
If countryCodes.BOF Or countryCodes.EOF Then
MsgBox "There are no countries please add one.", vbOKOnly, "Country Maintenance - VisualToPowership"
txtCountry = ""
txtDescription = ""
countryCodes.Close
unlockCountryCode
Else
countryCodes.Close
displayRecord
End If
End Sub