Strange Error

J

Jack

Hi,
I got an asp page in a test database which works fine first time it is
loaded. However, when I try to refresh the page, it gives me the following
error:

Provider (0x80004005) Unspecified error

Error in line 17

Incidentally, Line 17 is the following:
CN.Open myDSN

I appreciate any advise/help in advance.


CODE:
<%@ Language=VBScript %>
<!-- #include file="adovbs.inc" -->

<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<TITLE>Sailors Web Site</TITLE>
</HEAD>
<BODY>

<%
myDSN="DRIVER={Microsoft Access Driver (*.mdb)}; "
myDSN=myDSN & "DBQ=C:\____SAILORS\Sailors.mdb"

set CN=server.createobject("ADODB.Connection")
set RS=server.createobject("ADODB.Recordset")
CN.Open myDSN

RS.ActiveConnection=CN
SQL = "qAllClubs"

RS.Open SQL
%>
<DIV ALIGN=CENTER>
<BIG> <BIG><FONT COLOR=navy>Sailors Case Study</FONT></BIG></BIG>
</DIV>
<BR><BR>
<FORM ACTION=registrationconfirmation.asp method=POST NAME = frmRegister>
<TABLE>
<TR>
<TD HEIGHT=50 COLSPAN=2><FONT COLOR=navy>Registration Screen</FONT></TD>
</TR>

<TR>
<TD>First Name</TD>
<TD><INPUT TYPE=text NAME=txtFirstName SIZE=15></TD>
<TD><WIDTH=100></TD>
<TD>&nbsp;</TD>
<TD>Last Name</TD>
<TD><INPUT TYPE=text NAME=txtLastName SIZE=15></TD>
</TR>

<TR>
<TD>State</TD>
<TD><INPUT TYPE=text NAME=txtState SIZE=2></TD>
<TD> <WIDTH=50></TD>
<TD> </TD>
<TD>Date of Birth</TD>
<TD><INPUT TYPE=text NAME=txtDateofBirth SIZE=8></TD>
</TR>

<TR>
<TD>Referee</TD>
<TD><INPUT TYPE=checkbox NAME=chkReferee VALUE=1></TD>
</TR>

<TR>
<TD>Professional Class</TD>
<TD COLSPAN=4>
<INPUT TYPE=radio NAME=optClass VALUE=1 checked>Professional
<INPUT TYPE=radio NAME=optClass VALUE=2>Ranked Amateur
<INPUT TYPE=radio NAME=optClass VALUE=3>Other
</TD>
</TR>

<TR>
<TD>Club Name</TD>
<TD COLSPAN=3>


<SELECT NAME="lstClubs" SIZE = "1">
<%
Do while Not RS.EOF
Response.Write "<OPTION VALUE='" &RS("clubname") & "'>"
Response.Write RS("clubname") & "</OPTION>"
RS.MoveNext
Loop
RS.Close
Set RS = Nothing
%>
</SELECT></TD>
</TR>

<TR>
<TD>&nbsp;</TD>
</TR>

<TR>
<TD><INPUT TYPE=button NAME=btnSubmit VALUE=Submit></TD>
</TR>


</TABLE>
</FORM>


</BODY>
</HTML>
 
A

Aaron [SQL Server MVP]

Provider (0x80004005) Unspecified error
Error in line 17

Stop using ODBC. Stop using ADOVBS.Inc. And stop using ADODB.Recordset.

<HTML>
<HEAD><TITLE>Sailors Web Site</TITLE></HEAD>
<BODY>

<%
myDSN="Provider=Microsoft.Jet.OLEDB.4.0;Data
Source=C:\____SAILORS\Sailors.mdb"
set conn = Server.CreateObject("ADODB.Connection")
conn.open myDSN

...
' don't open this until you're ready to use it!
set rs = conn.execute("EXEC qAllClubs")
Do while Not RS.EOF
Response.Write "<OPTION VALUE='" &RS("clubname") & "'>"
Response.Write RS("clubname")
RS.MoveNext
Loop
RS.Close: Set RS = Nothing
' always close the connection too!!!
conn.close: set conn = nothing
%>

Please see the following URLs to see why I corrected all of these issues:

http://www.aspfaq.com/2126
http://www.aspfaq.com/2112
http://www.aspfaq.com/2191
http://www.aspfaq.com/2435
http://www.aspfaq.com/2424#db
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Members online

No members online now.

Forum statistics

Threads
473,769
Messages
2,569,578
Members
45,052
Latest member
LucyCarper

Latest Threads

Top