manglendne tilbagemelding
hejdet der ikke virker er hvis de feks. vil oprette sig som bruger og gør dette med et telefonnummer som er i databasen i forvejen skulle den gerne vise en fejlmelding men den går bare i stå
feks:
<%
SELECT CASE request("fejl")
case 1 fejltekst="Brugernavn / Password var ugyldigt"
case 2 fejltekst="En anden er oprettet på samme telefonnummer. Hvis det er en fejl, kontakt venligst Webmaster via adressen: "&webmaster
case 3 fejltekst="Telefonnummeret må kun indeholde tal"
END SELECT
%>
kan i se hvor fejlen ligger her er hele siden:
--------------
<%mode=request("mode")
if mode="login" then
bruger=dbfix(request("bruger"))
password=dbfix(request("password"))
set login=connect.execute("SELECT * FROM tblbruger WHERE telefon='"&bruger&"' AND password='"&password&"' ")
if login.eof then
login.close
set login=nothing
close_db()
response.redirect ("side11.asp?mode=tilmeld&fejl=1")
else
response.cookies("chrbruger")("navn")=login("fornavn")&" "&login("efternavn")
response.cookies("chrbruger")("email")=login("email")
response.cookies("chrbruger").expires=date+365
if login("gem_login")=1 then
response.cookies("chrbruger")("bruger")=login("telefon")
response.cookies("chrbruger")("password")=login("password")
end if
brugerlogin(login("id_bruger"))
login.close
set login=nothing
redirect="side03.asp"
if request("redirect")<>"" then
redirect=request("redirect")
end if
%>
<script language=javascript>
parent.mainframe.location=("<%=redirect%>")
alert("Du er logget ind som <%=session("chrbrugernavn")%>!")
</script>
<%
close_db()
end if
end if
if mode="logaf" then
session.abandon
close_db()
response.redirect ("side03.asp")
end if
if mode="tilmeld" then
Set uplp = Server.CreateObject("Softartisans.FileUpProgress")
Dim ProgressID
ProgressID = uplp.NextProgressID%>
<!--#include file="side02.asp" -->
<table width="100%" border="0" cellspacing="0" cellpadding="2" align="center" bordercolorlight="#663300" bordercolordark="#FFFFFF"></form>
<tr><td width="100%" class=headcol background="/grafik/prg004.gif" height="21"><b>Oprettelse af ny bruger.</b></td></tr>
<tr><td class="boxcol"><p align="justify">Alle felter markeret med <b>FED</B> skrift skal udfyldes. Vi gør opmærksom på at brugernavnet fremover vil være dit telefonnummer. Hvis du ønsker at oplyse både fastnet nummer og mobil nummer, skal du indsætte et mellemrum
<br><br>
<%
SELECT CASE request("fejl")
case 1 fejltekst="Brugernavn / Password var ugyldigt"
case 2 fejltekst="En anden er oprettet på samme telefonnummer. Hvis det er en fejl, kontakt venligst Webmaster via adressen: "&webmaster
case 3 fejltekst="Telefonnummeret må kun indeholde tal"
END SELECT
%>
<%if fejltekst<>"" then%>
<script language=javascript>
alert("<%=fejltekst%>")
</script>
<%end if%>
</center>
</p>
<table class=headcol align=center width=300 cellspacing="0" cellpaddding="0" border="0"><form method=post name=nybruger enctype="multipart/form-data" target=dataframe2 action="side16.asp?mode=opret&progressid=<%=ProgressID%>"><tr><td width=150> </td><td align=right width=150><input class=input1 type=hidden name=ip value="<%=Request.ServerVariables("REMOTE_ADDR")%>" size="25"></td></tr><tr><td width=150> Firmanavn</td><td align=right width=150><input class=input1 type=text name=firma value="<%=request("firma")%>" size="25"></td></tr><tr><td width=150> <b>Fornavn</b></td><td align=right width=150><input class=input1 type=text name=fornavn value="<%=request("fornavn")%>" size="25"></td></tr><tr><td> <b>Efternavn</b></td><td align=right><input class=input1 type=text name=efternavn value="<%=request("efternavn")%>" size="25"></td></tr><tr><td> <b>Telefon</b></td><td align=right><input class=input1 type=text name=telefon value="<%=request("bruger")%>" size="25"></td></tr><tr><td> <b>E-mail</b></td><td align=right><input class=input1 type=text name=email value="<%=request("email")%>" size="25"></td></tr><tr><td> <b>Post nr</b></td><td align=right><input class=input1 type=text name=postnr value="<%=request("postnr")%>" size="25"></td></tr><tr><td> </td><td align=right></td></tr><tr><td> <b>Password</b></td><td align=right><input class=input1 type=password name=password1 value="<%=request("password")%>" size="25"></td></tr><tr><td> <b>Gentag password</b></td><td align=right><input class=input1 type=password name=password2 value="<%=request("password")%>" size="25"></td></tr><tr><td colspan=2> <input type=checkbox name=gem_login value=1>Auto login</td><td> </td></tr><tr><td colspan=2> <input type=checkbox checked name=nyhedsbrev value=1>Nyhedsbrev</td><td> </td></tr></table>
<table align=center width=300 cellspacing="0" cellpaddding="0" border="0"><tr><td class=headcol height=6 colspan=2><img src=/grafik/prg010.gif></td></tr><tr><td height=1 colspan=2><img src=/grafik/prg010.gif></td></tr><tr><td class=headcol height=6 colspan=2><img src=/grafik/prg010.gif></td></tr><tr class=headcol><td colspan=2> <i>Billede til vores forum...</i></td></tr><tr class=headcol><td> Evt. foto</td><td align=right><input class=input1 type=file name=pic size="20"> </td></tr></form></table>
<br>
<div id=divprogress>
<table align=center width=100% cellspacing="0" cellpaddding="0" border="0"><tr><td align=right><a href="java script:check_post();"><b><span style="text-decoration: none"><font color="#000000">Gem mine oplysninger</font></span></b></a> <img src="grafik/prg008.gif"> </td></tr></table></div></td></tr></table>
<<script language=javascript>
document.mainform.bruger.focus();
function check_post(){
if (document.nybruger.fornavn.value=="")
alert("Der er ikke indtastet noget fornavn.")
else if (document.nybruger.efternavn.value=="")
alert("Der er ikke indtastet et efternavn.")
else if (document.nybruger.postnr.value=="")
alert("Der er ikke indtastet et postnr.")
else if (document.nybruger.telefon.value=="")
alert("Der er ikke indtastet et telefonnummer.")
else if (document.nybruger.password1.value=="")
alert("Der er ikke indtastet et password1.")
else if (document.nybruger.password1.value==document.nybruger.password2.value)
{parent.dataframe.location="/progress01.asp?progressid=<%=ProgressID%>";
document.nybruger.submit();}
else
alert("Password felter er ikke ens.")
}
</script>
<%
close_db()
end if
%>
-----------------
