asp & access
Hej jeg har en sql sætning som der er problemer med :Ny Leverandør :
<form action="ny_leverandor_ok.asp" method="post">
<br>
Leverandør Navn :
<input type="text" name="navn">
<br>
Adresse :
<input type="text" name="adresse">
<br>
Postnr. :
<input type="text" name="postnr">
<br>
By :
<input type="text" name="city">
<br>
Telefon :
<input type="text" name="tlf">
<br>
Fax :
<input type="text" name="fax">
<br>
land :
<input type="text" name="land">
<br>
Email :
<input type="text" name="email">
<br>
Hjemmeside :
<input type="text" name="hp">
<input type="submit" value="Tilføj">
</form>
SIDEN DER SENDES TIL :
<%@ Language=VBScript %>
<!--#INCLUDE FILE ="code_lib.asp" -->
<%
SessionTjek()
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("data.mdb")
Conn.Open DSN
strSQL = "Insert into Leverandorer("
strSQL = strSQL & "navn, "
strSQL = strSQL & "adresse, "
strSQL = strSQL & "postnr, "
strSQL = strSQL & "city, "
strSQL = strSQL & "tlf, "
strSQL = strSQL & "fax, "
strSQL = strSQL & "land, "
strSQL = strSQL & "email, "
strSQL = strSQL & "tlf) "
strSQL = strSQL & "values( "
strSQL = strSQL & "'" & Request.Form("navn") & "', "
strSQL = strSQL & "'" & Request.Form("adresse") & "', "
strSQL = strSQL & "'" & Request.Form("postnr") & "', "
strSQL = strSQL & "'" & Request.Form("city") & "', "
strSQL = strSQL & "'" & Request.Form("tlf") & "', "
strSQL = strSQL & "'" & Request.Form("fax") & "', "
strSQL = strSQL & "'" & Request.Form("land") & "', "
strSQL = strSQL & "'" & Request.Form("email") & "', "
strSQL = strSQL & "'" & Request.Form("hp") & "')"
Conn.Execute(strSQL)
Conn.Close
Set Conn = Nothing
response.redirect ("default.asp")
%>
