Login et Password

hello, g ça comme code mais pour un pass unique.

<%
Response.Expires = 0
Response.Expiresabsolute = Now() - 1
Response.AddHeader "pragma","no-cache"
Response.AddHeader "cache-control","private"
Response.CacheControl = "no-cache"
Response.buffer=true

dim pas
pas=Request.Form.Item("password")
password="password"
if pas<>password then
session("ok")=""
response.redirect "../default.asp?mes=Wrong Password"
else
session("ok")="OK"
response.redirect "survey.asp"
end if
%>



je voudrais en créer avec des variantes du style

password
Password
PASSWORD

ou une variable qui ne tiens pas compte de l'orthographe

tks

Pour faire des variantes, tu dois prévoir variantes et les intégrer dans ton if. Autrement (le plus simple) fait le avec recherche dans une mdb. Pour la différence entre majuscule et minuscule, mets ta variable en lcase() ou ucase(). (avec une mdb access, il n'y a pas de différence entre maj et min ...)