See
http://www.aspfaq.com/2340
Stop letting wysiwyg editors created such bloated code
<%
username = replace(Request.Form("username"), "'", "''")
password = Request.Form("userpassword"), "'", "''")
if username <> "" and password <> "" then
sql = "SELECT COUNT(*) FROM tblaccess " & _
" WHERE username='" & username & "'" & _
" AND userpassword='" & password & "'"
set rs = conFixitCon.execute(sql)
if not rs.eof then
response.redirect "fixit_ebase.asp"
else
response.redirect "fixit_login.asp?failed=yes"
end if
....
--
Aaron Bertrand
SQL Server MVP
http://www.aspfaq.com/
"Mark" <anonymous@devdex.com> wrote in message
news:uL0uakXuDHA.1340@TK2MSFTNGP09.phx.gbl...[color=blue]
> Hi - Can anyone please help with the error message below - server is XP
> Pro, and the ASP code it is failing at is (set
> MM_rsUser.ActiveConnection... as below):
>
> <%
> MM_valUsername=CStr(Request.Form("username"))
> If MM_valUsername <> "" Then
> MM_redirectLoginSuccess="fixit_ebase.asp"
> MM_redirectLoginFailed="fixit_login.asp?failed=yes "
> MM_flag="ADODB.Recordset"
> set MM_rsUser = Server.CreateObject(MM_flag)
> MM_rsUser.ActiveConnection = conFixitCon
> MM_rsUser.Source = "SELECT username, userpassword,
> email,edtick,adfix,apfix,delfix,sendap,amuser,view com,viewst,viewrev,vie
> wstats,edstmts,qrydb,efstats,edclient,canview,brow sol FROM tblaccess
> WHERE username='" & Replace(MM_valUsername,"'","''") &"' AND
> userpassword='" & Replace(Request.Form("userpassword"),"'","''") & "'"
> .
> .
>
>
> Please try the following:
>
> Click the Refresh button, or try again later.
>
> Open the pc2 home page, and then look for links to the information you
> want.
>
> HTTP 500.100 - Internal Server Error - ASP error
> Internet Information Services
>
> ------------------------------------------------------------
> Technical Information (for support personnel)
>
> Error Type:
> ADODB.Recordset (0x800A0E7A)
> Unknown runtime error
> /sitefiles/login.asp, line 56
>
> Browser Type:
> Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; MyIE2; Alexa Toolbar;
> NET CLR 1.1.4322)
>
> Page:
> POST 46 bytes to /sitefiles/login.asp
>
> POST Data:
> username=admin&userpassword=admin&Submit=Login
>
> Time:
> 02 December 2003, 19:26:22
>
> More information:
> Microsoft Support
>
> *** Sent via Developersdex
http://www.developersdex.com ***
> Don't just participate in USENET...get rewarded for it![/color]