s1
Nybegynder
23. maj 2001 - 12:58
Der er
7 kommentarer og 3 løsninger
Hvad er der galt?
Hej, Er der nogen der kan sige mig hvad det er galt med min script! Den her fejl få jeg: Error Type: Microsoft OLE DB Provider for ODBC Drivers (0x80040E14) [Microsoft][ODBC Microsoft Access Driver] Syntax error in INSERT INTO statement. Her er koden: <%@ Language=VBScript %> <HTML> <HEAD> <META NAME=\"GENERATOR\" Content=\"Microsoft Visual Studio 6.0\"> </HEAD> <BODY> <% Dim Connection, Recordset, SQL Dim ime,adresa,grad,drzava,telefon,fax,telex,email,url ime = Replace(Request.Form(\"ime\"), \"\'\", \"\'\'\") adresa = Replace(Request.Form(\"adresa\"), \"\'\", \"\'\'\") grad = Replace(Request.Form(\"grad\"), \"\'\", \"\'\'\") drzava = Replace(Request.Form(\"drzava\"), \"\'\", \"\'\'\") telefon = Replace(Request.Form(\"telefon\"), \"\'\", \"\'\'\") fax = Replace(Request.Form(\"fax\"), \"\'\", \"\'\'\") telex = Replace(Request.Form(\"telex\"), \"\'\", \"\'\'\") email = Replace(Request.Form(\"email\"), \"\'\", \"\'\'\") url = Replace(Request.Form(\"ulr\"), \"\'\", \"\'\'\") Set Connection = Server.CreateObject(\"ADODB.Connection\") Connection.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath(\"banke.mdb\") SQL = \"INSERT INTO Banke(Ime,Adresa,Grad,Drzava,Telefon,Fax,Telex,E-mail,URL) VALUES(\'\" & ime & \"\',\'\" & adresa & \"\',\'\" & grad & \"\',\'\" & drzava & \"\',\'\" & telefon & \"\',\'\" & fax & \"\',\'\" & telex & \"\',\'\" & email & \"\',\'\" & url & \"\')\" Connection.Execute(SQL) Response.Write \"Teksten er nu tilføjet\" Connection.Close Set Connection = Nothing %> </BODY> </HTML> ...tak.
Annonceindlæg tema
Skal det ikke være (\"url\") istedet; url = Replace(Request.Form(\"ulr\"), \"\'\", \"\'\'\") ? prøv at skive Response.write SQL Connection.Execute(SQL) Og se om felterne bliver rigtigt udfyldt. Håber det hjælper /jacob
s1
Nybegynder
23. maj 2001 - 13:19
#2
har rettet få den samme fejl igen :(
Hvad skiver Response.write SQL ud ? Er du sikker på at alle datatyper i din database er tekst (og ikke tal) ? /jacob
s1
Nybegynder
23. maj 2001 - 13:24
#4
hvor skal jeg skrive det her Response.write SQL Connection.Execute(SQL) jo der er tal og ()
Hvis det er et tal der skal indsættes skal der ikke et \' tegn det er kun ved tekst. Samt så skal der heller ikke Replac(... Bare sæt den der response.write ind istedet for Connection.Execute(SQL) bare for at teste om SQL sætningen er ok /jacob
s1
Nybegynder
23. maj 2001 - 14:31
#6
Nu har jeg rettet den men få den samme fejl :( Her er koden (rette): <%@ Language=VBScript %> <HTML> <HEAD> <META NAME=\"GENERATOR\" Content=\"Microsoft Visual Studio 6.0\"> </HEAD> <BODY> <% Dim Connection, Recordset, SQL Dim ime,adresa,grad,drzava,telefon,fax,telex,email,url ime = Request.Form(\"ime\") adresa = Request.Form(\"adresa\") grad = Request.Form(\"grad\") drzava = Request.Form(\"drzava\") telefon = Request.Form(\"telefon\") fax = Request.Form(\"fax\") telex = Request.Form(\"telex\") email = Request.Form(\"email\") url = Request.Form(\"url\") Set Connection = Server.CreateObject(\"ADODB.Connection\") Connection.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath(\"banke.mdb\") SQL = \"INSERT INTO Banke(Ime,Adresa,Grad,Drzava,Telefon,Fax,Telex,E-mail,URL) VALUES(\'\" & ime & \"\',\'\" & adresa & \"\',\'\" & grad & \"\',\'\" & drzava & \"\',\'\" & telefon & \"\',\'\" & fax & \"\',\'\" & telex & \"\',\'\" & email & \"\',\'\" & url & \"\')\" Connection.Execute(SQL) Response.Write \"Teksten er nu tilføjet\" Connection.Close Set Connection = Nothing %> </BODY> </HTML>
prøv engang med dette... <%@ Language=VBScript %> <HTML> <HEAD> <META NAME=\"GENERATOR\" Content=\"Microsoft Visual Studio 6.0\"> </HEAD> <BODY> <% Dim Connection, Recordset, SQL Dim ime,adresa,grad,drzava,telefon,fax,telex,email,url ime = Replace(Request.Form(\"ime\"), \"\'\", \"\'\'\") adresa = Replace(Request.Form(\"adresa\"), \"\'\", \"\'\'\") grad = Replace(Request.Form(\"grad\"), \"\'\", \"\'\'\") drzava = Replace(Request.Form(\"drzava\"), \"\'\", \"\'\'\") telefon = Replace(Request.Form(\"telefon\"), \"\'\", \"\'\'\") fax = Replace(Request.Form(\"fax\"), \"\'\", \"\'\'\") telex = Replace(Request.Form(\"telex\"), \"\'\", \"\'\'\") email = Replace(Request.Form(\"email\"), \"\'\", \"\'\'\") url = Replace(Request.Form(\"url\"), \"\'\", \"\'\'\") Set Connection = Server.CreateObject(\"ADODB.Connection\") Connection.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath(\"banke.mdb\") conn.Execute(\"INSERT INTO banke (Ime, Adresa, Grad, Drzava, Telefon, Fax, Telex, E-mail, URL) VALUES (\'\'\" & ime & \"\', \'\" & adresa & \"\', \'\" & grad & \"\', \'\" & drzava & \"\', \'\" & telefon & \"\', \'\" & fax & \"\', \'\" & telex & \"\', \'\" & email & \"\', \'\" & url & \"\')\") Response.Write \"Teksten er nu tilføjet\" Connection.Close Set Connection = Nothing %> </BODY> </HTML>
conn.Execute(\"INSERT INTO banke (Ime, Adresa, Grad, Drzava, Telefon, Fax, Telex, E-mail, URL) VALUES (\'\'\" & ime & \"\', \'\" & adresa & \"\', \'\" & grad & \"\', \'\" & drzava & \"\', \'\" & telefon & \"\', \'\" & fax & \"\', \'\" & telex & \"\', \'\" & email & \"\', \'\" & url & \"\')\") skal lige rettes til connection.Execute(\"INSERT INTO banke (Ime, Adresa, Grad, Drzava, Telefon, Fax, Telex, E-mail, URL) VALUES (\'\'\" & ime & \"\', \'\" & adresa & \"\', \'\" & grad & \"\', \'\" & drzava & \"\', \'\" & telefon & \"\', \'\" & fax & \"\', \'\" & telex & \"\', \'\" & email & \"\', \'\" & url & \"\')\")
s1
Nybegynder
23. maj 2001 - 15:00
#9
Har fundet fejlen :) Fejlen var E-mail skulle rettes til Email
s1
Nybegynder
23. maj 2001 - 15:02
#10
mange tak for hjælpen :)
Kurser inden for grundlæggende programmering