23. maj 2002 - 15:04
Der er
7 kommentarer og 3 løsninger
Skriv fra en tabel til en anden ??
Jeg skal have flyttet mit data når jeg trykker på en knap. Mit data skal fra en tabel til en anden, men jeg får en syntaksfejl i UPDATE-sætningen hvad er der galt?? <% response.buffer = true %> <% Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.MapPath("../Cinemax/db/medlem.mdb") SQLstmt = "SELECT id, titel, spilletid, premiere, genre, genre2, sprog, sprog2, instruktor, skuespiller1, skuespiller2, skuespiller3, skuespiller4, billede, billede2, movienavn, beskrivelse FROM film WHERE id=" & (Request.QueryString("id")) SQLstmt = "UPDATE DISTINCTROW papirkurv SET titel = '" & (titel) & "', spilletid = " & (spilletid) & ", premiere = '" & (premiere) & "', genre = '" & (genre) & "', genre2 = '" & (genre2) & "', sprog = '" & (sprog) & "', sprog2 = '" & (sprog2) & "', instruktor = '" & (instruktor) & "', skuespiller1 = '" & (skuespiller1) & "', skuespiller2 = '" & (skuespiller2) & "', skuespiller3 = '" & (skuespiller3) & "', skuespiller4 = '" & (skuespiller4) & "', billede = '" & (billede) & "', billede2 = '" & (billede2) & "', movienavn = '" & (movienavn) & "', beskrivelse = '" & (beskrivelse) & "' WHERE id = " & Request.QueryString("id") Conn.Execute (SQLstmt) conn.Close Set conn = nothing Set SQLstmt = nothing response.redirect ("admin_slet.asp") %>
Annonceindlæg fra Lector
Prøv med den her SQLstmt = "UPDATE DISTINCTROW papirkurv SET titel = '" & (titel) & "', spilletid = '" & (spilletid) & "', premiere = '" & (premiere) & "', genre = '" & (genre) & "', genre2 = '" & (genre2) & "', sprog = '" & (sprog) & "', sprog2 = '" & (sprog2) & "', instruktor = '" & (instruktor) & "', skuespiller1 = '" & (skuespiller1) & "', skuespiller2 = '" & (skuespiller2) & "', skuespiller3 = '" & (skuespiller3) & "', skuespiller4 = '" & (skuespiller4) & "', billede = '" & (billede) & "', billede2 = '" & (billede2) & "', movienavn = '" & (movienavn) & "', beskrivelse = '" & (beskrivelse) & "' WHERE id = '" & Request.QueryString("id") & "'"
hejsa Står det her nøjagtigt som du selv har skrevet de i din kode. I () står der ikke noget andet end vi kan se her? Jeg ville løse problemet med at lave 2 sql kald. Gemme det første sql kald i et recordsæt. Også bruge recordsættets felter i næste sqlkald. Så du mangler at lave et recordset og opdele dine sqlkald. mvh cyberper
Der er stadig en syntaksfejl ??
Det forstår jeg ikke helt cyberper, her er alle mine koder, hvis du vil se dem.. Koder: <% response.buffer = true %> <% Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.MapPath("../Cinemax/db/medlem.mdb") SQLstmt = "SELECT id, titel, spilletid, premiere, genre, genre2, sprog, sprog2, instruktor, skuespiller1, skuespiller2, skuespiller3, skuespiller4, billede, billede2, movienavn, beskrivelse FROM film WHERE id=" & (Request.QueryString("id")) SQLstmt = "UPDATE DISTINCTROW papirkurv SET titel = 'titel', spilletid = 'spilletid', premiere = 'premiere', genre = '" & (genre) & "', genre2 = '" & (genre2) & "', sprog = '" & (sprog) & "', sprog2 = '" & (sprog2) & "', instruktor = '" & (instruktor) & "', skuespiller1 = '" & (skuespiller1) & "', skuespiller2 = '" & (skuespiller2) & "', skuespiller3 = '" & (skuespiller3) & "', skuespiller4 = '" & (skuespiller4) & "', billede = '" & (billede) & "', billede2 = '" & (billede2) & "', movienavn = '" & (movienavn) & "', beskrivelse = '" & (beskrivelse) & "' WHERE id = " & Request.QueryString("id") Conn.Execute (SQLstmt) conn.Close Set conn = nothing Set SQLstmt = nothing response.redirect ("admin_slet.asp") %>
Nu har jeg lavet scriptet som nedenfor og der kommer ikke fejlkoder mere, men mine data bliver ikke skrevet fra tabellen (film) til tabelen (papirkurv) Hvorfor gør den ikke det?? Her er koderne: <% response.buffer = true %> <% Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.MapPath("../Cinemax/db/medlem.mdb") SQLstmt = "SELECT id, titel, spilletid, premiere, genre, genre2, sprog, sprog2, instruktor, skuespiller1, skuespiller2, skuespiller3, skuespiller4, billede, billede2, movienavn, beskrivelse FROM film WHERE id=" & (Request.QueryString("id")) SQLstmt = "UPDATE DISTINCTROW papirkurv SET titel = 'titel', spilletid = 'spilletid', premiere = 'premiere', genre = 'genre', genre2 = 'genre2', sprog = 'sprog', sprog2 = 'sprog2', instruktor = 'instruktor', skuespiller1 = 'skuespiller1', skuespiller2 = 'skuespiller2', skuespiller3 = 'skuespiller3', skuespiller4 = 'skuespiller4', billede = 'billede', billede2 = 'billede2', movienavn = 'movienavn', beskrivelse = 'beskrivelse' WHERE id = " & Request.QueryString("id") Conn.Execute (SQLstmt) conn.Close Set conn = nothing Set SQLstmt = nothing response.redirect ("admin_slet.asp") %>
så den her da <% response.buffer = true %> <% Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.MapPath("../Cinemax/db/medlem.mdb") SQLstmt = "SELECT id, titel, spilletid, premiere, genre, genre2, sprog, sprog2, instruktor, skuespiller1, skuespiller2, skuespiller3, skuespiller4, billede, billede2, movienavn, beskrivelse FROM film WHERE id = '" & Request.QueryString("id") & "'" SQLstmt = "UPDATE DISTINCTROW papirkurv SET titel = '" & (titel) & "', spilletid = '" & (spilletid) & "', premiere = '" & (premiere) & "', genre = '" & (genre) & "', genre2 = '" & (genre2) & "', sprog = '" & (sprog) & "', sprog2 = '" & (sprog2) & "', instruktor = '" & (instruktor) & "', skuespiller1 = '" & (skuespiller1) & "', skuespiller2 = '" & (skuespiller2) & "', skuespiller3 = '" & (skuespiller3) & "', skuespiller4 = '" & (skuespiller4) & "', billede = '" & (billede) & "', billede2 = '" & (billede2) & "', movienavn = '" & (movienavn) & "', beskrivelse = '" & (beskrivelse) & "' WHERE id = '" & Request.QueryString("id") & "'" Conn.Execute (SQLstmt) conn.Close Set conn = nothing Set SQLstmt = nothing response.redirect ("admin_slet.asp") %>
Jeg tror den er ved at være der, men jeg får denne fejl??? Microsoft OLE DB Provider for ODBC Drivers fejl '80040e07' [Microsoft][ODBC Microsoft Access-driver] Datatyperne stemmer ikke overens i kriterieudtrykket. /cinemax/flyt.asp, linje 13
Fejlen ligger her: Conn.Execute (SQLstmt) Hjælp:)
Har bygget vidre på svaret og lukker det igen!
Kurser inden for grundlæggende programmering