Indsæt dagsdato i database !

Mener ikke Access har den funktion. Du kan jo altid selv indsætte det med Now() funktionen ?

locturian >

Hvordan ser sql-sætning ud til det ???

Jeg har dette stykke kode og hvor/hvad skal det sættes ind ??

if Request.ServerVariables("REQUEST_METHOD") = "POST" then
  'henter form felterne
  navn = Replace(Request.form("navn"),"'","''")
  kategori = Replace(Request.form("kategori"),"'","''")
  produkt = Replace(Request.form("produkt"),"'","") 
  pris = Replace(Request.form("pris"),"'","")
  karakter = Replace(Request.form("karakter"),"'","")
  mail = Replace(Request.form("mail"),"'","''")
  url = Replace(Request.form("url"),"'","''")
  beskriv = Replace(Request.form("beskriv"),"'","''")
 
  beskriv = Replace(beskriv,vbCrLf,"<br>")
 
 
 
if navn="" or kategori="" or produkt="" or mail="" or beskriv="" or not isNumeric(karakter)  then
  Response.Write "Fejl i indtastningen."
  Response.End
else
  'kolonne typerne : navn :tekst, dato :date/time, karakter :tal, beskrivelse :notat/tekst
  sql = "insert into dittabelnavn (navn, kategori, produkt, pris, karakter, mail, url, beskrivelse, dato  ) values ("
  sql = sql & "'" & navn & "', "
  sql = sql & "'" & kategori & "', "
  sql = sql & "'" & produkt & "', "
  sql = sql & "'" & pris & "', "
  sql = sql & "" & karakter & ", "
  sql = sql & "'" & mail & "', "
  sql = sql & "'" & url & "', "
  sql = sql & "'" & beskriv & "' "
  sql = (date())

  sql = sql & ")"

UPSss det var det forkert ...

  <%
if Request.ServerVariables("REQUEST_METHOD") = "POST" then
  'henter form felterne
  navn = Replace(Request.form("navn"),"'","''")
  kategori = Replace(Request.form("kategori"),"'","''")
  produkt = Replace(Request.form("produkt"),"'","") 
  pris = Replace(Request.form("pris"),"'","")
  karakter = Replace(Request.form("karakter"),"'","")
  mail = Replace(Request.form("mail"),"'","''")
  url = Replace(Request.form("url"),"'","''")
  beskriv = Replace(Request.form("beskriv"),"'","''")
 
  beskriv = Replace(beskriv,vbCrLf,"<br>")
 
 
 
if navn="" or kategori="" or produkt="" or mail="" or beskriv="" or not isNumeric(karakter)  then
  Response.Write "Fejl i indtastningen."
  Response.End
else
  'kolonne typerne : navn :tekst, karakter :tal, beskrivelse :notat/tekst
  sql = "insert into dittabelnavn (navn, kategori, produkt, pris, karakter, mail, url, beskrivelse  ) values ("
  sql = sql & "'" & navn & "', "
  sql = sql & "'" & kategori & "', "
  sql = sql & "'" & produkt & "', "
  sql = sql & "'" & pris & "', "
  sql = sql & "" & karakter & ", "
  sql = sql & "'" & mail & "', "
  sql = sql & "'" & url & "', "
  sql = sql & "'" & beskriv & "' "
 

  sql = sql & ")"

sql = "insert into dittabelnavn (navn, kategori, produkt, pris, karakter, mail, url, beskrivelse, dato  ) values ("
  sql = sql & "'" & navn & "', "
  sql = sql & "'" & kategori & "', "
  sql = sql & "'" & produkt & "', "
  sql = sql & "'" & pris & "', "
  sql = sql & "" & karakter & ", "
  sql = sql & "'" & mail & "', "
  sql = sql & "'" & url & "', "
  sql = sql & "'" & beskriv & "' "
  sql = sql & "'" & Now() & "' "
  sql = sql & ")"

Der er vist noget galt ;o((

Microsoft JET Database Engine error '80040e14'

Syntax error (missing operator) in query expression ''dsddd' '1/1/2005 4:36:35 PM''.

/fiskegrej/anmeldelse/test2.asp, line 59

sql = "insert into dittabelnavn (navn, kategori, produkt, pris, karakter, mail, url, beskrivelse, dato  ) values ("
  sql = sql & "'" & navn & "', "
  sql = sql & "'" & kategori & "', "
  sql = sql & "'" & produkt & "', "
  sql = sql & "'" & pris & "', "
  sql = sql & "" & karakter & ", "
  sql = sql & "'" & mail & "', "
  sql = sql & "'" & url & "', "
  sql = sql & "'" & beskriv & "', "
  sql = sql & "'" & Now() & "' "
  sql = sql & ")"

Der manglede lige et komma

Det virker - TAKKER ;o))

Men hvor pokker manglede kommaet ???


Drop lige et svar locturian

Manglede her... ; sql = sql & "'" & beskriv & "', " <----

Fortsat godt nytår ;)