--- title: "kolla lösenord innan gå vidare ?" type: "forum-thread" url: "https://www.webforum.nu/amne/asp/51534-kolla-lösenord-innan-gå-vidare" topic: "ASP" topic_url: "https://www.webforum.nu/amne/asp" author: "Pellefant" published: "2002-08-28T10:49:01.000Z" updated: "2002-08-28T22:45:25.000Z" replies: 9 views: 411 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/51534-kolla-lösenord-innan-gå-vidare" --- # kolla lösenord innan gå vidare ? ## #1 — Pellefant, 2002-08-28T10:49Z Ringrostig på ASP, SQL... ;-( Har en sida med 6 formulärfält, varav ett fält är email och ett annat fält är lösenord. Det finns en databastabell(access) med medlemmar där bla just email och lösenord finns. Innehållet i de övriga fyra fälten kommer att åka in i en annan tabell, förutsatt att email och lösenord är rätt. Har man fyllt i alla fälten(jag har ett javascript som ger en popup ruta om inte alla fält är ifyllda när man trycker på "skicka"), så vill jag först att det kollas i medlemstabellen om det finns en sådan email adress och i så fall om lösenordet matchar, om det stämmer gå vidare och lägga in övriga 4 saker i den andra tabellen, annars skriva ut att det är fel email och/eller lösenord. Hoppas det inte var för magstarkt att fråga allt detta. Tack på förhand. Permalänk: https://www.webforum.nu/p/51534 ## #2 — UnConed, 2002-08-28T11:14Z Nu snabbläste jag bara igenom detta pga stress.. Men du vill alltså kolla om man loggar in med rätt e-mail och rätt lösenord? Isånnafall bordet det se ut såhär: Öppna Recordset öppna connect öppna databas SQL = "SELECT \* From Users Where Email = '" & Request.Form("Email") "' And Password = '" & Request.Form("Password") & "'" Set RecSet = Connect.Execute(SQL) If RecSet.EOF Then Response.write "Fel användarnamn eller lösenord" Else Gör det andra sakerna.. End IF Permalänk: https://www.webforum.nu/p/764436 ## #3 — Pellefant, 2002-08-28T11:15Z Tack så hemskt mycket, nu har jag lite att gå på, så nu löser det sig nog. \*Tackar UnConed\* Permalänk: https://www.webforum.nu/p/764438 ## #4 — Sico, 2002-08-28T11:19Z ``` Set rsUser = Server.CreateObject("ADODB.Recordset") SQL = "Select f_Password from t_Members Where f_Epost='" & Request.Form("Epost") & "'" rsUser.Open SQL,Connect,1,2 If rsUser.EOF Then Response.Write "E-posten finns inte" ElseIf rsUser("f_Password") <> Request.Form("Password") Then Response.Write "Lösenordet är felaktigt" Else Form1 = Request.Form("Form1") Form2 = Request.Form("Form2") Form3 = Request.Form("Form3") Form4 = Request.Form("Form4") strSQL = "INSERT INTO t_Table " _ & "( f_Form1, Form2, f_Form3, Form4 ) " _ & "VALUES( '" & Form1 & "', '" & Form2 & "', '" & Form3 & "', '" & Form4 & "' )" Connect.Execute( strSQL ) End If rsUser.close Connect.close ``` Har ej testat det. Permalänk: https://www.webforum.nu/p/764442 ## #5 — Pellefant, 2002-08-28T13:24Z Hej igen! :) Nu gör jag framsteg, har dock kört fast på en sak: SQL = "SELET losenord FROM medlemmar WHERE email='" & Request.Form("email") & "'" rsUser.Open SQL,Connect,adOpenStatic,adLockOptimistic Det finns en tabell som heter medlemmar, email och losenord är kolumner i denna tabell) Ger felmed: ADODB.Recordset error '800a0bb9' Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another. Men jag förstår inte varför, då datatypen i tabellen är "text", och i formuläret är det väl "text" automatiskt, alltså så borde de vara jämförbara, kommer ihåg att jag hade trubbel, när jag skulle jämföra två tal förut, och fick då sätta in "C(int)" eller liknande, finns det någon liknande lösning för text ? Permalänk: https://www.webforum.nu/p/764505 ## #6 — @nders, 2002-08-28T13:28Z Min gissning är: Du har glömt att inkludera adovbs.inc på sidan. Det är i den filen konstanter som adOpenStatic och adLockOptimistic definieras. I stället för att inkludera den filen kan du ju alltid använda konstanternas värden direkt (kan dem dock inte i huvudet), eller definiera endast de konstanterna du använder. Mvh, Permalänk: https://www.webforum.nu/p/764510 ## #7 — Pellefant, 2002-08-28T13:36Z Hej hopp! Du gissade fel. :( Allra först i koden för sidan har jag(utan några blanksteg, blankrader innan): \<% Response.Buffer = True %\> \