Update der fucker up
Jeg har følgende kode<%
if request("mode") = "arkiv" then
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.Open "PROVIDER=MSDASQL;" & "DRIVER={Microsoft Access Driver (*.mdb)}; " & "DBQ=" & server.mappath("../emk")
SQL = "UPDATE nyhed SET arkiv = '"& request("arkiv")&"' WHERE id = " & Request("id") & ""
Set Rs=Conn.Execute(SQL)
Response.Write "<center><font face='verdana, helvetica' size='4' color='red'>Systemet opdatere posten i databasen<br>vent et øjeblik</font></center>"
response.write("<meta http-equiv='refresh' content='3;URL=nyhed_status.asp'>")
else
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.Open "PROVIDER=MSDASQL;" & "DRIVER={Microsoft Access Driver (*.mdb)}; " & "DBQ=" & server.mappath("../emk")
SQL="Select * from nyhed order by id"
Set Rs=Conn.Execute(SQL)
%>
<table border=0 align="center" width="570" cellspacing="5" cellpadding="0" valign="top">
<%
Do wHile Not rs.EOF
Response.Write "<tr><td width='200' valign='top' align='left' bgcolor='#dddddd'><font face='verdan, arial' size='1' >"& rs("overskrift") &"</font></td>"
Response.Write "<td width='200' valign='top' align='left' bgcolor='#dddddd'><font face='verdan, arial' size='1' >"& rs("app") &"</font></td>"
Response.Write "<td width='50' valign='top' align='center' bgcolor='#dddddd'><font face='verdan, arial' size='1' >"& rs("dato") &"</font></td>"
Response.Write "<td width='30' valign='top' align='center' bgcolor='#dddddd'><font face='verdan, arial' size='1' ><A HREF='nyhed_status.asp?id=120&mode=arkiv&arkiv=falsk'>arkiv</A></font></td></tr>"
rs.MoveNext
Loop
Response.Write "</table>"
End IF
%>
Jeg for fejlmeddelsen:
Datatyperne stemmer ikke overens i kriterieudtrykket.
/intra/nyhed_status.asp, linje 7
Hvad går galt ????
Jeg har sat feltet arkiv til falsk/sand (tekst)
På forhånd tak
Ares
