salve a tutti, ho creato un'area riservata, purtroppo non verifica la differenza tra maiuscole e minuscole. Volevo inserire un controllo sulle stringhe con l'istruzione

if StrComp(rs("USERNAME"), usernam) = 0 AND strComp(rs("password"),pass)=0 then

ma non riesco ad implementarla nel resto del codice. come posso fare?
grazie, qui riporto il codice che uso per la pagina login.asp:

<%@LANGUAGE="VBScript" %>
<%
Dim usernam
Dim pass
usernam = Replace(Request.Form("nome_utente"), "'", "''")
pass = Replace(Request.Form("password"), "'", "''")

Dim cn
Set cn = Server.CreateObject("ADODB.Connection")

'uso locale

cn.Open "Provider = Microsoft.Jet.OLEDB.4.0; Data Source = c:\inetpub\wwwroot\........database.mdb"


Dim sql
sql = "SELECT ID FROM Utenti WHERE USERNAME='" &usernam&_
"' AND PASSWORD='" &pass& "'"
Dim rs
Set rs = cn.Execute(sql)

Dim autenticato
if rs.eof then
autenticato = false
else
autenticato = true
end if
rs.Close
cn.Close
Set rs = Nothing
Set cn = Nothing

if autenticato = true then
Session("Autenticato") = "OK"

'Impostiamo la vita di sessione a n minuti
session.timeout = 1

Response.Redirect("riservato.asp")
else
Response.Redirect("AUTENTICAZIONE2.HTML")
end if
%>

---

Modificato da angelorso il 25 gennaio 2011 19.24 -