Function SetCon()
Set oCon = Server.CreateObject("ADODB.Connection")
oCon.Open(Application("ADODB"))
[b]set SetCon = oCon[/b]
End Function
Frågan#1
index.asp
<%
oCon = SetCon()
SQL = "SELECT usr, message, posted FROM msgboard ORDER BY posted DESC LIMIT 0, 9"
[red]line 41 Set oRs = oCon.Execute(SQL)[/red]
Function SetCon()
Set oCon = Server.CreateObject("ADODB.Connection")
oCon.Open(Application("ADODB"))
SetCon = oCon
End Function
%>
global.asa
Sub Application_OnStart
Application.Lock
Application("ADODB") = "driver={MySql ODBC 3.51 Driver};server=localhost;database=;uid=;pwd=;option=16387;"
Application.UnLock
End Sub
Genererat ett felmeddelande jag aldrig förr sett:
Körningsfel i Microsoft VBScript ( 0x800A01A8 )
Objekt krävs.: 'Provider=MSDASQL.1;E'
line: 41
Vad betyder det och hur avhjälper jag det?
