Ang. Problemer med Insert into Access Med Asp.
God dag allesammen, jeg har lidt af et problem,Jeg kan godt få ting ind i db\'en men når jeg vil indsette flere en 8 ting afgangen så!!! vil den ikke
måske er det noget andet... men her er et par filer i kan kigge på, den der finder svaret får 100 point.
Det er i login_opret_send.asp at problemerne opstår.
Det virker med disse felter:
username,password,status,navn,afdeling,email,gade,billede
men når disse bliver tilføjet så virker det ikke:
by,post nr,tlf nr,mobil nr,lokal nr
Databasen er i føglende række følge:
USERID, USERNAME, PASSWORD, STATUS, NAVN,
AFDELING, LOKAL NR, EMAIL, GADE, POST NR,
BY, MOBIL NR, TLF NR, BILLEDE
Håber at i kan hjælpe mig, jeg skal være færdig med projekter idag inden kl 14.00 så HJÆÆÆÆLLLPPP.
--> Login_opret.asp <--
<!-- LOGIN.ASP?OPRETFORM INDTAST BRUGER TIL OPRETTELSE -->
<!--#include file=\"global.asp\"-->
<%if request.querystring=\"\" then%>
<html>
<body bgcolor=\"#eeeeee\" text=\"#000000\" link=\"#CDE0F3\" vlink=\"#8CB9E4\" alink=\"#8CB9E4\">
<center><h2>Opret en ny bruger</h2></center><br>
<form name=\"login_opret\" method=\"POST\" action=\"login_opret_send.asp\">
<table align=\"center\" border=\"5\"><tr><td>
<table align=\"center\">
<tr>
<td align=\"left\"><b>Brugernavn</td><td align=\"left\"><input type=text name=\"username\" size=20 value=\"\"></td><td align=\"left\"><b>Adgangskode</b></td><td align=\"left\"><input type=password name=\"password\" size=20 value=\"\"></td>
</tr>
<tr>
<td align=\"left\"><b>Afdeling</b></td><td align=\"left\"><input type=text name=\"afdeling\" size=20 value=\"\"></td><td align=\"left\"><b>Lok. nr</b></td><td align=\"left\"><input type=text name=\"lokal nr\" size=20 value=\"\"></td>
</tr>
<tr>
<td align=\"left\"><b>Navn</b></td><td align=\"left\"><input type=text name=\"navn\" size=20 value=\"\"></td><td align=\"left\"><b>Gade</b></td><td align=\"left\"><input type=text name=\"gade\" size=20 value=\"\"></td>
</tr>
<tr>
<td align=\"left\"><b>Post nr</b></td><td align=\"left\"><input type=text name=\"post nr\" size=20 value=\"\"></td><td align=\"left\"><b>By</b></td><td align=\"left\"><input type=text name=\"by\" size=20 value=\"\"></td>
</tr>
<tr>
<td align=\"left\"><b>Telefon nr</b></td><td align=\"left\"><input type=text name=\"tlf nr\" size=20 value=\"\"></td><td align=\"left\"><b>Mobil nr</b></td><td align=\"left\"><input type=text name=\"mobil nr\" size=20 value=\"\"></td>
</tr>
<tr>
<td align=\"left\"><b>Email</b></td><td colspan=\"2\" align=\"left\"><input type=text name=\"email\" size=33 value=\"\"></td><td align=\"left\"><i>@</i><b>BrixKamp</b><i>.dk</i></td>
</tr>
<tr>
<td align=\"left\"><b>Billede</b></td><td colspan=\"2\" align=\"left\"><input type=text name=\"billede\" size=33 value=\"\"></td><td align=\"left\">\'<b>.gif</b>\' <i>eller</i> \'<b>.jpg</b>\'</td>
</tr>
</table>
<table align=\"center\">
<tr>
<td><p>Webmaster</p></td>
<td><input type=\"radio\" value=1 name=\"status\"></td>
<tr>
<td><p>Administrator</p></td>
<td><input type=\"radio\" value=2 name=\"status\"></td>
</tr>
<tr>
<td><p>Medarbejder</p></td>
<td><input type=\"radio\" value=3 name=\"status\" checked></td>
</tr>
</table>
</td></tr></table>
<table align=\"center\" border=\"0\">
<tr><td><input type=submit value=Opret></td></tr>
</table>
</form>
<script language=\"JavaScript\">
<!--
document.login_opret.username.focus();
// -->
</script>
</body>
</html>
<%end if%>
--> Login_opret_send.asp <--
<!-- LOGIN_OPRET_SEND.ASP OPRETTELSE AF NY BRUGER I DB -->
<!--#include file=\"global.asp\"-->
<%if request.querystring=\"\" then%>
<html>
<body bgcolor=\"#eeeeee\" marginwidth=\"0\" marginheight=\"0\" leftmargin=\"0\" topmargin=\"0\" bottummargin=\"0\">
<table align=\"center\" border=\"0\" width=\"60%\" height=\"19\">
<tr><td>Opret Bruger</td></tr></table>
<br><br>
<%
if checkInput() then
source = \"Driver={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.Mappath(\"db/brugere.mdb\")
Set connection = Server.CreateObject (\"ADODB.Connection\")
Set data = Server.CreateObject (\"ADODB.Recordset\")
connection.Open source
indsend1 = \"INSERT INTO userlist (username,password,status,navn,afdeling,email,gade,billede) VALUES (\"
indsend1 = indsend1 + \"\'\" + Request.Form(\"username\") + \"\', \"
indsend1 = indsend1 + \"\'\" + Request.Form(\"password\") + \"\', \"
indsend1 = indsend1 + \"\'\" + Request.Form(\"status\") + \"\', \"
indsend1 = indsend1 + \"\'\" + Request.Form(\"navn\") + \"\', \"
indsend1 = indsend1 + \"\'\" + Request.Form(\"afdeling\") + \"\', \"
indsend1 = indsend1 + \"\'\" + Request.Form(\"email\") + \"\', \"
indsend1 = indsend1 + \"\'\" + Request.Form(\"gade\") + \"\', \"
indsend2 = \"\'\" + Request.Form(\"billede\") + \"\') \"
sql = indsend1 + indsend2
connection.execute(sql)
connection.close
%>
<%
Select Case Request.Form(\"status\")
Case 1 status = \"Webmaster status\"
Case 2 status = \"Administrator status\"
Case 3 status = \"Superbruger status\"
Case Else Response.Write(\"<br><div align=\'center\'><p>\" & \"Ukendt bruger !?\" & \"</p></div>\")
End Select
%>
<p><div align=\"center\">Brugeren <%=Request.Form(\"username\")%> er oprettet med passwordet <%=Request.Form(\"password\")%>
og <%=status%>.</div></p>
<%else%>
<div align=\"center\"><p>Fejl i indtastningen !</p></div>
<%end if%>
</body>
<%end if%>
