11 svar · 166 visningar · startad av Online_do
Eftersom jag inte får något vetigt svar på hur man kollar om användarnamnet finns så tänkte jag ifall någon har ett asp script som har:
En databaskopling
Något som kollar så att alla fälten är ifyllda och om ANVÄNDARNAMNET är ledigt.
Sedan en rad där man ska lägga in sitt formulär.
Jag tror nog att någon kan detta.
Jag hoppas jag kan få ett script och Inte en rad eller två som man inte vet var man ska lägga.
MVH
Joakim
------------------
What is he doing?...
Moment 22 is my vote....
På sättet du frågas säger du att du inte vill ha kod men föratt göra det du frågar efter krävs kod...
Nej, det finns inga "universal lösningar", beklagar men så är verkligheten.
---
Ett färdigt skript ("färdig kod" är närmare sanningen...) är lite rader som du måste lägga in själv...
------------------
"Never underestimate your opponents." - Name the movie.
Rörigt för dig kanske... Men jag har bara kopierat den ifrån min egen sida!
En bit på vägen iallafall:
If Len(Trim(Request.Form("UName"))) > 1 Then
mySQL = "SELECT * FROM userTable WHERE userName = '" & Trim(Request.Form("UName")) & "'"
Set objRS = objConn.Execute(mySQL)
If objRS.EOF Then
UName = Trim(Request.Form("UName"))
C4 = 1
objRS.Close
Set objRS = Nothing
Else
UName = "Användarnamnet är upptaget! - <a href=""javascript:history.back(-1);"" class=""links"">Rätta till</a>"
C4 = 0
End If
Else
UName = "Felaktigt användarnamn - <a href=""javascript:history.back(-1);"" class=""links"">Rätta till</a>"
C4 = 0
End If
------------------
"I have to return some video tapes" - Patrick Bateman, American Psycho
Your wish is my command ;)
------------------
"I have to return some video tapes" - Patrick Bateman, American Psycho
din kod du la ut i förra inlägget, prova det här:
<!-- #INCLUDE FILE="inc/adovbs.inc" -->
<HTML><HEAD>
<META content="text/html; charset=windows-1252" http-equiv=Content-Type><LINK
href="css/style7.css" rel=stylesheet>
<STYLE>BODY { BACKGROUND-COLOR: lightblue } </STYLE>
<META content="Microsoft FrontPage 4.0" name=GENERATOR></HEAD>
<BODY>
<% Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=d:\databasen.mdb"
Set RecSet = Server.CreateObject("ADODB.Recordset") %>
<% '============================= %>
<% ' Skapa användare %>
<% '============================= %>
<% If Request.QueryString("alt") = "createuser" Then %>
<p align="center" style="margin-bottom: -15"><b><font face="Verdana" size="5">Registrering för ett nytt
konto hos MciDonkan</font></b></p>
<p align="center" style="margin-bottom: -1"><font face="Verdana" size="2"><a href="default.asp">Tillbaka</a></font></p>
<hr noshade size="0" color="#000000" width="75%">
<script type="text/javascript">
function validateForm(){
if (document.f.namn.value==""){
alert("Du heter väl något?");
return false;
} else if (document.f.email.value.indexOf("@") == -1){
alert("Alla har en e-post nu förtiden. Annars är det dags att du skaffar det.");
return false;
} else if (document.f.arh.value==""){
alert("Fylla i 19 och sedan det år. T.ex. om du är född 87 så ska du skriva 1987.");
return false;
} else if (document.f.manad.value==""){
alert("Du måste fylla i vilken månad du är född i.");
return false;
} else if (document.f.stad.value==""){
alert("I vilken stad eller by bor du?");
return false;
} else if (document.f.dag.value==""){
alert("Du måste fylla i vilken dag du är född på.");
return false;
} else if (document.f.username.value==""){
alert("Du måste ha ett användarnamn!");
return false;
} else if (document.f.password.value==""){
alert("Du måste ha ett lösenord.");
return false;
} else if (!document.f.access.checked) {
alert("Du måste fylla i kryssrutan så att du kan bli medlem.");
return false;
} else {
alert("Yippie! Nu ska vi se om du kan bli medlem. ");
return true;
}
}
</script>
<form name="f" onSubmit="return validateForm()" method="POST" action="reg.asp?alt=create">
<div align="center">
<table border="1" width="545" height="272" bordercolorlight="#000000" bordercolordark="#000000">
<tr>
<td width="185" height="1" valign="top" bordercolorlight="#B0D8E8" bordercolordark="#B0D8E8">
<p align="left" style="margin-left: 2; margin-right: 2">Namn (Efternamn frivilligt):
</p>
</td>
<td width="344" height="1" valign="top" bordercolorlight="#B0D8E8" bordercolordark="#B0D8E8">
<input type="text" name="namn" size="15" onblur="this.style.backgroundColor='';" onfocus="this.style.backgroundColor='#CCCCCC';" value="Tönt">
</td>
</tr>
<tr>
<td width="185" height="12" valign="top" bordercolorlight="#B0D8E8" bordercolordark="#B0D8E8">
<p align="left" style="margin-left: 2; margin-right: 2">Kön:
</p>
</td>
<td width="344" height="12" valign="top" bordercolorlight="#B0D8E8" bordercolordark="#B0D8E8">
<select size="1" name="kon">
<option>..:: Välj här ::..</option>
<option>Tjej</option>
<option>Kille</option>
<option>Kvinna</option>
<option>Man</option>
</select>
</td>
</tr>
<tr>
<td width="185" height="12" valign="top" bordercolorlight="#B0D8E8" bordercolordark="#B0D8E8">
<p align="left" style="margin-left: 2; margin-right: 2">Ålder:
</p>
</td>
<td width="344" height="12" valign="top" bordercolorlight="#B0D8E8" bordercolordark="#B0D8E8">
<input type="text" name="arh" size="4" value="1900" onblur="this.style.backgroundColor='';" onfocus="this.style.backgroundColor='#CCCCCC';"> <input type="text" name="manad" size="12" value="Januari" onblur="this.style.backgroundColor='';" onfocus="this.style.backgroundColor='#CCCCCC';">
<input type="text" name="dag" size="2" value="01" onblur="this.style.backgroundColor='';" onfocus="this.style.backgroundColor='#CCCCCC';">
</td>
</tr>
<tr>
<td width="185" height="14" valign="top" bordercolorlight="#B0D8E8" bordercolordark="#B0D8E8">
<p align="left" style="margin-left: 2; margin-right: 2">Bor
(stad):
</p>
</td>
<td width="344" height="14" valign="top" bordercolorlight="#B0D8E8" bordercolordark="#B0D8E8">
<input type="text" name="stad" size="25" value="Någonstans i Sverige" onblur="this.style.backgroundColor='';" onfocus="this.style.backgroundColor='#CCCCCC';">
</td>
</tr>
<tr>
<td width="185" height="12" valign="top" bordercolorlight="#B0D8E8" bordercolordark="#B0D8E8">
<p align="left" style="margin-left: 2; margin-right: 2">Landskap:</p>
</td>
<td width="344" height="12" valign="top" bordercolorlight="#B0D8E8" bordercolordark="#B0D8E8">
<select size="1" name="landskap">
<option>..:: Välj här ::..</option>
<option>Blekinge</option>
<option>Bohuslän</option>
<option>Dalarna</option>
<option>Dalsland</option>
<option>Gotland</option>
<option>Gästrikland</option>
<option>Halland</option>
<option>Hälsingland</option>
<option>Härjedalen</option>
<option>Jämtland</option>
<option>Lappland</option>
<option>Medelpad</option>
<option>Norrbotten</option>
<option>Närke</option>
<option>Skåne</option>
<option>Småland</option>
<option>Södermanland</option>
<option>Uppland</option>
<option>Värmland</option>
<option>Västerbotten</option>
<option>Västergötland</option>
<option>Västmanland</option>
<option>Ångermanland</option>
<option>Öland</option>
<option>Östergötland</option>
</select>
</td>
</tr>
<tr>
<td width="185" height="12" valign="top" bordercolorlight="#B0D8E8" bordercolordark="#B0D8E8">
<p align="left" style="margin-left: 2; margin-right: 2">Jag har/är
(Ögonfärg, Hårfärg, Längd) </p>
</td>
<td width="344" height="12" valign="top" bordercolorlight="#B0D8E8" bordercolordark="#B0D8E8">
<select size="1" name="ogon">
<option>Gröna</option>
<option>Blåa</option>
<option>Bruna</option>
<option>Svarta</option>
<option>Blågröna</option>
<option>Oranga</option>
<option>Vet inte</option>
<option>Annan Färg</option>
</select> <select size="1" name="har">
<option>Blond</option>
<option>Svart</option>
<option>Brun</option>
<option>Melerade</option>
<option>Färgat</option>
<option>Vadå färg?</option>
<option>Gul/Vit (ej blond)</option>
<option>Annan Färg</option>
</select> <select size="1" name="langd">
<option><130</option>
<option><135</option>
<option><140</option>
<option>140></option>
<option>145></option>
<option>150></option>
<option>155></option>
<option>160></option>
<option>165></option>
<option>170></option>
</select>
</td>
</tr>
<tr>
<td width="185" height="12" valign="top" bordercolorlight="#B0D8E8" bordercolordark="#B0D8E8">
<p align="left" style="margin-left: 2; margin-right: 2">Har du handlat på Internet:</p>
</td>
<td width="344" height="12" valign="top" bordercolorlight="#B0D8E8" bordercolordark="#B0D8E8">
<select size="1" name="hpi">
<option>Ja</option>
<option>Nej</option>
</select>
</td>
</tr>
<tr>
<td width="185" height="12" valign="top" bordercolorlight="#B0D8E8" bordercolordark="#B0D8E8">
<p align="left" style="margin-left: 2; margin-right: 2">Vad har du
för Internet:</p>
</td>
<td width="344" height="12" valign="top" bordercolorlight="#B0D8E8" bordercolordark="#B0D8E8">
<select size="1" name="modem">
<option>Modem - 14.4 - 56 v.90</option>
<option>ISDN 1/2 Kanal</option>
<option>ADSL</option>
<option>Com Hem</option>
<option>Satelit/Parabol</option>
<option>Kabel/Bredband</option>
<option>Radio</option>
</select>
</td>
</tr>
<tr>
<td width="185" height="20" valign="top" bordercolorlight="#B0D8E8" bordercolordark="#B0D8E8">
<p style="margin-left: 2; margin-right: 2">Icq Nummer (lämna denna
tom ifall du inte har något):
</td>
<td width="344" height="20" valign="top" bordercolorlight="#B0D8E8" bordercolordark="#B0D8E8">
<input type="text" name="icq" size="15" onblur="this.style.backgroundColor='';" onfocus="this.style.backgroundColor='#CCCCCC';">
</td>
</tr>
<tr>
<td width="185" height="-2" valign="top" bordercolorlight="#B0D8E8" bordercolordark="#B0D8E8">
<p style="margin-left: 2; margin-right: 2">Vilka Spel spelar du helst:
</td>
<td width="344" height="-2" valign="top" bordercolorlight="#B0D8E8" bordercolordark="#B0D8E8">
<select size="1" name="spel">
<option>..:: Välj här ::..</option>
<option>Bil/Motor</option>
<option>Strategi</option>
<option>Action/Döda & Skjuta</option>
<option>Kunskapsspel</option>
<option>Sport</option>
<option>Blandat</option>
<option>Annat</option>
</select>
</td>
</tr>
<tr>
<td width="185" height="16" valign="top" bordercolorlight="#B0D8E8" bordercolordark="#B0D8E8">
<p align="left" style="margin-left: 2; margin-right: 2; margin-bottom: -15">Berätta lite om dig:</p>
<p align="left" style="margin-left: 2; margin-right: 2; margin-bottom: -15">(Här
berättar du lite om dig som inte finns där uppe. T.ex. du kan skriva
ifall du har någon annan e-mail också eller hur du är som person
och lite sådant) </p>
<p align="left" style="margin-left: 2; margin-right: 2; margin-bottom: -15"> </p>
</td>
<td width="344" height="16" valign="top" bordercolorlight="#B0D8E8" bordercolordark="#B0D8E8">
<textarea rows="6" name="om" cols="60" onblur="this.style.backgroundColor='';" onfocus="this.style.backgroundColor='#CCCCCC';"></textarea>
</td>
</tr>
<tr>
<td width="185" height="12" valign="top" bordercolorlight="#B0D8E8" bordercolordark="#B0D8E8">
<p align="left" style="margin-left: 2; margin-right: 2">Användarnamn:
</p>
</td>
<td width="344" height="12" valign="top" bordercolorlight="#B0D8E8" bordercolordark="#B0D8E8">
<input type="text" name="username" size="15" onblur="this.style.backgroundColor='';" onfocus="this.style.backgroundColor='#CCCCCC';">
</td>
</tr>
<tr>
<td width="185" height="12" valign="top" bordercolorlight="#B0D8E8" bordercolordark="#B0D8E8">
<p align="left" style="margin-left: 2; margin-right: 2">Lösenord: </p>
</td>
<td width="344" height="12" valign="top" bordercolorlight="#B0D8E8" bordercolordark="#B0D8E8">
<input type="password" name="password" size="15" onblur="this.style.backgroundColor='';" onfocus="this.style.backgroundColor='#CCCCCC';">
</td>
</tr>
<tr>
<td width="185" height="12" valign="top" bordercolorlight="#B0D8E8" bordercolordark="#B0D8E8">
E-post:
</td>
<td width="344" height="12" valign="top" bordercolorlight="#B0D8E8" bordercolordark="#B0D8E8">
<input type="text" name="email" size="15" onblur="this.style.backgroundColor='';" onfocus="this.style.backgroundColor='#CCCCCC';">
</td>
</tr>
<tr>
<td width="545" height="62" valign="middle" bordercolorlight="#B0D8E8" bordercolordark="#B0D8E8" colspan="2">
<p align="center" style="margin: 5"> </p>
<hr noshade size="0" color="#000000" width="75%">
<p align="center" style="margin: 5"> <input type="radio" value="B" checked name="Access">
Jag accepterar reglerna och
vill bli medlem. Läs reglerna</p>
<p align="center" style="margin: 5"><input type="reset" value="Neej! Jag vill börja om" name="B2">
<input type="submit" value="Yippi! Jag vill bli medlem" name="B1"></p>
</td>
</tr>
</table>
</div>
</form>
<% ElseIf Request.QueryString("alt") = "create" Then %>
<div align="center">
<center>
<table border="1" width="594" height="28" bordercolorlight="#B0D8E8" bordercolordark="#B0D8E8">
<tr>
<td width="594" height="28" bordercolorlight="#000000" bordercolordark="#000000" bgcolor="#B0D8E8">
<p style="margin-left: 5; margin-right: 5; margin-bottom: -15" align="center"> </p>
<p style="margin-left: 5; margin-right: 5; margin-bottom: -15" align="center"><b><font size="5" face="Verdana" color="#000000">Grattis!
<img border="0" src="IMAGES/SBILDER/ikon_svamp.gif"></font></b></p>
<p style="margin-left: 5; margin-right: 5"><b><font face="Arial" size="2">Välkommen
som medlem till MciDonkan. Gå till startsidan och logga in. STARTSIDAN</font></b></p>
<p> </td>
</tr>
</table>
</center>
</div>
<%
SQL="SELECT * From users WHERE Username= '"& Request.Form("username") &"'"
set rst=conn.execute(SQL)
if not rst.eof then
response.write "Användarnamnet är upptaget!"
rst.close
Else
Visa = "SELECT * FROM users"
RecSet.Open Visa, Connect, adOpenStatic, adLockOptimistic
RecSet.AddNew
RecSet("Username") = Request.Form("username")
RecSet("Password") = Request.Form("password")
RecSet("email") = Request.Form("email")
RecSet("Access") = Request.Form("access")
RecSet("namn") = Request.Form("namn")
RecSet("arh") = Request.Form("arh")
RecSet("manad") = Request.Form("manad")
RecSet("dag") = Request.Form("dag")
RecSet("landskap") = Request.Form("landskap")
RecSet("stad") = Request.Form("stad")
RecSet("kon") = Request.Form("kon")
RecSet("spel") = Request.Form("spel")
RecSet("om") = Request.Form("om")
RecSet("ogon") = Request.Form("ogon")
RecSet("har") = Request.Form("har")
RecSet("langd") = Request.Form("langd")
RecSet("hpi") = Request.Form("hpi")
RecSet("modem") = Request.Form("modem")
RecSet("icq") = Request.Form("icq")
RecSet.Update
End If %>
<p>
<% RecSet.Close
End If %>
</BODY></HTML>
Om du tvunget vill ha ett js popup fönster så måste man flytta om i koden lite
[Redigerat av aleborg den 08 apr 2001]
[Redigerat av aleborg den 08 apr 2001]
Prova det först :e
Det funkade inte... :(
Det kom up något om att objekt krävs.
sen visa den till denna:
set rst=conn.execute(SQL)
------------------
What is he doing?...
Det står Connect.Open rätt långt upp i koden, ändra det till Conn.Open
------------------
"Never underestimate your opponents." - Name the movie.