Avatar billede ste Nybegynder
13. januar 2004 - 06:06 Der er 10 kommentarer og
1 løsning

Inser into virker ikke.

Jeg sidder med en insert sætning der ikke virker. jeg tror jeg har stirret mig blind, måske nogen lige vil kigge og komme med de gyldne ord.Sætningen ser sådan ud.

strSQL= "Insert Into tblTetpaaregistrering (RegInitialer, AfdelingNr, Direkteaarsag, Indirekteaarsag, UdsatLegeme, ALegeme, ADirekte, AIndirekte, Hendelse, Dato, Tid) values('" & Request.Form("RegInitialer") & "', " & Request.Form("AfdelingNr") & ", " & Request.Form("Direkteaarsag") & ", " & Request.Form("Indirekteaarsag") & ", " & Request.Form("UdsatLegeme") & ", '" & Request.Form("ALegeme") & "', '" & Request.Form("ADirekte") & "', '" & Request.Form("AIndirekte") & "', '" & Request.Form("Hendelse") & "', " & Request.Form("Dato") & "," & Request.Form("Tid") & ")"
Set rs = Conn.Execute(strSQL)
Conn.Close
Set Conn=Nothing
Avatar billede ste Nybegynder
13. januar 2004 - 07:45 #1
Jeg har også prøvet denne metode, men jeg er ikke sikker på at jeg har løst det rigtigt. Måske en vil kommentere denne også.
strSQL = "Insert into tblTetpaaregistrering ("

strSQL = strSQL & "RegInitialer, "
strSQL = strSQL & "AfdelingNr,  "
strSQL = strSQL & "Direkteaarsag, "
strSQL = strSQL & "Indirekteaarsag, "
strSQL = strSQL & "UdsatLegeme, "
strSQL = strSQL & "ADirekte, "
strSQL = strSQL & "AIndirekte, "
strSQL = strSQL & "Hendelse, "
strSQL = strSQL & "Dato, "
strSQL = strSQL & "Tid) "

strSQL = strSQL & "values( "

strSQL = strSQL & " '"& Request.Form("RegInitialer") & "', "
strSQL = strSQL & " " & Request.Form("AfdelingNr") & ", "
strSQL = strSQL & " " & Request.Form("Direkteaarsag") & ", "
strSQL = strSQL & " " & Request.Form("Indirekteaarsag") & ", "
strSQL = strSQL & " " & Request.Form("UdsatLegeme") & ", "
strSQL = strSQL & " '"& Request.Form("ALegeme") & "', "
strSQL = strSQL & " '"& Request.Form("ADirekte") & "', "
strSQL = strSQL & " '"& Request.Form("AIndirekte") & "',"
strSQL = strSQL & " '"& Request.Form("Hendelse") & "',"
strSQL = strSQL & " " & Request.Form("Dato") & ", "
strSQL = strSQL & " " & Request.Form("Tid") & ")"

Conn.Execute(strSQL)
Conn.Close
Set Conn=Nothing
Avatar billede squashguy Nybegynder
13. januar 2004 - 08:17 #2
Hvilken fejl får du?

Nogle gange indeholder sql ikke lige hvad man tror, så prøv en

Response.Write strSQL

inden du kalder Execute(), og se om den er som du forventer..
Avatar billede squashguy Nybegynder
13. januar 2004 - 08:18 #3
I den sidste har du vist også glemt aLegeme
Avatar billede squashguy Nybegynder
13. januar 2004 - 08:20 #4
OG strenge skal omgives af apostroffer..
Avatar billede eagleeye Praktikant
13. januar 2004 - 08:35 #5
Når du har en fejl så husk altid at Copy/Paste fejlen herind så vi kan se den. Det er 100 gange lettere at finde fejlen ud fra fejl koden.

Hvilken typer er de forskellige kolonner i din database?
Ud fra din SQL sætninger er følgende Tekst: RegInitialer, aLegeme, ADirekte, AIndirekte, Hendelse
Følgende er af typen tal:  AfdelingNr, Direkteaarsag, Indirekteaarsag, UdsatLegeme, Dato, Tid
Avatar billede ste Nybegynder
13. januar 2004 - 10:17 #6
Yes jeg løste problemet med Response.Write strSQL. Det var ikke hele strengen der kom med, og rigtigt nok jeg havde stirret mig blind. Der var stavefejl i feltet som returnere AfdelingNr. Det fik jeg syn for da der ikke kom noget resultat tilbage.
Med hensyn til ønsket fra eagleeye.
Der kom kun en fejlmelding der sagde at siden ikke kunne findes, så jeg tænkte det ikke var relevant, men skal ved næste behov for hjælp vedlægge fejlmeldingen.

Selv om svaret på problemet ikke blev givet her fik jeg dog lys til vejen, så hvis squashguy smider et svar kvittere jeg med points.
Avatar billede Slettet bruger
13. januar 2004 - 10:19 #7
Avatar billede ste Nybegynder
13. januar 2004 - 10:26 #8
Lige på falderebet. Jeg er ikke sikker i det sidste eksempel jeg har indsat her. Jeg er i tvivl og value delen er skrevet rigtig, måske der kan svares på det under dette spørgsmål.

strSQL = "Insert into tblTetpaaregistrering ("

strSQL = strSQL & "RegInitialer, "
strSQL = strSQL & "AfdelingNr,  "
strSQL = strSQL & "Direkteaarsag, "
strSQL = strSQL & "Indirekteaarsag, "
strSQL = strSQL & "UdsatLegeme, "
strSQL = strSQL & "ADirekte, "
strSQL = strSQL & "AIndirekte, "
strSQL = strSQL & "Hendelse, "
strSQL = strSQL & "Dato, "
strSQL = strSQL & "Tid) "

strSQL = strSQL & "values( "

strSQL = strSQL & " '"& Request.Form("RegInitialer") & "', "
strSQL = strSQL & " " & Request.Form("AfdelingNr") & ", "
strSQL = strSQL & " " & Request.Form("Direkteaarsag") & ", "
strSQL = strSQL & " " & Request.Form("Indirekteaarsag") & ", "
strSQL = strSQL & " " & Request.Form("UdsatLegeme") & ", "
strSQL = strSQL & " '"& Request.Form("ALegeme") & "', "
strSQL = strSQL & " '"& Request.Form("ADirekte") & "', "
strSQL = strSQL & " '"& Request.Form("AIndirekte") & "',"
strSQL = strSQL & " '"& Request.Form("Hendelse") & "',"
strSQL = strSQL & " " & Request.Form("Dato") & ", "
strSQL = strSQL & " " & Request.Form("Tid") & ")"

Conn.Execute(strSQL)
Conn.Close
Set Conn=Nothing
Avatar billede eagleeye Praktikant
13. januar 2004 - 21:47 #9
Angående fejl koden så skulle du gerne få en bedre fejl kode/beskrivelse ved at slå denne fra i IE:

funktioner -> internetindstillinger -> avanceret -> fjern kryds i "vis meddelelse om uskadelige http-fejl"
Avatar billede ste Nybegynder
06. februar 2004 - 09:58 #10
squasguy. SMider du lige et svar.
Avatar billede ste Nybegynder
22. februar 2004 - 21:37 #11
Når jeg lukker her.
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