\"Datatyper\" - hvad er der galt her??
Jeg får denne fejlmeddelelse:-----------------------------
Microsoft OLE DB Provider for ODBC Drivers fejl \'80040e07\'
[Microsoft][ODBC Microsoft Access-driver] Datatyperne stemmer ikke overens i kriterieudtrykket.
/quizpws/sletquiz2.asp, linje 41
-----------------------------------------
Koden ser sådan ud (linje 41 er angivet):
-----------------------------------------
<% Response.Buffer = True %>
<!--#include file=\"adovbs.inc\" -->
<%
If Request(\"slet\") <> \"ja\" Then
Response.End
End If
Dim objConn
Set objConn = Server.CreateObject(\"ADODB.Connection\")
objConn.ConnectionString = \"DRIVER={Microsoft Access Driver (*.mdb)};\" & _
\"DBQ=\" & Server.MapPath(\"quiz.mdb\")
objConn.Open
id = Request(\"sletquiz\")
Dim objRS, quiztabel
Set objRS = Server.CreateObject(\"ADODB.Recordset\")
strQuery = \"SELECT * FROM quizzer WHERE id = \" & id
objRS.OPEN strQuery, objConn, 2,3
%>
<html>
<head>
<title>Slet quiz</title>
<link rel=\"stylesheet\" href=\"quiz.css\" type=\"text/css\">
</head>
<body bgcolor=\"#003366\" text=\"#000000\">
<h1>Quizzen slettes</h1>
<%
objRS.Delete
objRS.Close
%>
<%
strQuery = \"SELECT * FROM spsm WHERE kat = \" & id
[LINJE 41:] objRS.OPEN strQuery, objConn, 2,3
objRS.MoveFirst
Do Until objRS.EOF
objRS.Delete
objRS.MoveNext
Loop
objRS.Close
strQuery = \"SELECT * FROM svar WHERE kat = \" & id
objRS.OPEN strQuery, objConn, 2,3
objRS.MoveFirst
Do Until objRS.EOF
objRS.Delete
objRS.MoveNext
Loop
%>
<a href=\"quizzer.asp\">Tilbage til oversigten</a>
</body>
</html>
<%
objRS.Close
Set objRS = Nothing
objConn.Close
Set objConn = Nothing
%>
------------------------------------------
Håber I kan hjælpe mig her!! Jeg er i vild vildrede!! ;)
Mikkel Elbech
