A ampy Medlem sedan feb. 2001 1 498 inlägg Trådstart 20 maj 2001 10:06 #1 Jag håller på med ett community. Men jag vill så att en ska bli medlem och namnet redan finns så ska det stå. Hur gör man?
Ska man lääga in det i den här koden?
<%
IF Request.Form("losen") = Request.Form("losen2") THEN
Set connection = server.createObject("adodb.connection")
connection.open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("db.mdb") & ";"
SQL = "INSERT INTO anvandare (Namn, Losen) VALUES ('" & Request.Form("ID") &"','" & Request.Form("losen") &"')"
set RS = Connection.Execute(SQL)
Response.Redirect("loggain.asp")
ELSE
session("galet") = "Du måste skriva lika lösen i båda fälten!"
Response.Redirect("blimedlem.asp")
END IF
%>
P PatrikB Medlem sedan mars 2000 2 836 inlägg ok,
du kan använda denna kod om du ändrar för fältet namn i databasen.
Det ska vara indexerat och inga dubbletter ska tillåtas.
Det du behöver lägga till din kod då är:
<%
IF Request.Form("losen") = Request.Form("losen2") THEN
[b]On Error Resume Next[/b]
Set connection = server.createObject("adodb.connection")
connection.open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("db.mdb") & ";"
SQL = "INSERT INTO anvandare (Namn, Losen) VALUES ('" & Request.Form("ID") &"','" & Request.Form("losen") &"')"
set RS = Connection.Execute(SQL)
[b]If err.Number <> 0 Then
Session("galet") = "Användarnamnet redan upptaget."
Response.Redirect "blimedlem.asp"
Else
Response.Redirect("loggain.asp")
End If[/b]
ELSE
session("galet") = "Du måste skriva lika lösen i båda fälten!"
Response.Redirect("blimedlem.asp")
END IF
%>
cya,
PatrikB
A ampy Medlem sedan feb. 2001 1 498 inlägg Tack så mycket, det funkade.
cyprys Medlem sedan dec. 2000 3 563 inlägg Att göra ett community verkar vara en slags tenta för att visa att man kan skriva ASP nuför tiden.
Precis som en dator så ska alla nu även ha ett community.
Vide Medlem sedan dec. 1999 8 577 inlägg Att bygga ett community är faktiskt ett väldigt bra sätt att lära sig... det innefattar allt ifrån enkel syntax till databasdesign...