Questa pagina presenta un errore di sintassi ma nn so risolverlo!!!
<%@Language="VBScript"%>
<%
Dim oRS, oConn
Set oRS = Server.CreateObject("ADODB.Recordset")
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.ConnectionString = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("Skyweb.mdb")
oConn.Open
parola=Request("Search")
strSQL="SELECT * FROM Ordini WHERE modalita_preventivo LIKE '%"& parola &"%' AND codiceutente = "&Sess_IDUser&" "
x = 1
oRS.Open strSQL, oConn,1,3
conta=oRS.RecordCount
if not oRS.Eof then
%>conta=<%=conta%>&gb_modalita_preventivo=<%=oRS("modalita_preventivo")%>&gb_data_ordine=<%=oRS("data_ordine")%>&gb_totale=<%=oRS("totale")%>&modalita_preventivo=<%=oRS("modalita_preventivo")%>&data_ordine=<%=oRS("data_ordine")%>&totale=<%=oRS("totale")
%>
<%
Do while not oRS.EOF
%>&modalita_preventivo<%=x%>=<%=oRS("modalita_preventivo")%>&data_ordine<%=x%>=<%=oRS("data_ordine")%>&totale<%=x%>=<%=oRS("totale")%><%
x = x + 1
oRS.MoveNext
Loop
end if
Set oRS = Nothing
oConn.Close
Set oConn = Nothing
%>
- L'errore che visualizza il server è il seguente:
Microsoft OLE DB Provider for ODBC Drivers errore "80040e07'
[Microsoft][Driver ODBC Microsoft Access] Tipi di dati non corrispondenti nell'espressione criterio.
/ordini.asp, riga 15
<%@Language="VBScript"%>
<%
Dim oRS, oConn
Set oRS = Server.CreateObject("ADODB.Recordset")
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.ConnectionString = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("Skyweb.mdb")
oConn.Open
parola=Request("Search")
strSQL="SELECT * FROM Ordini WHERE modalita_preventivo LIKE '%"& parola &"%' AND codiceutente = "&Sess_IDUser&" "
x = 1
oRS.Open strSQL, oConn,1,3
conta=oRS.RecordCount
if not oRS.Eof then
%>conta=<%=conta%>&gb_modalita_preventivo=<%=oRS("modalita_preventivo")%>&gb_data_ordine=<%=oRS("data_ordine")%>&gb_totale=<%=oRS("totale")%>&modalita_preventivo=<%=oRS("modalita_preventivo")%>&data_ordine=<%=oRS("data_ordine")%>&totale=<%=oRS("totale")
%>
<%
Do while not oRS.EOF
%>&modalita_preventivo<%=x%>=<%=oRS("modalita_preventivo")%>&data_ordine<%=x%>=<%=oRS("data_ordine")%>&totale<%=x%>=<%=oRS("totale")%><%
x = x + 1
oRS.MoveNext
Loop
end if
Set oRS = Nothing
oConn.Close
Set oConn = Nothing
%>
- L'errore che visualizza il server è il seguente:
Microsoft OLE DB Provider for ODBC Drivers errore "80040e07'
[Microsoft][Driver ODBC Microsoft Access] Tipi di dati non corrispondenti nell'espressione criterio.
/ordini.asp, riga 15