|
simonduz
Junior Member
161 Posts |
 Posted - 01 August 2003 : 14:29:31
|
I have a snitz intranet with NT authentification. I found this help desk script Yudo which is promissing but I need authentication for it to work in my enviorment.
This particular ASP login is not very familiar and I would like to know if some one would help me modify it?
I would like to take the NT userid from the local groups and pass it to the login, or registration.
This is from the login.asp page.
<%
go=Request.QueryString("go")
if go="validate" then
login=Trim(Replace(request("login"),"'",""))
pass=conversion(Trim(Replace(request("pass"),"'","")), encryptkey, True)
remember=request("remember")
set rs=cn.execute("SELECT login FROM users WHERE login='" & login & "' AND approved=1")
if rs.eof then
response.write "<br><br><div class='alert'>" & lg_loginerror & "</div><br><a href='javascript:history.go(-1);'>" & lg_back & "</a>"
Response.End
else
set rs=cn.execute("SELECT login,pass FROM users WHERE login='" & login & "' AND pass='" & pass & "'")
if rs.eof then
response.write "<br><br><div class='alert'>" & lg_pwderror & "</div><br><a href='javascript:history.go(-1);'>" & lg_back & "</a>"
Response.End
else
Session("login") = login
if remember=1 then
Response.Cookies("login") = login
Response.Cookies("login").expires = dateadd("y",1,now())
end if
response.redirect "main.asp"
end if
end if
else
'Login page
Response.Write "<div align=center>"
seccion lg_logintoaccount, "#999999"
campo "login", lg_username, "text", "", 25, 20, "R"
campo "pass", lg_password, "password", "", 25, 10, "R"
campo "remember", lg_rememberme, "checkbox", 1, "", 1, ""
cabezal "login.asp?go=validate", "post", "", 500
Response.Write formulario
pie lg_login
Response.Write "</div>"
end if
%>
|
|
Topic Locked
