8 svar · 183 visningar · startad av Hallgren
Mm, fått ett syntax error på den här lilla koden. Det är jag och mina If-sattser som ska bråka. :e
<%
if trim(request.form("namn")) = "" then
response.redirect "noname.asp"
elseIf
session ("namn") = request.form("namn")
response.redirect "reg.asp"
else
namn = Request.Form("namn")
pass = Request.Form("pass")
Set dbConn = Server.Createobject("ADODB.connection")
dbConn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.Mappath("medlem.mdb")
list = "SELECT * FROM medlem WHERE namn='" & namn & "' AND pass='" & pass & "' "
Set rs = dbConn.Execute(list)
If rs.EOF Then
Session("logged_status") = FALSE
Response.redirect("error.asp")
Else
Session("inloggad") = 1
Response.Redirect ("sida1.asp")
end if
end if
%>
------------------
Forumledare, webForum
Du måste ge ett uttryck till "elseIf".
if trim(request.form("namn")) = "" then
response.redirect "noname.asp"
elseIf uttryck Then
http://www.devguru.com/Technologies/vbscript/quickref/if.html
------------------
"For every fatal shooting, there were roughly three
non-fatal shootings. And, folks, this is unacceptable
in America. It's just unacceptable. And we're
going to do something about it."
-G. W. Bush
un.eyebew
Om request.form("namn") = "" indikerar att inget är skrivet i "namn" hur gör man då för att få det att indikera att något är skrivet?
------------------
Forumledare, webForum
För att kontrollera om det finns ett värde:
if trim(request.form("namn")) <> "" then
Jag förstår inte vad du vill åstadkomma med din kod. Förklara lite tack, speciellt med grenen med elseif.
------------------
essentitia preter non sans multiplicandum
<%
if trim(request.form("namn")) = "" then
response.redirect "noname.asp"
elseIf
trim(request.form("namn")) <> "" And trim(request.form("pass")) = "" then
session ("namn") = request.form("namn")
response.redirect "reg.asp"
else
namn = Request.Form("namn")
pass = Request.Form("pass")
Set dbConn = Server.Createobject("ADODB.connection")
dbConn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.Mappath("medlem.mdb")
list = "SELECT * FROM medlem WHERE namn='" & namn & "' AND pass='" & pass & "' "
Set rs = dbConn.Execute(list)
If rs.EOF Then
Session("logged_status") = FALSE
Response.redirect("error.asp")
Else
Session("inloggad") = 1
Response.Redirect ("sida1.asp")
end if
end if
%>
Syntax på elseif igen.
Om man inte skriver in sitt namn så ska man komma til en sida som påpekar detta, om man skriver in sitt namn men inte lösen så ska man komma till en reg. sida annars (man skriver in namn och lösen) så ska en kolla db om användare finns. :)
------------------
Forumledare, webForum
[Redigerat av Hallgren den 28 sep 2001]
if trim(request.form("namn")) = "" then
response.redirect "noname.asp"
elseIf trim(request.form("namn")) <> "" And trim(request.form("pass")) = "" then
session ("namn") = request.form("namn")
response.redirect "reg.asp"
else
------------------
"For every fatal shooting, there were roughly three non-fatal shootings. And, folks, this is unacceptable in America. It's just unacceptable. And we're going to do something about it."
-G. W. Bush
un.eyebew
Nu är jag med
<%
if trim(request.form("namn")) = "" then
response.redirect "noname.asp"
elseIf [b]trim(request.form("pass")) = "" then[/b]
session ("namn") = request.form("namn")
response.redirect "reg.asp"
else
------------------
essentitia preter non sans multiplicandum