Hur gör jag för att gå vidare nu?

1 svar · 221 visningar · startad av niclas.j 18 juni 2000

niclas.jMedlem sedan juni 2000120 inlägg

Frågan18 juni 2000 19:18#1

Håller fortfarande på med uppdaterings sidan. jag har kommit så här långt:
<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=c:\inetpub\wwwroot\sok\test\Guestbook2.mdb"
sqlstmt = "SELECT * from Guestbook ORDER BY ID"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sqlstmt, Connect

Hur gör jag nu för att databasen ska bli uppdaterad?
Hoppas någon har svaret.

/niclas

VideMedlem sedan dec. 19998 577 inlägg

18 juni 2000 21:14#2

Hej!

Syntaxen för UPDATE:

SQL = "Update tabell Set fält1 = '" & sträng_variabel & "', fält2 = " & nummerisk_variabel & " Where ID = " & Request.Form("id")
Databas.Execute(SQL)

Glömmer du att ha med ID = " & Request.Form("id") (ID kan vara vilken post som helst), så kommer alla poster att uppdateras... så glöm inte det :)

I ditt fall:

Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=c:\inetpub\wwwroot\sok\test\Guestbook2.mdb"
SQL = "Update guestbok SET "
SQL = SQL & "name = '" & Request.Form("name") & "', typ = '" & Request.Form("typ") & "', StX = '" & Request.Form("StX") & "', StZ = '" & Request.Form("StZ") & "', Nosradie = '" & Request.Form("Nosradie") & "', Comments = '" & Request.Form("Comments") & "' Where ID = " & Request.Form("ID")
Connect.Execute(SQL)

Redigering: Kom ihåg att denna kod radbryts av wF, men du ser säkert vart strängarna börjar och slutar...

------------------
)|(
(o o)
-oo0-(_)-0oo-----
webeye.nu *hem*
vide@4sale.se

[Redigerat av Vide den 18 jun 2000]