Vet nån varför jag får detta fel på denna kod?
Körningsfel i Microsoft VBScript (0x800A01A8)
Objekt krävs.: ''
/Default.asp, line 102
Rad 102 blir "Set rs = db.Execute(strSQL)"
Set my_conn = createobject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.Recordset")
my_conn.open = "DRIVER={MySQL ODBC 3.51 Driver};SERVER=localhost;DATABASE=tutorialdb;UID=root;PWD=;OPTION=35;"
strSQL = "SELECT * FROM UserEmails"
Set rs = db.Execute(strSQL)
Do while not rs.eof
Response.Write "User ID# " & rs("userID") & "<br>"
Response.Write "Name: " & rs("name") & "<br>"
Response.Write "Email: " & rs("email") & "<br>"
rs.MoveNext
loop
my_conn.close
Set my_conn = nothing