--- title: "Response.Redirect" type: "forum-thread" url: "https://www.webforum.nu/amne/asp/177428-response-redirect" topic: "ASP" topic_url: "https://www.webforum.nu/amne/asp" author: "ragnared" published: "2009-03-13T16:13:59.000Z" updated: "2009-03-14T12:40:39.000Z" replies: 13 views: 657 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/177428-response-redirect" --- # Response.Redirect ## #1 — ragnared, 2009-03-13T16:13Z Jag vill att när man har loggat in rätt så ska den ta med ett värde tex om det står under kat i databasen en 5 så ska den visa det längst ner: Det kan ju vara så att det är en ett hoppas ni förstår??? Tex: Response.Redirect "verktygslada.asp?kat=5" ``` <% Set Connect = Server.CreateObject("ADODB.Connection") Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("databas/main.mdb")&";pwd=Utz14trWQ" Set RecSet = Server.CreateObject("ADODB.Recordset") SQL = "Select * From login" RecSet.Open SQL, Connect, adOpenStatic, adLockOptimistic IF (RecSet.EOF or RecSet.BOF) then Session("mess") = "Databasen är tom!" Response.Redirect "verktygslada.asp" ELSE Do Until RecSet.EOF IF RecSet("email") = Request.Form("email") AND RecSet("losenord") = Request.Form("losenord") Then Session("check") = "111ok111" Session("passw") = "YtSQ12uTr" RecSet.Close Connect.Close Set RecSet = nothing Set Connect = nothing Response.Redirect "verktygslada1.asp" END IF RecSet.MoveNext Loop RecSet.Close Connect.Close Set RecSet = nothing Set Connect = nothing Session("mess") = "Fel användarnamn eller lösenord" [B]Response.Redirect "verktygslada.asp"[/B] END IF %> ``` Permalänk: https://www.webforum.nu/p/177428 ## #2 — ragnared, 2009-03-13T21:01Z Jag menar att när man klickar så ska den skicka en till verktygslada.asp?kat=5 eller 4 eller 3 beroende var användaren kar fått för kategori. När jag göra så här så får jag felmeddelande Response.Redirect "verktygslada1.asp?kat=" & Request.QueryString("kat")&" Permalänk: https://www.webforum.nu/p/2175090 ## #3 — Ledel, 2009-03-13T21:15Z Response.Redirect("verktygslada1.asp?kat=" & Request.QueryString("kat")) Borde fungera! Permalänk: https://www.webforum.nu/p/2175095 ## #4 — ragnared, 2009-03-13T21:23Z Får bara så här Permalänk: https://www.webforum.nu/p/2175098 ## #5 — ragnared, 2009-03-14T07:47Z Det jag menar är när man fyller i rätt anvnamn och lösen ska ska man slussas vidare till den grupp man ligger i Tex: Response.Redirect("verktygslada1.asp?grupp=" & Request.QueryString("kat")) men jag får inte det att funka. Permalänk: https://www.webforum.nu/p/2175137 ## #6 — budg1e, 2009-03-14T08:57Z Du måste ju hämta kategorin från din databas istället för med querystring. ``` Response.Redirect("verktygslada1.asp?kat=" & RecSet("kat")) ``` om nu fältet kategori heter kat i databasen Permalänk: https://www.webforum.nu/p/2175143 ## #7 — ragnared, 2009-03-14T08:59Z får detta felmeddelande nu; Körningsfel i Microsoft VBScript fel '800a000d' Inkompatibla typer: 'RecSet' /irene/kontroll.asp, rad 50 Permalänk: https://www.webforum.nu/p/2175144 ## #8 — budg1e, 2009-03-14T09:05Z hur ser rad 50 ut? Permalänk: https://www.webforum.nu/p/2175145 ## #9 — ragnared, 2009-03-14T09:08Z Rad 50 är den rad längre ner som jag har fet makerat: ``` <% Set Connect = Server.CreateObject("ADODB.Connection") Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("databas/main.mdb")&";pwd=Utz14trWQ" Set RecSet = Server.CreateObject("ADODB.Recordset") SQL = "Select * From login" RecSet.Open SQL, Connect, adOpenStatic, adLockOptimistic IF (RecSet.EOF or RecSet.BOF) then Session("mess") = "Databasen är tom!" Response.Redirect "verktygslada.asp" ELSE Do Until RecSet.EOF IF RecSet("email") = Request.Form("email") AND RecSet("losenord") = Request.Form("losenord") Then Session("check") = "111ok111" Session("passw") = "YtSQ12uTr" RecSet.Close Connect.Close Set RecSet = nothing Set Connect = nothing [B]Response.Redirect("verktygslada1.asp?kat=" & RecSet("kat"))[/B] END IF RecSet.MoveNext Loop RecSet.Close Connect.Close Set RecSet = nothing Set Connect = nothing Session("mess") = "Fel användarnamn eller lösenord" Response.Redirect "verktygslada.asp" END IF %> ``` Permalänk: https://www.webforum.nu/p/2175146 ## #10 — budg1e, 2009-03-14T09:09Z Du har ju stängt databasen innan du hämtat värdet i kat. Lägg kategorin i en variable innan du stänger med Recser.close Permalänk: https://www.webforum.nu/p/2175147 ## #11 — budg1e, 2009-03-14T09:11Z Typ... ``` Do Until RecSet.EOF IF RecSet("email") = Request.Form("email") AND RecSet("losenord") = Request.Form("losenord") Then Session("check") = "111ok111" Session("passw") = "YtSQ12uTr" kategori = RecSet("kat") RecSet.Close Connect.Close Set RecSet = nothing Set Connect = nothing Response.Redirect("verktygslada1.asp?kat=" & kategori) ``` Permalänk: https://www.webforum.nu/p/2175148 ## #12 — ragnared, 2009-03-14T09:11Z Tack så mycket förhjälpen alla snälla människor. Permalänk: https://www.webforum.nu/p/2175149 ## #13 — budg1e, 2009-03-14T09:12Z se ovan Permalänk: https://www.webforum.nu/p/2175150 ## #14 — rhdf, 2009-03-14T12:40Z varför krånglar alla till sina inloggningar? i den ovanstående koden så hämtas alla fält för samtliga användare och sen loopar man igenom det resultatet för att kolla om den som försöker logga in finns. Varför? Man vet ju att det bara är max 1 post man är ute efter, antingen finns användaren eller så finns han inte. i ovanstående är man ju dessutom bara intresserad av att få ut fältet "kat" så ``` SQL = "Select kat From login WHERE email ='"&Request.Form("email")&"' AND losenord = '"&Request.Form("losenord")&"'; " Set RecSet=Connect.Execute(SQL) If NOT RecSet.EOF Then Session("check") = "111ok111" Session("passw") = "YtSQ12uTr" RedirURL= "verktygslada1.asp?kat=" &RecSet(0) Else Session("mess") = "Databasen är tom!" RedirURL "verktygslada.asp" End If Recset.Close : Set RecSet=Nothing Connect.Close : Set Connect = Nothing Response.Redirect(RedirURL) ``` Lite skydd mot SQL-injections + lite annat finlir på det där så blir det finfint Permalänk: https://www.webforum.nu/p/2175172 --- Tråden på webben: https://www.webforum.nu/amne/asp/177428-response-redirect