CaseSensitive mot Access DB

Hej hopp!

Nice to back... :e

Jag håller på och försöker få ihop en liten CaseSensitive inloggning. Jag har använt mig av StrComp i diverse olika varianter. Och just nu befinner jag mig här:

Kodsnutt:

SQL = "SELECT * FROM users Where StrComp(username = '" &username &"',0) And StrComp(pwd = '" &password &"',0)"

Skulle vara tacksam för lite vägledning. När jag sökte forumet fann jag en del, men inte tillräckligt för att bli klockare. Kanske man ska använda "strstr" istället?

Tack för uppmärksamheten.
mvh / TT

------------------
There is no Tomorrow...

[Redigerat av T_Codez den 06 sep 2001]

[Redigerat av T_Codez den 06 sep 2001]

Det verkar vara en klurig historia det här. Efter en del knåpande nu så kanske det skulla vara lättare om man gjorde någonting typ så här:

dim uname, passw

SQL = "SELECT * FROM users Where username = '" &username &"' And pwd = '" &password &"'"

Set db = Server.CreateObject("ADODB.Connection")
db.Open ...

uname = rs("username")
passw = rs("pwd")

IF StrComp(uname, '" &username &"',0) And StrComp(passw = '" &password &"',0)" Then
response.redirect inne.asp
else
response.redirect login.asp

Vad tror ni om det? Tyvärr så fungerade inte denna variant. Men det kanske kan ge en snilleblix för er ?

Tack för uppmärksamheten

------------------
There is no Tomorrow...

IF StrComp(uname, username, 0) > -1 Then
'Jepp, dom matchar..
End If

http://www.devguru.com/Technologies/vbscript/quickref/strcomp.html

------------------
Select * from world where gender = 'female' AND male = 'me'

SQL = "SELECT * FROM users Where username = '" &username &"' And pwd = '" &password &"'" 

Set db = Server.CreateObject("ADODB.Connection")
db.Open ...

uname = rs("username")
passw = rs("pwd")

valid = 0
do while not rs.eof
  if  cstr(uname) = cstr(username) _
  and cstr(passw) = cstr(password) then
      valid = 1
      exit do
  end if
  rs.movenext
loop
rs.close
db.close
if  valid = 1 then 
response.redirect inne.asp
else
response.redirect login.asp
end if

En vanlig jämförelse i VB-script är väl case-sensitive (skiftlägeskänslig ;) )

------------------
essentitia preter non sans multiplicandum

Thankz LarsG!

Fungerar fantastiskt bra. :e

------------------
There is no Tomorrow...