Scusate cos'è quest'errore:
codice:
Microsoft OLE DB Provider for ODBC Drivers error '80040e21'
ODBC driver does not support the requested properties.
/quote/function.asp, line 23
la pagina è questa è la line 23 è rossa:
codice:
<%Response.Buffer = True%>
<%
Set conn = Server.CreateObject("ADODB.Connection")
if instr(Request.ServerVariables("PATH_TRANSLATED"),"freekot") then
strMyConn = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="&Server.MapPath("/mdb-database/quote.mdb")&""
else
strMyConn = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="&Server.MapPath("/mdb-database/quote.mdb")&""
end if
strLogin = ""
strPassword = ""
conn.open strMyConn, strLogin, strPassword
function checkuser(val)
if session("userid") = "" then
response.redirect "login.asp"
end if
end function
sub open_recordset(recordset, sql)
Set recordset = Server.CreateObject("ADODB.Recordset")
recordset.Open sql, conn, 1, 1
end sub
function DLookUp(Table,fName, sWhere)
on error resume next
Dim Res : Res = conn.execute("select " & fName & " from " & Table & " where " & sWhere).Fields(0).Value
if IsNull(Res) then Res = ""
DLookUp = Res
on error goto 0
end function
function getConfig(var)
getConfig=Dlookup("config","config_value","config_variable='" & var & "'")
end function
%>