<% if request.Form("inpbooFAG_UNDERVISER") = 0 Then InsertInto_tblFAG_UNDERVISER End if InsertInto_tblKURSUS_UNDERVISER
Sub InsertInto_tblFAG_UNDERVISER 'Der indsættes en række i tblFAG_UNDERVISER Dim Conn,SQL Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open strConnect SQL = "INSERT INTO tblFAG_UNDERVISER (Fagomraade, Navn) VALUES ('" & request.Form("inpFagomraade") & "','" & Session("ValgtUnderviser") & "')" Conn.Execute(SQL) Conn.Close End sub
Sub InsertInto_tblKURSUS_UNDERVISER 'Indholdet af subOpret sendes til databasen Dim Conn,SQL Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open strConnect SQL = "INSERT INTO tblKURSUS_UNDERVISER (Fagomraade, Kursustitel, Navn, Erfaring, Kommentar) VALUES ('" & request.Form("inpFagomraade") & "','" & request.Form("inpKursustitel") & "','" & Session("ValgtUnderviser") & "'," & "1" & ",'" & request.Form("inpKommentar") & "')" Conn.Execute(SQL) Conn.Close End sub %>
------------------------------------------- GIVER SAMME FEJL!! -------------------------------------------
SQL = "INSERT INTO tblFAG_UNDERVISER (Fagomraade, Navn) VALUES ('" & request.Form("inpFagomraade") & "','" & Session("ValgtUnderviser") & "')" er nogen af de felter tal felter ?
ikke hvis det er true/false ja/nej felt true/false ja/nej felt er jo sådan set et tekstfelt, og hvis du så kommer med en tal værdi, kan db'en ikek finde ud af det en db kan mange ting, men den kan sgu ikek tænke selv ;-)
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.