Sql problemer!!
Så er jeg her igen kan ikke faa dette til at virke,Jeg ved at det er en basal ting jeg har lavet forkert men her kommer lige fejlen og noget kille kode.
Fejlen:
Microsoft OLE DB Provider for ODBC Drivers fejl \'80040e07\'
[Microsoft][ODBC Microsoft Access-driver] Datatyperne stemmer ikke overens i kriterieudtrykket.
/brugere_rediger_send.asp, linje 22
her kommer bruger_rediger_send.asp
<!--#include file=\"global.asp\"-->
<%if request.querystring=\"\" then %>
<html><head>
</head>
<body bgcolor=\"#FFFFFF\" marginwidth=\"0\" marginheight=\"0\" leftmargin=\"0\" topmargin=\"0\" bottummargin=\"0\">
<table align=\"center\" \"border=\"0\" width=\"60%\" height=\"19\">
<tr><td bgcolor=\"#108410\"><p align=\"center\"><font color=\"#FFFFFF\" size=\"5\"><b>Gas-zetten online</b></font></td></tr></table>
<br><br>
<%
if checkInput() then
source = \"Driver={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.Mappath(\"db/brugere.mdb\")
Set connection = Server.CreateObject (\"ADODB.Connection\")
Set data = Server.CreateObject (\"ADODB.Recordset\")
connection.Open source
indsend = \"UPDATE userlist SET \"
indsend = indsend + \"username = \'\" + Request.Form(\"username\") + \"\', \"
indsend = indsend + \"password = \'\" + Request.Form(\"password\") + \"\', \"
indsend = indsend + \"status = \'\" + Request.Form(\"status\") + \"\', \"
indsend = indsend + \"navn = \'\" + Request.Form(\"navn\") + \"\' \"
indsend = indsend + \"WHERE userid = \'\" + Request.Form(\"userid\") + \"\'\"
connection.execute(indsend)
connection.close
%>
<div align=\"center\"><p>Posten er opdateret.<br><br></p></div>
<table bgcolor=\"#108410\" align=\"center\" width=\"30%\">
<tr><td><div align=\"center\"><p><a href=\"nyheder.asp\" target=\"main\">Tilbage til Gas-zetten online.</a></p></div></td></tr>
</table>
<%else%>
<div align=\"center\"><p>Fejl i indtastningen !</p></div>
<%end if%>
</body></html>
<%end if%>
her kommer brugere_rediger.asp
<!-- LOGIN.ASP?OPRETFORM INDTAST BRUGER TIL OPRETTELSE -->
<!--#include file=\"global.asp\"-->
<%if request.querystring=\"\" then%>
<html>
<body bgcolor=\"#eeeeee\" text=\"#000000\" link=\"#CDE0F3\" vlink=\"#8CB9E4\" alink=\"#8CB9E4\">
<center><h2>Opret en ny bruger</h2></center>
<br><br>
<form name=\"brugere_rediger\" method=\"POST\" action=\"brugere_rediger_send.asp\">
<%source = \"Driver={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.Mappath(\"db/brugere.mdb\")
Set connection = Server.CreateObject (\"ADODB.Connection\")
connection.Open source
SQLcommand = \"select * from userlist WHERE userid = \" + Request.Form(\"userid\")
set data = connection.execute(SQLcommand)%>
<%Do While Not data.EOF%>
<table align=\"center\" border=\"5\"><tr><td>
<table align=\"center\">
<tr>
<td align=\"center\">Brugernavn</td><td><input type=text name=username size=25 value=\"<%=data(\"username\")%>\"></td>
</tr>
<tr>
<td align=\"center\">Password</td><td><input type=password name=password size=25 value=\"<%=data(\"password\")%>\"></td>
</tr>
<tr>
<td align=\"center\">Brugers Navn</td><td><input type=text name=navn size=25 value=\"<%=data(\"navn\")%>\"></td>
</tr>
</table>
<table align=\"center\">
<tr>
<td><p>Webmaster</p></td>
<td>
<%if data(\"status\") = 1 then%>
<input type=\"radio\" value=1 name=\"status\" checked></td>
<%else%>
<input type=\"radio\" value=1 name=\"status\"></td>
<%end if%>
<tr>
<td><p>Administrator</p></td>
<td>
<%if data(\"status\") = 2 then%>
<input type=\"radio\" value=2 name=\"status\" checked></td>
<%else%>
<input type=\"radio\" value=2 name=\"status\"></td>
<%end if%>
</tr>
<tr>
<td><p>Medarbejder</p></td>
<td>
<%if data(\"status\") >=3 then%>
<input type=\"radio\" value=3 name=\"status\" checked></td>
<%else%>
<input type=\"radio\" value=3 name=\"status\"></td>
<%end if%>
</tr>
</table>
</td></tr></table>
<input name=\"userid\" type=\"hidden\" value=\"<%=data(\"userid\")%>\"
<table align=\"center\" border=\"0\">
<tr><td><input type=submit value=Rediger></td></tr>
</table>
</form>
<%data.MoveNext%>
<%Loop%>
<%
data.close
connection.close
%>
<script language=\"JavaScript\">
<!--
document.login_opret.username.focus();
// -->
</script>
</body>
</html>
<%end if%>
hvor er problemet???
