Kan nån visa vart jag ska lägga in följande koden:
Snälla skriv hela koden!!
If NOT request.form("formulärfält") = "" Then
'Lägg ner i databasen
Else
'skicka tillbaka besökaren
End if
Och så här ser koden ut:
<%
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/medlemmar.mdb") & ";"
namn = Request.Form("ID")
NamnEfter = Request.Form("NamnEfter")
Epost = Request.Form("Epost")
set rs = connection.execute("select 1 from medlemmar where namn = '" & namn & "'")
if rs.eof then
SQL = "INSERT INTO medlemmar (Namn, Losen, NamnEfter, Epost) VALUES ('" & namn &"','" & Request.Form("losen") &"','" & NamnEfter &"','" & Epost &"')"
Connection.Execute SQL,,128
ok = true
else
session("galet") = namn & " är redan upptaget!"
ok = false
end if
rs.close
set rs = nothing
connection.close
set connection = nothing
if ok then
response.redirect "default.asp"
else
response.redirect "blimedlem.asp"
end if
else
session("galet") = "Du måste skriva samma lösenord i båda fälten!"
Response.Redirect "blimedlem.asp"
end if
%>
Förlåt jag hade inte läst ditt tidigare innlägg.... Försök att fortsätta på din gamla tråd i stället för att öppna en ny....Det blir lättare för dom som vill hjälpa till.. :)
------------------
Är man medlem på WF så behöver man inga vänner !
[Redigerat av Tobbster den 08 aug 2001]
1976 ms totalt · 4 externa anrop · v20260731065814-full.6fe65c25