SQL, INSERT
Jeg ved ikke om dette er det rigtige sted for et Sql spørgsmål?jeg er en total SQL/ASP begynder, men jeg prøver! :-)
Jeg har oprettet en DB i Access, og den vil jeg indlæse en \"kunde\" i, men når jeg bruger INSERT
får jeg denne fejl:
Der opstod en Microsoft VBScript-kompileringsfejl fejl \'800a03ea\'
Der er en syntaksfejl
/aspa/merrild/nybruger.asp, linje 38
SQLINSERT=SQLINSERT & & Nr & \", \"
----------------------^
Her er koden..
<HTML>
<HEAD>
<TITLE>Please fill in your personal info:</TITLE>
</HEAD>
<BODY bgcolor=\"silver\" text=\"black\">
<br><br><br><br><br>
<center>
<table width=\"250\">
<tr>
<td>
<font face=\"arial\" size=\"3\">Please fill in your personal info:</>
<p><font face=\"arial\" size=\"2\">
<form action=\"nybruger.asp\" method=\"get\">
<p><input type=\"Text\" name=\"Nr\" size=\"20\"> <i>kunde nr.</i>
<p><input type=\"Text\" name=\"Navn\" size=\"20\"> <i>navn</i>
<p><input type=\"Text\" name=\"Adresse\" size=\"20\"> <i>adresse</i>
<p><input type=\"Text\" name=\"Email\" size=\"20\"> <i>email</i>
<p><input type=\"Text\" name=\"Login\" size=\"20\"> <i>login navn</i>
<p><input type=\"Text\" name=\"Password\" size=\"20\"> <i>kodeord</i>
<p><select name=\"Type\"><i>Kunde Type</i>
<Option value = \"Privat\"> Privat Kunde</Option>
<Option value = \"Erhverv\"> Erhvers Kunde</Option>
</select>
<p><input type=\"Submit\" value=\"Tilføj Mig!\">
</form>
</td>
</tr>
</table>
<p>
<p>
</center>
</BODY>
</HTML>
The \'nybruger.asp\' CODE:
this is where im getting the error
\"
Error
/aspa/merrild/nybruger.asp, line 38
SQLINSERT=SQLINSERT & & Nr & \", \"
----------------------^
<%@ Language = VBscript %>
<%
\'Erklærer Variabler
Dim Nr
Dim Navn
Dim Adresse
Dim Email
Dim Login
Dim Password
Dim Type
Dim SQLINSERT
Dim URL
\'Grab variables from the querystring.
Nr=Request.Querystring(\"Nr\")
Navn=Request.Querystring(\"Navn\")
Adresse=Request.Querystring(\"Adresse\")
Email=Request.Querystring(\"Email\")
Login=Request.Querystring(\"Login\")
Password=Request.Querystring(\"Password\")
Betegnelse=Request.Querystring(\"Type\")
\'This is a VBScript variable the returns the date and time
\'on the host computer. We need this so we know the exact
\'Date and time the appointment was made.
ourdate = FormatDateTime(now,vbLongDateTime)
\'Create the INSERT statement for a brand new client.
SQLINSERT=\"INSERT INTO Client (Nr, Navn, Adresse, RegDato, Email, Login, Password, Type) \"
SQLINSERT=SQLINSERT & \"VALUES (\"
SQLINSERT=SQLINSERT & & Nr & \", \"
SQLINSERT=SQLINSERT & \"\'\" & Navn & \"\', \"
SQLINSERT=SQLINSERT & \"\'\" & Adresse & \"\', \"
SQLINSERT=SQLINSERT & \"RegDate = \'\" & ourdate & \"\', \"
SQLINSERT=SQLINSERT & \"\'\" & Email & \"\', \"
SQLINSERT=SQLINSERT & \"\'\" & Login & \"\', \"
SQLINSERT=SQLINSERT & \"\'\" & Password & \"\', \"
SQLINSERT=SQLINSERT & \"\'\" & Type & \"\', \"
set connupdate = server.createobject(\"ADODB.Connection\")
connupdate.open \"kaffe\"
connupdate.execute(SQLINSERT)
connupdate.close
URL=\"infocheck.asp?Navn=\" & Navn
Response.redirect (URL)
%>
