asp - Indsæt i database? - Udvikleren.dk - Programmering, webdesign og grafik

Tags: asp

Bruger #10253 @ 01.02.07 15:11

Hej.
Jeg sidder og er i gang med, at lave et Private Message system, hvor jeg har lavet en side med Forms ved navn:

-fromx
-toidx
-subjectx
-text (form'en til "Message" i databasen)
-datex
.........
Derfor har jeg lavet denne kode, som gerne skulle indsætte formularerne fra brugeren, til databasen ved navn "pm".

Her er koden:

Kode

<%
If Session("login") <> "Bruger_er_logget_ind" Then
Response.Redirect("snaps.asp")

End If

' Indsæt!!!
strSQL2 = "Insert into pm ("

strSQL2 = strSQL2 & "from, "
strSQL2 = strSQL2 & "toid, "
strSQL2 = strSQL2 & "subject, "
strSQL2 = strSQL2 & "message, "
strSQL2 = strSQL2 & "senddate) "

strSQL2 = strSQL2 & "values( "

strSQL2 = strSQL2 & "'" & Request.Form("fromx") & "', "
strSQL2 = strSQL2 & "'" & Request.Form("toidx") & "', "
strSQL2 = strSQL2 & "'" & Request.Form("subjectx") & "', "
strSQL2 = strSQL2 & "'" & Request.Form("textx") & "', "
strSQL2 = strSQL2 & "'" & Request.Form("datex") & "')"

' Kør!!
Conn.Execute(strSQL2)

' Luk forbindelse!!
Conn.Close
Set Conn = Nothing

' Skriv besked!
Response.Write("Your message has been sent")

%>

....
Men når jeg afprøver det på nettet, får jeg denne besked:

Kode

Error Type:
ADODB.Connection.1 (0x80004005)
SQLState: 37000 Native Error Code: 1064 [MySQL][ODBC 3.51 Driver][mysqld-4.0.24_Debian-10sarge2-log]You have an error in your SQL syntax. Check the manual that corresponds to your MySQL server version for the right syntax to use near 'from, toid, subject, message, senddate) values( '1', '2', '

Er der nogen der kan sige mig, hvad jeg har gjort forkert?

På forhånd tak
(ps. navnene er rettet , så det gerne skulle være lidt nememere at forstå.

Indlæg senest redigeret d. 01.02.2007 15:13 af Bruger #10253

3 svar postet i denne tråd vises herunder
1 indlæg har modtaget i alt 3 karma

Sorter efter stemmer Sorter efter dato

Bruger #8223 @ 02.02.07 01:17

1.065

Problemet er at "from" er et reserveret ord i MySQL. Du bruger jo netop det ord til at specifere hvilken tabel du vil trække ud af.

Derfor skal du enten ændre feltets navn(anbefalet løsning), eller escape strengen(midlertidig nødløsning only).

escape således:

Kode

strSQL2 = strSQL2 & "`from`, "

` fås ved at holde shift inde og trykke på knappen til venstre for backspace, og lave et mellemrum.

Bruger #10253 @ 02.02.07 16:44

Hey Per! Dig har jeg da gået i paralelklasse med ;-)... Tak for hjælpen. Nu virker det 100%.

Bruger #10253 @ 02.02.07 17:25

Har lige et spørgsmål / problem til, lidt i samme stil:

Har lavet siderne "register.asp" (som henter brugerens input) og "registercomplete.asp", hvor problemmet ligger ved "registercomplete.asp".

Har denne kode:

Kode

strSQL2 = "SELECT Count(username) AS Counter FROM user WHERE username='" & Request.Form("usernamex") & "'"
   Set RS = Conn.Execute(strSQL2)

   If RS("Counter") = 0 Then
    'Lav Bruger! (indsaet i db)
strSQL2 = "Insert into user ("

strSQL2 = strSQL2 & "fullname, "
strSQL2 = strSQL2 & "username, "
strSQL2 = strSQL2 & "password, "
strSQL2 = strSQL2 & "email, "
strSQL2 = strSQL2 & "regdate, "
strSQL2 = strSQL2 & "points, "
strSQL2 = strSQL2 & "adminpoints, "
strSQL2 = strSQL2 & "givepoints, "
strSQL2 = strSQL2 & "info) "

strSQL2 = strSQL2 & "values( "

strSQL2 = strSQL2 & "'" & Request.Form("namex") & "', "
strSQL2 = strSQL2 & "'" & Request.Form("usernamex") & "', "
strSQL2 = strSQL2 & "'" & Request.Form("passwordx") & "', "
strSQL2 = strSQL2 & "'" & Request.Form("emailx") & "', "
strSQL2 = strSQL2 & "'" & date & "', "
strSQL2 = strSQL2 & "'0', "
strSQL2 = strSQL2 & "'0', "
strSQL2 = strSQL2 & "'2', "
strSQL2 = strSQL2 & "'" & Request.Form("infox") & "')"
   
      'Kør og luk forbindelse!
RS = Conn.Execute(strSQL2)
Conn.Close
Set Conn = Nothing

'Skriv beskeder!
Response.Write = "Du er nu registreret"

   Else
    Response.Write("Brugernavnet er taget.")
   
   End If

Når jeg afprøver på nettet, sætter den ind i databasen, men siden vises som fejl, og skriver denne meddeelse:
Error Type:
-----
Sun ONE ASP VBScript runtime (0x800A01AE)
Class does not support automation
-----

Har jeg lavet den samme fejl, eller hvad kan der være galt her? :-)

På Forhånd Tak

Indlæg senest redigeret d. 02.02.2007 17:26 af Bruger #10253

Indsæt i database?

Karma barometer (30 dage)

Modtaget

Givet

Favorit hos
Forum tråde
Artikler