Avatar billede phineas_phreak Nybegynder
15. marts 2004 - 12:20 Der er 6 kommentarer og
1 løsning

MySQL dato problem

Hejsa er gået igang med at konvertere noget ASP fra en ACCESS til en MySQL db.

Får følgende fejlmeddelelse:

Fejltype:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E21)
Der opstod en eller flere fejl ved en OLE DB-handling på flere trin. Kontroller alle OLE DB-statusværdier. Handlingen blev ikke udført.
/ny/gem1mysql.asp, line 31


i linje 31 står der:

rs("maaned") = MonthName(Month(Date))

Jeg er helt ny i MySQL står bær over med mig :)

kolonnen maaned er af typen char(50).

Håber i kan hjælpe
Avatar billede fennec Nybegynder
15. marts 2004 - 12:27 #1
prøv dette:
rs("maaned") = "'"&MonthName(Month(Date))&"'"
Avatar billede phineas_phreak Nybegynder
15. marts 2004 - 12:33 #2
samme fejl :(
Avatar billede phineas_phreak Nybegynder
15. marts 2004 - 12:40 #3
Det er faktisk ligegyldigt hvad jeg skriver i den linje, får samme fejl uanset hvad,

siden ser således ud.

<%
Const adOpenKeyset = 1
Const adLockOptimistic = 3

Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={MySQL ODBC 3.51 Driver};SERVER=localhost;DATABASE=questions;USER=;PASSWORD=;"

    Set rs = Server.CreateObject("ADODB.RecordSet")
    strSQL = "Select * From belysning"
   
    rs.Open strSQL, Conn, adOpenKeyset, adLockOptimistic
       
      rs.AddNew
      rs("svar1") = Request.Form("question1")
          rs("svar2") = Request.Form("question2")
      rs("svar3") = Request.Form("question3")
      rs("svar4") = Request.Form("question4")
      rs("navn") = Session("idUser")
      rs("maaned") = MonthName(Month(Date))
      rs("aar") = Year(date)
     
      rs.Update
    rs.Close
    Set rs = Nothing
Conn.Close
set Conn = Nothing
response.redirect ("side2.asp")
%>
Avatar billede fennec Nybegynder
15. marts 2004 - 12:47 #4
Prøv at gøre det sådan her istedet:
<%
Const adOpenKeyset = 1
Const adLockOptimistic = 3

Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={MySQL ODBC 3.51 Driver};SERVER=localhost;DATABASE=questions;USER=;PASSWORD=;"

    conn.execute("insert into belysning(svar1,svar2,svar3,svar4,navn,maaned,aar) values('"&Request.Form("question1")&"','"&Request.Form("question2")&"','"&Request.Form("question3")&"','"&Request.Form("question4")&"','"&Session("idUser")&"','"&MonthName(Month(Date))&"','"&Year(date)&"')")

Conn.Close
set Conn = Nothing
response.redirect ("side2.asp")
%>
Avatar billede phineas_phreak Nybegynder
15. marts 2004 - 12:51 #5
hold kæft hvor er det godt. Det virker. bare lav et svar så får du nogle point

Er det ik muligt at opstille det lidt pænere ?
Avatar billede fennec Nybegynder
15. marts 2004 - 13:03 #6
sql = "insert into belysning(svar1,svar2,svar3,svar4,navn,maaned,aar) " &_
  "values('"&Request.Form("question1")&"'," &_
  "'"&Request.Form("question2")&"'," &_
  "'"&Request.Form("question3")&"'," &_
  "'"&Request.Form("question4")&"'," &_
  "'"&Session("idUser")&"'," &_
  "'"&MonthName(Month(Date))&"'," &_
  "'"&Year(date)&"')"
conn.execute(sql)
Avatar billede phineas_phreak Nybegynder
15. marts 2004 - 16:02 #7
strålende. tak for hjælpen
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