sand/falsk
Jeg har lige et problem mere...jeg har denne checkbox, og når den er CHECKED, så skal den i databasen sætte kolonen til true.
<%
Response.Buffer = True
giga = request("giga")
if giga = "1" then
if request.form("password") = request.form("password2") then
SQL = "select * from commusers where brugernavn='" & request.form("brugernavn") & "'"
set rs = Conn.Execute(SQL)
if rs.eof then
SQLgem = "INSERT INTO commusers (navn, efternavn, brugernavn, password, mail) values ('" & request("navn") & "', '" & request("efternavn") & "', '" & request("brugernavn") & "', '" & request("password") & "', '" & request("mail") & "')"
Conn.Execute(SQLgem)
Response.Redirect("login.asp")
Else
Response.Write "Brugernavnet er taget... vælg venligst et andet"
rs.close
set rs = nothing
conn.close
set conn = nothing
end if
else
Response.write "De to passwords var ikke ens, prøv igen"
end if
end if
%>
<html>
<head>
<title>«Gigaload.dk«</title>
<link rel="StyleSheet" type="text/css" href="style/main.css">
</head>
<body>
<table width="800" cellspacing="0" cellpadding="0" align="center">
<tr>
<td colspan="5">
</td>
<tr>
<td colspan="5" height="20" valign="top" bgcolor="#1E272E">
<table border="0" width="800" height="19" cellspacing="0" cellpadding="0">
<tr>
<td width="400" height="19">
</td>
<td width="400" height="19" align="right">
<font color="#FFFFFF" face="Verdana" size="1">
<%
Response.write WeekDayName(WeekDay(Now, vbMonday), False, vbMonday) & " d. " & FormatDateTime(Now, vbLongDate)
%>
</font>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td width="150" bgcolor="#4F5C65" height="264" valign="top">
<!--#include file='inc/venstremenu.asp'-->
</td>
<td class="space20w">
</td>
<td width="460" valign="top">
<!--Start include main-->
<table class="hovedtabel" cellspacing="0" cellpadding="0">
<tr>
<td class="space5">
</td>
</tr>
<tr>
<td class="banner">
</td>
</tr>
<tr>
<td class="space5">
</td>
</tr>
<tr>
<td class="bighead">
Opret community bruger
</td>
</tr>
<tr>
<td class="xbox" valign="top">
<form action="opret.asp?giga=1" method="post">
<table border="0" width="460" cellspacing="0" cellpadding="0">
<tr>
<td width="460" colspan="2">
</td>
</tr>
<tr>
<td width="125" class="text">
Navn
</td>
<td width="335">
<input type="text" size="20" name="navn">
</td>
</tr>
<tr>
<td width="125" class="text">
Efternavn
</td>
<td width="335">
<input type="text" size="20" name="efternavn">
</td>
</tr>
<tr>
<td width="460" colspan="2">
</td>
</tr>
<tr>
<td width="125" class="text">
Brugernavn
</td>
<td width="335">
<input type="text" size="20" name="brugernavn">
</td>
</tr>
<tr>
<td width="125" class="text">
Password
</td>
<td width="335">
<input type="password" size="20" name="password">
</td>
</tr>
<tr>
<td width="125" class="text">
Gentag Password
</td>
<td width="335">
<input type="password" size="20" name="gentagpassword">
</td>
</tr>
<tr>
<td width="460" colspan="2">
</td>
</tr>
<tr>
<td width="125" class="text">
E-mail adr.
</td>
<td width="335">
<input type="text" size="20" name="mail">
</td>
</tr>
<tr>
<td width="125" class="text">
Nyhedsbrev
</td>
<td width="335">
<input type="checkbox" size="20" name="nyhedsbrev">
</td>
</tr>
<tr>
<td width="460" colspan="2">
</td>
</tr>
<tr>
<td width="460" colspan="2" class="text">
Vi skal bruge din e-mail i tilfælde af at du glemmer dit password.
</td>
</tr>
<tr>
<td width="460" colspan="2">
</td>
</tr>
<tr>
<td width="125">
</td>
<td width="335">
<input type="submit" value="Opret">
</td>
</tr>
</table>
</form>
<table border="0" width="460" cellspacing="0" cellpading="0">
<tr>
<td class="bighead">
Community Login
</td>
</tr>
<tr>
<td class="xbox">
Login her
<a href="community.asp?giga=2">
Login
</a>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td class="space10h">
</td>
</tr>
<tr>
<td class="bighead">
Copyright © Bluebird ApS
</td>
</tr>
</table>
<!--Slut include main-->
</td>
<td class="space20w"> </td>
<td width="150" bgcolor="#4F5C65" valign="top">
<!--#include file='inc/hojremenu.asp'-->
</td>
</tr>
</table>
<%
conn.close
conn = nothing
%>
</body>
</html>
