Hi,
I need your help:
the following is the code:
Code:
<%Dim objConn, objRS
Set objConn = Server.CreateObject("ADODB.Connection")
Set objRS = Server.CreateObject("ADODB.recordset")
Dim strDatabaseType
'strDatabaseType = "Access"
objConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=D:\Databases\database1.mdb;" & _
"Persist Security Info=False"
strSQL ="Select * from [ORDER] WHERE CUSTOMER_NUMBER= '" & CUSTOMER_NUMBER & "'"
ObjRS.Open strSQL, objConn%>
From that I got the following error:
Quote:
Microsoft JET Database Engine (0x80040E07)
Data type mismatch in criteria expression.
/census/vieworder.asp, line 21
|
------
Then I removed quote:
Code:
<%Dim objConn, objRS
Set objConn = Server.CreateObject("ADODB.Connection")
Set objRS = Server.CreateObject("ADODB.recordset")
Dim strDatabaseType
'strDatabaseType = "Access"
objConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=D:\Databases\database1.mdb;" & _
"Persist Security Info=False"
strSQL ="Select * from [ORDER] WHERE CUSTOMER_NUMBER= #" & CUSTOMER_NUMBER & "#"
ObjRS.Open strSQL, objConn%>
and I got :
Quote:
Microsoft JET Database Engine (0x80040E07)
Syntax error in date in query expression 'CUSTOMER_NUMBER= ##'.
/census/vieworder.asp, line 21
|
----------
Then I removed both '' and ## signs:
Code:
<%Dim objConn, objRS
Set objConn = Server.CreateObject("ADODB.Connection")
Set objRS = Server.CreateObject("ADODB.recordset")
Dim strDatabaseType, CUSTOMER_NUMBER
'strDatabaseType = "Access"
objConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=D:\Databases\database1.mdb;" & _
"Persist Security Info=False"
strSQL ="Select * from [ORDER] WHERE CUSTOMER_NUMBER= " & CUSTOMER_NUMBER & ""
ObjRS.Open strSQL, objConn%>
and I got:
Quote:
Microsoft JET Database Engine (0x80040E14)
Syntax error (missing operator) in query expression 'CUSTOMER_NUMBER='.
/census/vieworder.asp, line 21
|