Avatar billede kagge Nybegynder
16. september 2003 - 12:24 Der er 4 kommentarer og
1 løsning

Datofelter i SQL-streng

Jeg har en masse datofelter i en formular som skal smides ned i en accessdb. jeg har set et andet eks. her på eksperten som bruger nedenstående måde: Det finder ud af hvor mange af datofelterne som er udfyldt og skal lægges i basen. Derefter opbygger den en SQL-streng hvor den kun medtager de datofelter hvor der reelt set var indhold (det er ikke et krav at udfylde datofelterne i formularen). Jeg får en fejl når jeg kører det (se nederst), men jeg har stirret mig blind på koden, men jeg tror det er nogle ' der står forkert i SQL-strengen. Nogen der kan se hvad der går galt

kolDato =""
dataDato =""

fodselsdat = Request.Form("fodselsdato")
stillingdato = Request.Form("stilling1startdato")

if fodselsdat <>"" then
  fodselsdatous = split(fodselsdat,"-")
  fodselsdat = fodselsdatous(2) & "-" & fodselsdatous(1) & "-" & fodselsdatous(0)
  kolDato = kolDato & ", Fodselsdato"
  dataDato = dataDato & ", #" & fodselsdat & "#"
end if

if stillingdato <>"" then
  stillingdatous = split(stillingdato,"-")
  stillingdato = stillingdatous(2) & "-" & stillingdatous(1) & "-" & stillingdatous(0)
  kolDato = kolDato & ", Stilling_startdato"
  dataDato = dataDato & ", #" & stillingdato & "#"
end if

connectionString = "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("Stamdata.mdb")
Set forbindelse = Server.CreateObject("ADODB.Connection")
Set recordSet = Server.CreateObject("ADODB.recordSet")
forbindelse.Open connectionString, CONN_USER, CONN_PASS
strSQL = "INSERT INTO Medarbejder (Medarbejdernr,Medarbejdernavn,Stillingsnr" & kolDato & ") VALUES ('" & request.Form("medarbejdernr") & "', '" & request.Form("medarbejdernavn") & "', " & request.Form("stilling1") & "'" & dataDato & ")"
forbindelse.Execute(strSQL)


Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

[Microsoft][ODBC Microsoft Access Driver] Syntax error in string in query expression '2', #2003-01-17#, #1978-05-08#)'.

/stamdata/medarbejder_godkend.asp, line 38
Avatar billede eagleeye Praktikant
16. september 2003 - 12:50 #1
Hvis Medarbejdernr er en tal kolonne skal der ikke ping ' omkring
'" & request.Form("medarbejdernr") & "',

Samt der mangler en en ping før  request.Form("stilling1")  eller skal den som er efter fjernes.:

Det skal være sådan her (pingerne er fjernet, anget Medarbejdernr og Stillingsnr er tal kolonner:

strSQL = "INSERT INTO Medarbejder (Medarbejdernr,Medarbejdernavn,Stillingsnr" & kolDato & ") VALUES (" & request.Form("medarbejdernr") & ", '" & request.Form("medarbejdernavn") & "', " & request.Form("stilling1") & " " & dataDato & ")"
Avatar billede kagge Nybegynder
16. september 2003 - 13:00 #2
=> eagleeye du er bare genial.

Medarbejdernr er et textfelt så der skal være '
men stillingsnr er et number og det hjalp da jeg fjernede den ' der stod efter, så nu virker det. Jeg skal vist snart have en pause :)
Avatar billede kagge Nybegynder
16. september 2003 - 13:04 #3
kan du ikke lige lægge et svar i spm: http://exp.dk/spm/399759 så kan du lige få yderligere med point.....
Avatar billede kagge Nybegynder
02. oktober 2003 - 11:37 #4
Hvordan løser man ovenstående problem i en UPDATE-statement?

Jeg skal nok smide flere point ud til den der kan hjælpe med dette.
Avatar billede kagge Nybegynder
02. oktober 2003 - 12:32 #5
Har lige oprettet et spm. på ovenstående problem
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

Seneste spørgsmål Seneste aktivitet
I går 21:00 Libre Office Impress Af Frank i Andre styresystemer
I går 11:47 VB script Af Jenshentze i Word
I går 11:21 Popup ved opstart Af mort1 i Windows
04/0918:50 Slet lokal konto Af ErikHg i Windows
04/0916:05 Ændre tal i en celle Af xvid i Excel