Snitz Forums 2000 - universal login error

Snitz Forums 2000

Username:	Password:
Save Password
Forgot your Password?

All Forums

Help Groups for Snitz Forums 2000 Users

Help: MOD Implementation

universal login error

New Topic

Topic Locked

Printer Friendly

Author

Topic

amdgamer
Starting Member

4 Posts

Posted - 23 August 2003 : 00:24:28

You are logged on as

Microsoft VBScript runtime error '800a000d'

Type mismatch: 'ChkString'

/amdgamer/login2.asp, line 22
the actual login in part works fine but i get that error. but if you go to the forum you are login.

my code.

<%
strDBNTUserName = Request.Cookies("Snitz00User")("Name")
Response.Write " <table width=""156"" border=""0"" bordercolor=""midnightblue"" cellspacing=""0"" cellpadding=""2"" align=""center"">" & vbNewLine & _
" <tr bgcolor=""blue"">" & vbNewLine & _
" <td valign=""top"" align=""center"" class=""headcell""><font color =""white""><b>-:Forum Login:-</b></td>" & vbNewLine & _
" </tr>" & vbNewLine & _
" <tr bgcolor=""black"">" & vbNewLine & _
" <td class=""smalltext"" valign=""top"" align=""center""><font color=""white"">" & vbNewLine
if strDBNTUserName = "" then
Response.Write " <form action=""forum/default_login.asp"" method=""post"" id=""form1"" name=""form1"" a target=""AMDGamer_Forums."">" & vbNewLine & _
" <input type=""hidden"" name=""Method_Type"" value=""login"">" & vbNewLine
Response.Write " <b>Username:</b><br />" & vbNewLine & _
" <input type=""text"" name=""Name"" size=""10"" maxLength=""25"" value=""""><br />" & vbNewLine & _
" <b>Password:</b><br />" & vbNewLine & _
" <input type=""password"" name=""Password"" size=""10"" maxLength=""25"" value=""""><br />" & vbNewLine
Response.Write " <input src=""button_login2.gif"" type=""image"" border=""0"" value=""Login"" id=""submit1"" name=""submit1""><br />" & vbNewLine
Response.Write " <input type=""checkbox"" name=""SavePassWord"" value=""true"" tabindex=""-1"" CHECKED><b> Save Password</b><br />" & vbNewLine
else
Response.Write " <form action=""forum/login.asp"" method=""post"" id=""form2"" name=""form2"">" & vbNewLine & _
" <input type=""hidden"" name=""Method_Type"" value=""logout"">" & vbNewLine & _
" You are logged on as<br />" & vbNewLine
Response.Write "<b>" & ChkString(strDBNTUserName , "display") & "</b><br />" & vbNewLine
Response.Write "<input class=""btn"" type=""submit"" value=""Logout"" id=""submit1"" name=""submit1"" tabindex=""-1""><br />"
if (mlev = 4) or (lcase(strNoCookies) = "1") then
Response.Write " " & vbNewLine & _
" <a href=""forum/admin_home.asp""" & dWStatus("Access the Forum Admin Functions...") & " tabindex=""-1"">Admin Options</a>"
end if
Response.Write " </form>" & vbNewLine
end if
Response.Write "</td></tr></table>" & vbNewLine
%>

thanks

OneWayMule
Dev. Team Member & Support Moderator