Hey all,

I'm having problems ! , my app was running fine until this morning.
I receive following error :
Microsoft OLE DB Provider for ODBC Drivers error '80004005' 
[Microsoft][ODBC Driver Manager] Function sequence error 
/clientenrollment.asp, line 67

the line 67 for that file is 

oRS1.movefirst

here is a snip of the code :
<SNIP>
oRS1.open "SELECT * from enrollment where ClientID='"&varclientID&"'",
"DSN=CCMS;uid=web_user;pwd=web_user"
if oRS1.EOF then
response.write "<FONT SIZE=3>Client is not currently enrolled in any
programs click <a href=""javascript:popUp1()"" class=submenu>here</a> to add
a program"
else
'LINE67: oRS1.movefirst
response.write "<TABLE WIDTH=""80%"" BORDER=1 CELLSPACING=0>"
response.write "<TR><TD ALIGN=CENTER><B>Program Name</B></TD><TD
ALIGN=CENTER><B>Therapist</B></TD ALIGN=CENTER><B>Start Date</B></TD><TD
ALIGN=CENTER><B>End Date</B></TD><TD
ALIGN=CENTER><B>Funding</B></TD><TD>&nbsp;</TD ALIGN=CENTER></TR>"
Do while not oRS1.EOF
response.write
"<TR><TD>"&oRS1("program_name")&"&nbsp;</TD><TD>"&oRS1("providerID")&"&nbsp;
</TD><TD>"&oRS1("start_date")&"&nbsp;</TD><TD>"&oRS1("end_date")&"&nbsp;</TD
><TD>"&oRS1("funderID")&"</TD><TD>&nbsp;"
if oRS1("active") = 1 then
response.write "<Font COLOR=RED>Active</FONT></TR>"
else
response.write "</TR>"
End If
oRS1.MoveNext
Loop
response.write "</TABLE>"
End If
</SNIP>

I didnt change anything on the server, have tried a reboot, but to no avail,
MYSQL is running on w2k 2000 server and the ASP with through IIS.

Please if anyone has any idea what I am doing wrong, please let me know.

Chris

---------------------------------------------------------------------
Before posting, please check:
   http://www.mysql.com/manual.php   (the manual)
   http://lists.mysql.com/           (the list archive)

To request this thread, e-mail <[EMAIL PROTECTED]>
To unsubscribe, e-mail <[EMAIL PROTECTED]>
Trouble unsubscribing? Try: http://lists.mysql.com/php/unsubscribe.php

Reply via email to