CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg

Log ind eller opret profil

Du kan også logge ind via nedenstående tjenester

hagler Nybegynder

22. september 2004 - 19:10 Der er 12 kommentarer og
1 løsning

if * then * else. sætning med PROBLEM :o)

Set conn=Server.CreateObject("ADODB.connection")
Set oRSlogon=Server.CreateObject("ADODB.recordset")
conn.connectionstring="DSN=DSNST"
conn.Open

' Henter logon oplysninger
oRSlogon.Open "SELECT * FROM users", conn

' DET ER I DENNE IF SÆTNING DET GÅR GALT...
' JEG HAR TJÆKKET AT username1 OG username HAR DEN SAMME VÆRDI
' OGSÅ password1 OG password... MEN DEN SKRIVER ALTID
' Du er IKKE logget korrekt ind
' HVAD ER DER GALT...???
If Request.Form("username1") = oRSlogon("username") AND Request.Form("password1") = oRSlogon("password") THEN

Response.Write "<h1>Du er nu logget korrekt ind</h1>"

Else

Response.Write "<h1>Du er IKKE logget korrekt ind</h1>"

End If

Synes godt om

trekkies Juniormester

22. september 2004 - 19:14 #1

Prøv dette:

If Not rs.Eof Then
Response.Write "<h1>Du er nu logget korrekt ind</h1>"

Else

Response.Write "<h1>Du er IKKE logget korrekt ind</h1>"
End If

Synes godt om

arne_v Ekspert

22. september 2004 - 19:19 #2

Er du helt sikker på at de er ens ? Der er ikke nogen mellemrum eller
lignende ?

Synes godt om

Jman Praktikant

22. september 2004 - 19:19 #3

Har du kontrolleret at det staves på samme måde (altså store og små bogstaver) ?

Synes godt om

Jman Praktikant

22. september 2004 - 19:20 #4

Prøv evt. at rette:
If lcase(Request.Form("username1")) = lcase(oRSlogon("username")) AND lcase(Request.Form("password1")) = lcase(oRSlogon("password")) THEN

Synes godt om

hagler Nybegynder

22. september 2004 - 19:29 #5

<trekkies> det vil ikke give nogen mening... der står jo også andet i min tabel end lige det ene logon... også hvis man bare gætter et eller andet der står i databasen er man logget ind.... det er jo ikke smart... ps der er ikke nogle af de eks der virker..

<superior> dit eks gjore i torien det samme som mit... :o(

jeg har prøvet at lave den sådan her

If Request.Form("username1") = "eksempel" AND Request.Form("password1") = "eksempel" THEN

det virker... og alt i min database står med små bogstaver uden mellemrum, og det gør mit indtastede også...

jeg ved ikke lige hvad der går galt der men vil gerne vide det :os

Synes godt om

esoulman Nybegynder

22. september 2004 - 19:30 #6

må vi se din form?

Synes godt om

hagler Nybegynder

22. september 2004 - 19:31 #7

ps. men det skulle jo gerne køre op mod min database. så jeg ik kun kan have en bruger...

Synes godt om

eagleeye Praktikant

22. september 2004 - 19:38 #8

Hvorfor ikke lave en WHERE på din SQL sætninge og lade database finde brugernavn og password?

Eller skal du havde et loop i koden som tjekke alle posterne igemme for korrekt brugernavn og password:

oRSlogon.Open "SELECT * FROM users", conn

' DET ER I DENNE IF SÆTNING DET GÅR GALT...
' JEG HAR TJÆKKET AT username1 OG username HAR DEN SAMME VÆRDI
' OGSÅ password1 OG password... MEN DEN SKRIVER ALTID
' Du er IKKE logget korrekt ind
' HVAD ER DER GALT...???

fundet=false
Do While (NOT oRSlogon.EOF and fundet=false)
If lcas(Request.Form("username1")) = lcase(oRSlogon("username")) AND lcase(Request.Form("password1")) = lcase(oRSlogon("password")) THEN
fundet=true
Response.Write "<h1>Du er nu logget korrekt ind</h1>"
End If
oRSlogon.Movenext
loop
if fundet=false then
Response.Write "<h1>Du er IKKE logget korrekt ind</h1>"
End if

Synes godt om

eagleeye Praktikant

22. september 2004 - 19:40 #9

Eks med "ren" SQL:

oRSlogon.Open "SELECT * FROM users WHERE username ='"&replace(Request.Form("username1"),"'","")&"' AND [password]='"&replace(Request.Form("password1"),"'","")&"'", conn
if not oRSlogon.EOF then
Response.Write "<h1>Du er nu logget korrekt ind</h1>"

Else

Response.Write "<h1>Du er IKKE logget korrekt ind</h1>"

End If

Synes godt om

hagler Nybegynder

22. september 2004 - 19:48 #10

<html>
<head>
<title>Login</title>
</head>
<body>
<%
dim username, password, num, rs
%>


<table width="770" border="0" align="center" cellspacing="0" cellpadding="0">
<tr>
<td height="15"><img src="pic/space.gif"></td>
</tr>
<tr>
<td width="100%"><img src="pic/top.gif"></td>
</tr>

<tr>
<td width="100%" background="pic/table.gif">
<table width="100%" border="0" align="center" cellspacing="0" cellpadding="0">
<tr>
<td>
<table width="100%" border="0" align="center" cellspacing="0" cellpadding="0">
<tr>
<td>

<%
If request.form("num") = 1 then
set num = nothing

Set conn=Server.CreateObject("ADODB.connection")
Set oRSlogon=Server.CreateObject("ADODB.recordset")
conn.connectionstring="DSN=DSNST"
conn.Open
' Henter logon oplysninger
oRSlogon.Open "SELECT * FROM users", conn
' PROBLEMET
' Tjek om login og password er korrekte
If Request.Form("username1") = oRSlogon("username") AND Request.Form("password1") = oRSlogon("password") THEN

'Hvis korrekt sættes session til JA
Response.Write "<h1>Du er nu logget korrekt ind</h1>"

Else
'Hvis forkert sættes ingen session til NEJ
Response.Write "<h1>Du er IKKE logget korrekt ind</h1>"

End If

%>
</td>
</tr>
</table>

<% End If %>

<table width="100" border="0" align="center" cellspacing="0" cellpadding="0">
<tr>
<td>
<form method="post" action="index.asp">
Username:
</td>
<td>
<input type="text" name="username1">
</td>
</tr>
<tr>
<td>
Password:
</td>
<td>
<input type="text" name="password1">
</td>
</tr>
<tr>
<td>
<input type="hidden" name="num" value="1">
</td>
<td>
<input type="Submit" value="Login" class="button">
</td>
</tr>
</table>

</td>
</tr>
</table>
</td>
</tr>

<tr>
<td width="100%"><img src="pic/botton.gif"></td>
</tr>
</table>
</body>
</html>

det er hele min kode

Synes godt om

hagler Nybegynder

22. september 2004 - 19:54 #11

<eagleeye> Smukt lavet... men et eller andet sted ikke en løsning da. jeg vil have det til at køre med en if * then * else sætning....

Synes godt om

eagleeye Praktikant

22. september 2004 - 19:56 #12

Hvilken af de to tænker du på?

Hvis du har mere end en bruger kan du ikke bare lave det med en if sætningen hvis du henter alle brugerne ud som i løsningen 22/09-2004 19:38:17.
Så brug løsningen i 22/09-2004 19:40:15 der bruger den SQL til at finde brugeren og du har kun en if sætningen til at tjekke det.

Synes godt om

hagler Nybegynder

01. februar 2005 - 16:06 #13

Det virker nu :o)

