Avatar billede eromaster Nybegynder
12. februar 2002 - 13:02 Der er 5 kommentarer og
1 løsning

Post

Jeg har en form som jeg skal have til at poste i en database. Det er selvfølgelig ikke noget problem, men det svære er at jeg skal have den til at poste i et bestemt id!

Kildekoden:
<html>
<head>
</head>
<body>

<font size="2" face="Verdana">
<form name="spm01" method="post" action="spm01.asp?id=<%=Request.QueryString("id")%>" ID="spm01">
Det tager 32 måneder, at blive politibetjent.<br>
<input type="radio" name="voteid" value="1" CHECKED ID="Radio1">Ja
&nbsp;
<input type="radio" name="voteid" value="2" ID="Radio2">Nej
<br>
<INPUT type="submit" value="Submit" id=submit1 name=submit1>
<input type="hidden" value=AddNew name=mode id=mode>&nbsp;
</form>
</font>

    <%
    if request("mode") = "AddNew" then

    if Request.Form("voteid") = 1 then    
    Record.Fields("spm01") = ("Forkert")
    else
    Record.Fields("spm01") = ("Rigtig")
    end if
   
    end if
    %>
   
</body>
</html>

Jeg skal have den til at poste i en access database som hedder "db.mdb" og i en tabel der hedder "quizsvar". I denne tabel er der en der selvfølgelig en kolone der hedder "id" og en kolone der hedder "spm01", i "spm01" skal svaret postes men bare i det rigtig "id"! ID'et følger med fra forgangende side f.eks. http://localhost/test/spm01.asp?id=9 hvad gør jeg?
Avatar billede thomas_yde Nybegynder
12. februar 2002 - 13:05 #1
"udpate table quizsvar svar='dit svar' where id = " & id & ""


Noget i den stil?
Avatar billede eromaster Nybegynder
12. februar 2002 - 13:09 #2
hmm nu er jeg ikke så hård til asp... var det muligt at nogen gad at lave hele kildekoden?
Avatar billede eromaster Nybegynder
12. februar 2002 - 13:22 #3
Jeg har lige arbejdet lidt med det... hvad er der galt her:

    <%
    if request("mode") = "AddNew" then
   
    Set Conn = Server.CreateObject("ADODB.Connection")
    Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.Mappath("db/db.mdb")
    sql = "select * from quizsvar where id = " & id & ""
    Set rs = Server.CreateObject("ADODB.Recordset")
    rs.open sql, conn, 1, 3
   
        rs.update

    if Request.Form("voteid") = 1 then    
    rs.Fields("spm01") = ("Forkert")
    else
    rs.Fields("spm01") = ("Rigtig")
    end if'voteid
   
    end if'mode=addnew
    %>
Avatar billede eromaster Nybegynder
12. februar 2002 - 13:26 #4
Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

[Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression 'id ='.

/post_scripts/spm01.asp, line 26
Avatar billede coltau Juniormester
12. februar 2002 - 13:27 #5
Sådan :

<%
if request("mode") = "AddNew" then
    Set Conn = Server.CreateObject("ADODB.Connection")
    Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.Mappath("db/db.mdb")
    sql = "select * from quizsvar where id = " & Request.QueryString("id")
    Set rs = Server.CreateObject("ADODB.Recordset")
    rs.open sql, conn, 1, 3
    if CInt(Request.Form("voteid")) = 1 then   
      rs.Fields("spm01") = ("Forkert")
    else
      rs.Fields("spm01") = ("Rigtig")
    end if'voteid
    rs.update
end if'mode=addnew
%>
Der skal nok laves yderligere kontrol for om Request.Form("voteid") er udfyldt korrekt.
Avatar billede eromaster Nybegynder
12. februar 2002 - 13:33 #6
det virker jo bare godt
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester