HJÆÆÆÆÆÆÆÆÆÆLLLLLLLLLPPPPPPP!!!!!!
HejJeg har et kæmpe problem, for jeg er ved at lave et projekt i skolen, hvor jeg bruger asp. Jeg har på siden et brugersystem, hvor man skal kunne oprette sig som bruger. Min side ligger på brinkster.com det virker bare ikke. Her er min kode, jeg håber nogle kan fortælle mig hvad der er galt.
På forhånd tak:
<%@ Language=VBScript %>
<%
set Conn = Server.createobject(\"adodb.connection\")
conn.Open \"DBQ=\"& Server.MapPath(\".\") &\"/db/database.mdb; DefaultDir=DBQ=\"& Server.MapPath(\"/\") &\";Driver={Microsoft Access Driver (*.mdb)};\"
Response.Buffer = True
%>
<% mode = request(\"mode\") %>
<% if mode = \"bruger?id=tjek\" then %>
<%
Session(\"brugernavn\") = request.form(\"brugernavn\")
Session(\"password\") = request.form(\"password\")
response.write(brugernavn)
SQL = \"select * from bruger\"
Set RS = conn.Execute(SQL)
RS.MoveFirst
Do While NOT RS.EOF
If RS(\"brugernavn\") = Session(\"brugernavn\") then Response.write(\"<meta http-equiv=\'refresh\' content=\'0;URL=opret.asp?bruger=findes\'>\")
If Session(\"brugernavn\") =\"\" then Response.write(\"<meta http-equiv=\'refresh\' content=\'0;URL=opret.asp\'>\")
If Session(\"password\") =\"\" then Response.write(\"<meta http-equiv=\'refresh\' content=\'0;URL=opret.asp\'>\")
RS.MoveNext
Loop
Response.write(\"<meta http-equiv=\'refresh\' content=\'0;URL=opret.asp?mode=bruger?id=opret\'>\")
%>
<% end if %>
<% if mode = \"bruger?id=doopret\" then %>
<%
Const adOpenKeyset = 1
Const adLockOptimistic = 3
Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath(\"\\projektinter\\db\\database.mdb\")
Set rs = Server.CreateObject(\"ADODB.RecordSet\")
strSQL = \"Select * From bruger\"
rs.Open strSQL, Conn, adOpenKeyset, adLockOptimistic
rs.AddNew
rs(\"brugernavn\") = Request.form(\"brugernavn\")
rs(\"password\") = Request.form(\"password\")
rs(\"navn\") = Request.form(\"navn\")
rs(\"alder\") = Request.form(\"alder\")
rs(\"nickname\") = Request.form(\"nickname\")
rs(\"email\") = Request.form(\"email\")
rs(\"telefon\") = Request.form(\"telefon\")
rs(\"mobil\") = Request.form(\"mobil\")
rs(\"icq\") = Request.form(\"icq\")
rs(\"om\") = Request.form(\"om\")
rs.update
rs.Close
Set rs = Nothing
Conn.Close
set Conn = Nothing
Response.Redirect(\"login.asp\")
%>
<% end if %>
<% if mode = \"bruger?id=opret\" then %>
<HTML>
<HEAD>
<STYLE>TD {COLOR: #000000; FONT-FAMILY: tahoma,verdana; FONT-SIZE: 1em}small { FONT-SIZE: 0.7em}A:link { COLOR: #992020; TEXT-DECORATION: none}A:visited { COLOR: #992020; TEXT-DECORATION: none}A:hover { COLOR: #000000; TEXT-DECORATION: none}
BODY {COLOR: #000000; FONT-FAMILY: tahoma,verdana; FONT-SIZE: 1em}small { FONT-SIZE: 0.7em}A:link { COLOR: #992020; TEXT-DECORATION: none}A:visited { COLOR: #992020; TEXT-DECORATION: none}A:hover { COLOR: #000000; TEXT-DECORATION: none}
</STYLE>
</STYLE>
<!-- Minus AutoDato -->
<TITLE>Brugersystem v1,2</TITLE>
<META NAME=\"Generator\" CONTENT=\"Stone\'s WebWriter 3\">
<SCRIPT LANGUAGE=\"JavaScript\" TYPE=\"text/javascript\">
function validate(opret) {
if (opret.navn.value == \"\") {
alert(\"Husk at skrive dit navn.\");
document.opret.navn.focus();
return false;
}
else {
if (opret.nickname.value == \"\") {
alert(\"Husk at skrive dit nickname\");
document.opret.nickname.focus();
return false;
}
else {
if (opret.alder.value == \"\") {
alert(\"Husk at skrive din alder\");
document.opret.alder.focus();
return false;
}
else {
if (opret.email.value == \"\") {
alert(\"Husk at skrive din e-mail\");
document.opret.email.focus();
return false;
}
else {
if (opret.icq.value == \"\") {
alert(\"Der skal stå noget i ICQ feltet.\");
document.opret.om.focus();
return false;
}
else {
if (opret.om.value == \"\") {
alert(\"Der skal stå noget om dig.\");
document.opret.om.focus();
return false;
}
}
}
}
}
}
return true;
}
function start() {
document.opret.navn.focus();
return false;
}
</SCRIPT>
</HEAD>
<body bgcolor=\"#65809A\" text=\"#FFFFFF\" style=\"font-family: tahoma,verdana; font-size: 10 px; color: #000000\" topmargin=\"5\" leftmargin=\"0\" marginwidth=\"0\" marginheight=\"0\">
<center>
<DIV STYLE=\"text-align:center\"><B>Opret ny bruger</B></DIV>
<TABLE bgcolor=\"#6699cc\">
<TR>
<FORM ACTION=\"opret.asp?mode=bruger?id=doopret\" METHOD=\"POST\" NAME=\"opret\" ONSUBMIT=\"return validate(this)\">
<TD></TD>
<TD><INPUT TYPE=\"hidden\" VALUE=\"<%=Session(\"brugernavn\")%>\" NAME=\"brugernavn\"></TD>
</TR>
<TR>
<TD></TD>
<TD><font size=\"2\"><INPUT TYPE=\"hidden\" VALUE=\"<%=Session(\"password\")%>\" NAME=\"password\"></font></TD>
</TR>
<TR>
<TD><font size=\"2\">Navn: </font></TD>
<TD><INPUT TYPE=\"TEXT\" SIZE=\"25\" NAME=\"navn\" class=\"css\"></TD>
</TR>
<TR>
<TD><font size=\"2\">Øgenavn:</font></TD>
<TD><INPUT TYPE=\"TEXT\" SIZE=\"25\" NAME=\"nickname\" class=\"css\"></TD>
</TR>
<TR>
<TD><font size=\"2\">Alder: </font></TD>
<TD><INPUT TYPE=\"text\" MAXLENGTH=\"2\" NAME=\"alder\" CLASS=\"css\" SIZE=\"2\"></TD>
</TR>
<TR>
<TD><font size=\"2\">E-mail: </font></TD>
<TD><INPUT TYPE=\"TEXT\" SIZE=\"25\" NAME=\"email\" class=\"css\"></TD>
</TR>
<td><font size=\"2\">Telefon:</font></td>
<td><INPUT TYPE=\"TEXT\" SIZE=\"8\" NAME=\"telefon\" class=\"css\" maxlength=\"8\"></td>
<tr>
<td><font size=\"2\">Mobil:</font></td>
<td><INPUT TYPE=\"TEXT\" SIZE=\"8\" NAME=\"mobil\" class=\"css\" maxlength=\"8\"></td>
</tr>
<TR>
<TD><font size=\"2\">ICQnr: </font></TD>
<TD><INPUT TYPE=\"text\" VALUE=\"ingen\" SIZE=\"25\" NAME=\"icq\" class=\"css\"></TD>
</TR>
<TR>
<TD VALIGN=\"top\"><font size=\"2\">Om: </font></TD>
<TD><TEXTAREA WRAP=\"on\" ROWS=\"4\" COLS=\"30\" NAME=\"om\" CLASS=\"css\"></TEXTAREA></TD>
</TR>
<TR>
<TD ALIGN=\"RIGHT\"><INPUT TYPE=\"SUBMIT\" VALUE=\"Opret\" class=\"css\"></TD>
</TR>
<TR>
</table>
</center>
</BODY>
</HTML>
<% end if %>
<% if mode = \"\" then %>
<HTML>
<HEAD>
<STYLE>TD {COLOR: #000000; FONT-FAMILY: tahoma,verdana; FONT-SIZE: 1em}small { FONT-SIZE: 0.7em}A:link { COLOR: #992020; TEXT-DECORATION: none}A:visited { COLOR: #992020; TEXT-DECORATION: none}A:hover { COLOR: #000000; TEXT-DECORATION: none}
</STYLE>
<!-- Minus AutoDato -->
<TITLE>Brugersystem v1,2</TITLE>
<META NAME=\"Generator\" CONTENT=\"Stone\'s WebWriter 3\">
<meta name=\"site-config-URL\" content=\"http://webdesign/golive/config/\">
</HEAD>
<body bgcolor=\"#65809A\" text=\"#FFFFFF\" style=\"font-family: tahoma,verdana; font-size: 10 pt; color: #000000\" topmargin=\"5\" leftmargin=\"0\" marginwidth=\"0\" marginheight=\"0\">
<CENTER>
<DIV STYLE=\"text-align:center\">Opret ny bruger</DIV>
<%
bruger=request(\"bruger\")
if bruger = \"findes\" then response.write(\"Enten findes brugernavnet eller passwordet..!\")
%>
<TABLE>
<TR>
<FORM ACTION=\"opret.asp?mode=bruger?id=tjek\" METHOD=\"POST\">
<TD>Brugernavn: </TD>
<TD><INPUT TYPE=\"text\" VALUE=\"\" SIZE=\"25\" NAME=\"brugernavn\" CLASS=\"css\"></TD>
</TR>
<TR>
<TD>Password: </TD>
<TD><INPUT TYPE=\"password\" VALUE=\"\" SIZE=\"25\" NAME=\"password\" CLASS=\"css\"></TD>
</TR>
<TR>
<TD ALIGN=\"RIGHT\"><INPUT TYPE=\"SUBMIT\" VALUE=\"Opret\" class=\"css\"></TD>
</TR>
</table>
</center>
</BODY>
</HTML>
<% end if %>
Mvh. MATR
