why don't you use the site login mod and just remove all visible code so you simply have all the variables set etc? - might be easier
otherwise the bit of visible code you need to keep is something like this (but not exactly the same I don't think):
if (mLev = 0) then
Response.Write " <font face=""" & strDefaultFontFace & """ size=""" & strFooterFontSize & """><b>Username:</b>" & vbNewLine & _
" <input type=""text"" name=""Name"" size=""10"" maxLength=""25"" value=""""" & vbNewLine & _
" <em><b>Password:</b></em></font>" & vbNewLine & _
" <input type=""password"" name=""Password"" size=""10"" maxLength=""25"" value="""">" & vbNewLine
Response.Write " <input type=""submit"" value=""Login"" id=""submit1"" name=""submit1"">" & vbNewLine
Response.Write " <font face=""" & strDefaultFontFace & """ size=""" & strFooterFontSize & """>" & vbNewLine & _
" <input type=""checkbox"" name=""SavePassWord"" value=""true"" tabindex=""-1"" CHECKED><b> Save Password</b></font>" & vbNewLine
else
Response.Write " <form action=""" & Request.ServerVariables("URL") & """ method=""post"" id=""form2"" name=""form2"">" & vbNewLine & _
" <input type=""hidden"" name=""Method_Type"" value=""logout"">" & vbNewLine & _
"<font face=""" & strDefaultFontFace & """ size=""" & strFooterFontSize & """>You are logged on as "
if strAuthType="nt" then
Response.Write "<b>" & Session(strCookieURL & "username") & " (" & Session(strCookieURL & "userid") & ")</b>" & vbNewLine & _
" <td> "
else
if strAuthType = "db" then
Response.Write "<b><a href=""pop_profile.asp?mode=display&id=" & MemberID & """>" & strDBNTUserName & "</a></b>." & vbNewLine & _
" <a href=""../logout.asp"">Logout</a>" & _
" <p style=""margin-top:0;margin-bottom:0;"">Click <a href=""pop_profile.asp?mode=Edit"">here</a> to edit your profile</p>"
end if
end if
Response.Write " </form>" & vbNewLine
end if