Avatar billede fldkdla Nybegynder
17. april 2002 - 13:53 Der er 7 kommentarer og
1 løsning

Update tekst felt med en form

Hvordan opdatere jeg et tekst felt med en for jeg har prøvet sådan her:

men det virker ikke

<%
Const adOpenKeyset = 1
Const adLockOptimistic = 3
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "PROVIDER=MSDASQL;DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("../../databaser/rf_it.mdb") & ";UID=admin;PWD=;"
    Set rs = Server.CreateObject("ADODB.RecordSet")
    strSQL = "SELECT * From helpdesk where id=" & Request.Querystring("id")"
    rs.Open strSQL, Conn, adOpenKeyset, adLockOptimistic
        rs.AddNew
    rs("comment") = Request("comment")
        rs.Update
    rs.Close
    Set rs = Nothing
Conn.Close
set Conn = Nothing

response.write ("<meta http-equiv=""refresh"" content=""0;URL=sendt.asp"">")
%>
Avatar billede erikjacobsen Ekspert
17. april 2002 - 13:55 #1
HVis du skal opdatere et eksisterende skal du ikke have

rs.AddNew
Avatar billede fldkdla Nybegynder
17. april 2002 - 14:07 #2
hvad skal jeg så have??
Avatar billede cape Nybegynder
17. april 2002 - 14:44 #3
bare fjern rs.AddNew
Avatar billede eagleeye Praktikant
17. april 2002 - 14:46 #4
jeg vil bare lave det som en SQL sætning i seted for SELECT * ogind i et records og tilbage igen...sdan her:

strSQL = "UPDATE helpdesk SET comment = '"& Request("comment") & "' WHERE id=" & Request.Querystring("id")"
Conn.Execute (strSQL)
Conn.Close
Avatar billede fldkdla Nybegynder
17. april 2002 - 14:46 #5
prøver
Avatar billede fldkdla Nybegynder
17. april 2002 - 14:52 #6
cape>>
Error Type:
Microsoft VBScript compilation (0x800A0409)
Unterminated string constant
/test/etc/helpdesk/helpdesk_update_comment_script.asp, line 7, column 72
strSQL = "select * From helpdesk where id=" & Request.Querystring("id")"

eagleeye>>

Error Type:
Microsoft VBScript compilation (0x800A03EA)
Syntax error
/test/etc/helpdesk/helpdesk_update_comment_script.asp, line 7, column 80
strSQL = "UPDATE helpdesk SET comment = '"& Request("comment") & "' WHERE id=" &
-------------------------------------------------------------------------------^
Avatar billede eagleeye Praktikant
17. april 2002 - 14:53 #7
der var et " formeget i slutningen:

strSQL = "UPDATE helpdesk SET comment = '"& Request("comment") & "' WHERE id=" & Request.Querystring("id")
Conn.Execute (strSQL)
Conn.Close
Avatar billede fldkdla Nybegynder
17. april 2002 - 14:57 #8
Super nu virker det, takker her er dine point!!!!
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