ADODB.Connection.1 error '800a0bb9'
HejsaJeg har lavet en hjemmeside i bla. asp og med en access database. jeg har nu fået konverteret databasen om til mysql og oploadet siden på b-one's server. Det lod til at fungere lige indtil jeg skulle prøve min gæstebog så fik jeg denne fejl:
ADODB.Connection.1 error '800a0bb9'
The application is using arguments that are of the wrong type, are out of acceptable range, or are in conflict with one another.
/gastebog2.asp, line 142
koden hvor fejlen forkommer:
Case Else
strAddLine = "<p><img src=add.gif width=16 height=16> <a href=gastebog.asp?oprettet=negativ><strong><font face=verdana size=2>Skriv et indlæg i min gæstebog!</font></strong></a></p>"
Response.Write strAddLine
strSQL = "SELECT * FROM Guestbook ORDER BY Dato DESC;"
Set myConn = Server.CreateObject("ADODB.Connection")
myConn.Open tempConn
Set rs = myConn.Execute(strSQL)
If Not (rs.BOF Or rs.EOF) Then
Response.Write "<table width=100% border=0 cellpadding=1 cellspacing=1>"
Do While Not rs.EOF
dtmDato = rs("Dato")
dtmDato = FormatDateTime(dtmDato,vbLongDate) & " kl. " & FormatDateTime(dtmDato,vbLongTime)
Response.Write "<tr bgcolor=#C0C0C0><td width=""100%""><font face=verdana size=2>" & dtmDato & "</td></tr>"
If Len(rs("Email")) > 0 Then
Response.Write "<tr><td><font face=verdana size=2><strong><a href=mailto:" & rs("Email") & ">" & rs("Navn") & "</a> skriver:</strong></td></tr>"
Else
Response.Write "<tr><td><font face=verdana size=2><strong>" & rs("Navn") & " skriver:</strong></td></tr>"
End If
Response.Write "<tr><td><font face=verdana size=2>" & rs("Kommentar") & "<br> </td></tr>"
rs.MoveNext
Loop
Response.Write "</table>"
Else
Response.Write "<p><font face=verdana size=2>Der er endnu ikke nogle der har skrevet i gæstebogen</font></p>"
End If
myConn.Close
Set myConn = Nothing
Response.Write strAddLine
End Select
linie 142 er der hvor der står:
myConn.Open tempConn
håber der er nogen som kan fortælle mig hvad der er galt og hvordan jeg løser det.
/Mickill
