---
title: "Ingen fel meddelande"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/161538-ingen-fel-meddelande"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "SGuncel"
published: "2007-06-15T12:52:43.000Z"
updated: "2007-06-17T18:14:37.000Z"
replies: 13
views: 646
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/161538-ingen-fel-meddelande"
---
# Ingen fel meddelande
## #1 — SGuncel, 2007-06-15T12:52Z
Får inte fel meddelandet när jag skriver in fel anv och lösen.
Jag kommer till gamla login sidan när jag testar skriva fel anv och lösen.
```
Namnlös 1
Glömt Lösenord Skriv in ditt användarnamn så skickas ditt lösenord till din mail.
<%
If Request.Querystring("user") = "logIn" then
Set ObjRS = ObjConn.Execute("SELECT * FROM TLUsers where UsrTLAlias='"& SafeSQL(Request.Form("UsrTLAlias")) &"' AND UsrPassword='"& SafeSQL(Request.Form("UsrPassword")) &"'")
If ObjRS.Eof then
%>
<%
Else
Session.TimeOut = 15
Session("UsrTLAlias") = ObjRS("UsrTLAlias")
Session("UsrID") = ObjRS("UsrID")
Session("UsrLogin") = "UsrOnline"
ObjConn.Execute("Update TLUsers set UsrLastLogin='" & now() & "', UsrLoginIP='"&SafeSQL(Request.ServerVariables("REMOTE_ADDR"))&"', UsrStats='Online', UsrTotalLogin=UsrTotalLogin+1 where UsrID="&SafeSQL(Session("UsrID"))&"")
ObjConn.Close : Set ObjConn = nothing
End If
Response.Redirect "../Main/RegisterFinish_Check.asp"
End If
%>
```
Permalänk: https://www.webforum.nu/p/161538
## #2 — @nders, 2007-06-15T19:31Z
Om du försöker undvika att posta en miljon irrelevanta kodrader så är det betydligt enklare för oss att hjälpa till.
Hur vet vi vilken den "gamla loginsidan" är? Hur vet vi vilken den nya är?
Beskriv felet lite närmare, och posta endast relevant kod.
Permalänk: https://www.webforum.nu/p/1993536
## #3 — SGuncel, 2007-06-16T00:12Z
Den gamla ligger i en mapp som heter Login och nya i en mapp som heter New Login.
När jag skriver fel användarnamn och lösenord så kommer jag till gamla login sidan "Login/Default.asp" istället för att komma till "New Login/Default.asp"
Denna kod ska ge fel meddelandet och skicka till nya login sidan. Men den skickar till gamla login sidan.
```
```
Permalänk: https://www.webforum.nu/p/1993565
## #4 — emission, 2007-06-16T01:00Z
Med den koden kommer man att redirectas till "../Main/RegisterFinish_Check.asp" oavsett hur inloggningen går. Javascriptet kommer aldrig att köras, eftersom en Response.Redirect gör att inget skrivs ut på sidan.
Permalänk: https://www.webforum.nu/p/1993567
## #5 — SGuncel, 2007-06-16T10:33Z
Om man har nyligen blivit reggad och loggar in så kommer man till "../Main/RegisterFinish_Check.asp" Där kollar den om man har fyllt i extra uppgifter om man har gjort det skickas man till sidan men om man inte gjort det skickas man till sidan där det finns extra uppgifter.
Så här ser mina nuvarande login kod ut som jag använder på min gamla login sida.
```
<%
Set ObjRS = ObjConn.Execute("Select * From TLUsers where UsrTLAlias='"&SafeSQL(Request.Form("UsrTLAlias"))&"'" & " and UsrPassword='"&SafeSQL(Request.Form("UsrPassword"))&"'")
IF ObjRS.Eof then
Session("loginerror")="Du har skrivit in fel lösenord eller användarnamn. Försök igen!"
Else
Session("UsrTLAlias") = ObjRS("UsrTLAlias")
Session("UsrID") = ObjRS("UsrID")
Session("UsrAdmin") = ObjRS("UsrAdmin")
Session.TimeOut = 15
Session("UsrLogin") = "UsrOnline"
ObjConn.Execute("Update TLUsers set UsrLastLogin='" & now() & "', UsrLoginIP='"&SafeSQL(Request.ServerVariables("REMOTE_ADDR"))&"', UsrStats='Online', UsrTotalLogin=UsrTotalLogin+1 where UsrID="&SafeSQL(Session("UsrID"))&"")
ObjConn.Close : Set ObjConn = nothing
End If
Response.Redirect "../Main/RegisterFinish_Check.asp"
%>
```
Permalänk: https://www.webforum.nu/p/1993624
## #6 — emission, 2007-06-16T12:38Z
> **SGuncel skrev:**
>
> Om man har nyligen blivit reggad och loggar in så kommer man till "../Main/RegisterFinish_Check.asp"
Man blir skickad dit så fort man försöker logga in, oavsett om man lyckas eller inte.
Permalänk: https://www.webforum.nu/p/1993655
## #7 — SGuncel, 2007-06-16T13:35Z
Nej, det är inte så. Om amn skriver fel användarnamn och lösenord så skickas man till login sidan men om amn skriver in korrekt användarnamn och lösenord så skickas man till "../Main/RegisterFinish_Check.asp".
Permalänk: https://www.webforum.nu/p/1993669
## #8 — emission, 2007-06-16T15:09Z
Jo, det är visst så! Sedan är det väl någon sessionkontroll eller något på RegisterFinish_Check.asp som gör att du skickas tillbaka till gamla login-sidan...
Permalänk: https://www.webforum.nu/p/1993688
## #9 — SGuncel, 2007-06-16T22:22Z
Japp.
```
<%
If NOT Session("UsrLogin")="UsrOnline" Then
ObjConn.Close : Set ObjConn = Nothing
Session("meddelande") = ""
Response.Redirect "../Login/Default.asp"
End If
%>
```
Men hur kan jag lösa detta problemet?
Permalänk: https://www.webforum.nu/p/1993782
## #10 — emission, 2007-06-17T09:48Z
Du får väl låta bli att skicka användaren till RegisterFinish_Check.asp om inloggningen misslyckas, eller låta Sessions-kollen på RegisterFinish_Check.asp skicka tillbaka till den nya Login-sidan....
Permalänk: https://www.webforum.nu/p/1993825
## #11 — SGuncel, 2007-06-17T10:09Z
Vilket skulle du rekommendera?
Permalänk: https://www.webforum.nu/p/1993834
## #12 — emission, 2007-06-17T12:49Z
Både och. Det finns ingen anledning att skicka vidare till RegisterFinish_Check.asp om inloggningen misslyckas, och Sessions-kollen ska väl alltid skicka tillbaka till den rätta inloggningssidan?
Permalänk: https://www.webforum.nu/p/1993868
## #13 — SGuncel, 2007-06-17T13:47Z
```
<%
If Request.Querystring("user") = "logIn" then
Set ObjRS = ObjConn.Execute("SELECT * FROM TLUsers where UsrTLAlias='"& SafeSQL(Request.Form("UsrTLAlias")) &"' AND UsrPassword='"& SafeSQL(Request.Form("UsrPassword")) &"'")
If ObjRS.Eof then
%>
// Här kommer fel meddelandet, om man har skrivit fel så skickas man vidare till login sidan.
<%
Else
Session.TimeOut = 15
Session("UsrTLAlias") = ObjRS("UsrTLAlias")
Session("UsrID") = ObjRS("UsrID")
Session("UsrLogin") = "UsrOnline"
ObjConn.Execute("Update TLUsers set UsrLastLogin='" & now() & "', UsrLoginIP='"&SafeSQL(Request.ServerVariables("REMOTE_ADDR"))&"', UsrStats='Online', UsrTotalLogin=UsrTotalLogin+1 where UsrID="&SafeSQL(Session("UsrID"))&"")
ObjConn.Close : Set ObjConn = nothing
End If
// Här skickas man till sidan om inloggningen lyckas.
Response.Redirect "../Main/frameset.asp"
End If
%>
```
Permalänk: https://www.webforum.nu/p/1993877
## #14 — Troxy, 2007-06-17T18:14Z
En irrelevant fråga kanske, men man använder väl inte // för kommentarer i VbScript? Du borde få felmeddelanden va?
Permalänk: https://www.webforum.nu/p/1993940
---
Tråden på webben: https://www.webforum.nu/amne/asp/161538-ingen-fel-meddelande