Avatar billede tblaster Nybegynder
02. marts 2003 - 13:50 Der er 12 kommentarer og
1 løsning

Update Booking WHERE bookid = Session("ID")

Hvad er der galt med denne kode:

Update Booking WHERE bookid = Session("ID")

Den skriver:
Expected end of statement
Avatar billede kichian Nybegynder
02. marts 2003 - 13:53 #1
Update Booking SET ...... WHERE bookid = Session("ID")
Avatar billede tblaster Nybegynder
02. marts 2003 - 13:56 #2
...... - hvad mener du med det ... skal det står der eller skal der stå noget andet?

Tabellen hedder booking!
Avatar billede kichian Nybegynder
02. marts 2003 - 14:01 #3
Hvad er det du forsøger at gøre? Det kunne måske forklare hvad jeg mener med SET .... ;-)
Avatar billede korup Nybegynder
02. marts 2003 - 14:02 #4
Ja, men hvad skal der ændres??

Korup
Avatar billede tblaster Nybegynder
02. marts 2003 - 14:05 #5
Her er det jeg har pt.

Set Conn = Server.CreateObject("ADODB.Connection")
Set Rs = Server.CreateObject("ADODB.Recordset")
Conn.Open "DBQ=" & Server.Mappath("../../db/Booking.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};Password=1234;"

sSQL = "SELECT * FROM booking
rs.Open sSQL, Conn,1,3

    rs.update Booking Where bookid = Session("ID")
    rs("tlf") = Session("tlf")
    rs("kommentar") = Session("kommentar")
    rs("samletpris") = Session("Samletpris")
    rs("sagsnr") = Session("Sagsnr")
    rs("antal") = Session("antal")
    rs("bordopstilling") = Session("bordopstilling")
    rs("foldevæg") = Session("foldevæg")
    rs("projektør") = Session("projektør")
    rs("KaffeThe") = Session("Kaffe/The")
    rs("kaffekande") = Session("kaffekande")
    rs("kaffekandeantal") = Session("kaffekandeantal")
    rs("tekande") = Session("tekande")
    rs("tekandeantal") = Session("tekandeantal")
    rs("Rundstykker") = Session("Rundstykker")
    rs("ost") = Session("ost")
    rs("Eftermiddagskage") = Session("Eftermiddagskage")
    rs("Småkager") = Session("Småkager")
    rs("Frugt") = Session("Frugt")
    rs("isvandkande") = Session("isvandkande")
    rs("opdækning_uden_dug") = Session("opdækning_uden_dug")
    rs("opdækning_med_dug") = Session("opdækning_med_dug")
    rs("buffet") = Session("buffet")
    rs("buffetantal") = Session("buffetantal")
    rs("andet") = Session("andet")
    rs("fest") = Session("Familiefest")
    rs("Ølvand") = Session("Øl/vand")
    rs("Ølvandantal") = Session("øl/vandantal")
    rs.update

Next
Avatar billede whatever Nybegynder
02. marts 2003 - 14:21 #6
Prøv dette:

Set Conn = Server.CreateObject("ADODB.Connection")
Set Rs = Server.CreateObject("ADODB.Recordset")
Conn.Open "DBQ=" & Server.Mappath("../../db/Booking.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};Password=1234;"
rs.CursorLocation = adUseServer
rs.CursorType = adOpenForwardOnly
rs.LockType = adLockOptimistic
rs.Open "SELECT * FROM booking WHERE bookid = "& Session("ID") &" ", Conn, , , adCmdText

    rs("tlf") = Session("tlf")
    rs("kommentar") = Session("kommentar")
    rs("samletpris") = Session("Samletpris")
    rs("sagsnr") = Session("Sagsnr")
    rs("antal") = Session("antal")
    rs("bordopstilling") = Session("bordopstilling")
    rs("foldevæg") = Session("foldevæg")
    rs("projektør") = Session("projektør")
    rs("KaffeThe") = Session("Kaffe/The")
    rs("kaffekande") = Session("kaffekande")
    rs("kaffekandeantal") = Session("kaffekandeantal")
    rs("tekande") = Session("tekande")
    rs("tekandeantal") = Session("tekandeantal")
    rs("Rundstykker") = Session("Rundstykker")
    rs("ost") = Session("ost")
    rs("Eftermiddagskage") = Session("Eftermiddagskage")
    rs("Småkager") = Session("Småkager")
    rs("Frugt") = Session("Frugt")
    rs("isvandkande") = Session("isvandkande")
    rs("opdækning_uden_dug") = Session("opdækning_uden_dug")
    rs("opdækning_med_dug") = Session("opdækning_med_dug")
    rs("buffet") = Session("buffet")
    rs("buffetantal") = Session("buffetantal")
    rs("andet") = Session("andet")
    rs("fest") = Session("Familiefest")
    rs("Ølvand") = Session("Øl/vand")
    rs("Ølvandantal") = Session("øl/vandantal")
    rs.update
    rs.close
    onn.Close
    Set rs = Nothing
    Set conn = Nothing
Avatar billede tblaster Nybegynder
02. marts 2003 - 14:31 #7
Så skriver den følgende:

ADODB.Recordset error '800a0bb9'

Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another.

/iBooking/ok2.asp, line 230


Linje 230 er denne:
Conn.Open "DBQ=" & Server.Mappath("../../db/Booking.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};Password=1234;"
Avatar billede whatever Nybegynder
02. marts 2003 - 14:40 #8
Har du includeret adovbs.inc i starten af din fil? Den kan hentes her http://www.asp101.com/articles/john/adovbs/adovbs.inc

Det er en hel masse konstanter som ADO bruger.
Avatar billede tblaster Nybegynder
02. marts 2003 - 14:48 #9
Skal jeg bare smide filen i samme mappe og hvordan skal jeg includere den i min fil?
Avatar billede tblaster Nybegynder
02. marts 2003 - 15:28 #10
Ahh ... jeg har fundet ud af hvad du mener ...

Nu opdater den også men kun den føste den finder med bookid = "& Session("ID") og ikke dem alle ...

Hvad skal jeg gøre for at få den til at opdater dem alle?
Avatar billede tblaster Nybegynder
02. marts 2003 - 15:29 #11
whatever ... kan du meget kort fortælle hvad den der adovbs.inc er til og hvad den gør?
Avatar billede tblaster Nybegynder
02. marts 2003 - 15:29 #12
30 point ekstra er tilføjet til spørgsmålet!
Avatar billede whatever Nybegynder
02. marts 2003 - 21:37 #13
Adovbs.inc indeholder en række konstanter som ADO bruger. Du kan læse mere præcist om hvad den bruges til på: http://www.asp101.com/articles/john/adovbs/default.asp

Prøv dette:

Set Conn = Server.CreateObject("ADODB.Connection")
Set Rs = Server.CreateObject("ADODB.Recordset")
Conn.Open "DBQ=" & Server.Mappath("../../db/Booking.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};Password=1234;"
rs.CursorLocation = adUseServer
rs.CursorType = adOpenForwardOnly
rs.LockType = adLockOptimistic
rs.Open "SELECT * FROM booking WHERE bookid = "& Session("ID") &" ", Conn, , , adCmdText

While Not rs.EOF
    rs("tlf") = Session("tlf")
    rs("kommentar") = Session("kommentar")
    rs("samletpris") = Session("Samletpris")
    rs("sagsnr") = Session("Sagsnr")
    rs("antal") = Session("antal")
    rs("bordopstilling") = Session("bordopstilling")
    rs("foldevæg") = Session("foldevæg")
    rs("projektør") = Session("projektør")
    rs("KaffeThe") = Session("Kaffe/The")
    rs("kaffekande") = Session("kaffekande")
    rs("kaffekandeantal") = Session("kaffekandeantal")
    rs("tekande") = Session("tekande")
    rs("tekandeantal") = Session("tekandeantal")
    rs("Rundstykker") = Session("Rundstykker")
    rs("ost") = Session("ost")
    rs("Eftermiddagskage") = Session("Eftermiddagskage")
    rs("Småkager") = Session("Småkager")
    rs("Frugt") = Session("Frugt")
    rs("isvandkande") = Session("isvandkande")
    rs("opdækning_uden_dug") = Session("opdækning_uden_dug")
    rs("opdækning_med_dug") = Session("opdækning_med_dug")
    rs("buffet") = Session("buffet")
    rs("buffetantal") = Session("buffetantal")
    rs("andet") = Session("andet")
    rs("fest") = Session("Familiefest")
    rs("Ølvand") = Session("Øl/vand")
    rs("Ølvandantal") = Session("øl/vandantal")
    rs.update
    rs.movenext
Wend
   
rs.close
conn.Close
Set rs = Nothing
Set conn = Nothing

Det er lang tid siden jeg har lavet ASP, men skulle mene at det fungerer.
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