Synes godt om

Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Følg dette spørgsmål

Opret Preview

Programmeringssprog kurser

Kurser inden for grundlæggende programmering

Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Lost focus Af bsn i ASP	0	07/11/202415:34	-
ASP classic Af bsn i ASP	8	28/10/202423:11	30/10/202422:51
Classic - filer vist med sidste fil først Af bsn i ASP	5	23/05/202409:56	24/05/202400:02
Optimer MySql table med ASP Af poulmadsen i ASP	4	26/04/202417:16	26/04/202418:37
JSON Af ingeman i ASP	3	07/04/202417:53	08/04/202412:09

Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS

23/12

Historisk million-bøde får Region Syddanmarks it-direktør til at efterlyse nye GDPR-retningslinjer

23/12

Til næste år kommer iPhone 17 – og ifølge rygtestrømmene vil den byde på tre nyheder

23/12

En af verdens største it-distributører dropper samarbejdet med Broadcom: Kunne ikke nå til enighed

23/12

Ser med 'stor alvor' på problemer med vand, varme og manglende kontrol i politiets datacenter

23/12

Brugere rammes af Microsoft-fejl: M365-produkter er på mystisk vis blevet deaktiveret

23/12

Her er dommen: Region Syddanmark skal betale historisk stor bøde for grove overtrædelser af GDPR

23/12

Vores vidensindsamling og demokratiske samtale påvirkes af helt lukkede beslutninger i en enkelt privat virksomhed

23/12

Overblik: Danske it-selskaber strømmer ind mod den centrale storby - og det handler ikke om penge

23/12

Banebrydende ChatGPT-opdatering er lige på trapperne: “Denne model vil være helt fantastisk til programmering”

23/12

Tivoli søger ny CIO: Kenneth Hartvig stopper efter tre år på posten

23/12

Vi ender med at bo i en taber-region, hvis ikke vi gør noget drastisk - her er digitaliseringsministerens plan

Vis flere artikler

IT-JOB

Paychex Europe

Product Designer for leading SaaS provider

Matas A/S

IT Application Specialist Microsoft 365

Normann Copenhagen ApS

Product Data Specialist

Jyske Bank

RPA- og softwareudvikler til Kernebank

BEC

Data Analyst

Vis flere jobs

Seneste spørgsmål Seneste aktivitet

I dag 09:44	Mine emails kan pluselig ikke læses af modtagerne, kun uforståelige tal og bogstaver Af gunnarb i E-mail programmer
I går 16:03	Fjern "Seneste" - "Hurtig adgang" Fra Windows 11 - Hvordan ? Af Ikke-ekspert i Windows
23/1214:43	html <Input.. Danske bogstaver Af pjotre i Andet software
23/1214:35	Brænde musik fra usb drev til cd Af Caso i Andet hardware
21/1222:16	Er "OneDrive" et "Must" ? Koster det penge ? Af Ikke-ekspert i Windows