Link to home
Start Free TrialLog in
Avatar of mraible
mraible

asked on

Unspecified Error

The first time I go to my default page, it comes up just fine, but on the second time (refresh), I get the following error:

Provider error '80004005'

Unspecified error

/schools/default.asp, line 6

The entire code from page is below.  Is there something I'm doing wrong?  This page works flawlessly on my development machine (Win2K Prof, FAT32 Drive), but I'm having lots of problems at my ISP (Win2000 Svr).

<%@LANGUAGE="VBSCRIPT"%>

<%
Dim Sponsors
Set Sponsors = Server.CreateObject("ADODB.Recordset")
Sponsors.ActiveConnection = "DSN=SchoolSponsor;"
Sponsors.Source = "SELECT Individual_Name, Organization_Name FROM Sponsor"
Sponsors.CursorType = 0
Sponsors.CursorLocation = 2
Sponsors.LockType = 3
Sponsors.Open()
Sponsors_numRows = 0
%>
<%
Dim Repeat1__numRows
Repeat1__numRows = 30
Dim Repeat1__index
Repeat1__index = 0
Sponsors_numRows = Sponsors_numRows + Repeat1__numRows
%>
<html>
<head>


<title>Landscape Architects in Schools</title>
<base target="_self">
</head>
<body bgcolor="#000000" topmargin="0" text="#FFFFFF" link="#FFFF00" vlink="#FF00FF">
<table width="100%" border="0">
  <tr>
    <td>
                  <a href="http://www.ccasla.org"><img src="../images/ccasla_newdesignc.gif" width="559" height="45" alt="Click here to return to CCASLA Home Page" border="0"></a>
            </td>
  </tr>
</table>
<table width="100%" border="0" cellpadding="6">
      <tr>
            <td width="75%">
                  <table width="100%" border="0" align="top">
                        <tr>
                              <td bgcolor="#9910a9">
                                    <font size="+2" color="#9910A9" face="Arial, Helvetica, sans-serif"><b><font color="#FFFFFF">Landscape
                                    Architects in Schools</font></b></font>
                              </td>
                        </tr>
                  </table>
                  <p><font face="Arial, Helvetica, sans-serif"><img src="../images/LASchools.jpg" width="300" height="296" align="right"><b>U.S.
                        Department of Labor projects more than 21% job growth for landscape
                        architecture through the year 2006. Every year only 1,200 to 1,300
                        students graduate with a degree in landscape architecture. This number
                        has held steady in the last few years, despite the strong job market.
                        </b></font></p>
                  <p>
                  <h3><font color="#9910A9" face="Arial, Helvetica, sans-serif">How did
                        <i>you</i> find out about landscape architecture? </font></h3>
                  <p><font face="Arial, Helvetica, sans-serif" size="2">Maybe from seeing
                        a project?<br>
                        </font>
                  <p><font face="Arial, Helvetica, sans-serif" size="2">Or meeting a landcape
                        architect.<br>
                        </font>
                  <p><font face="Arial, Helvetica, sans-serif" size="2">Or seeing images
                        in a magazine. </font>
                  <p>
                  <p><font face="Arial, Helvetica, sans-serif" size="2">Either way, you
                        probably stumbled into it. CCASLA's Landscape Architects in Schools
                        program expands and boosts this experience by interfacing high school
                        students with professionals.</font></p>
                  <p><font face="Arial, Helvetica, sans-serif" size="2">LA's in schools
                        program is a state-wide effort to link public and private, large and
                        small landscape architecture firms with Colorado high schools. Firms
                        'adopt' high schools, providing them materials and outreach to increase
                        awareness and visibility about the profession.</font></p>
                  <p><font face="Arial, Helvetica, sans-serif" size="2">It's a simple,
                        self-monitoring program. Firms choosing to participate agree to:</font></p>
                  <ul>
                        <li><font face="Arial, Helvetica, sans-serif" size="2">Sponsor a subscription
                              to <i>Landscape Architecture</i> magazine. Meet with the school
                              librarian to familiarize the magazine to him or her. </font>
                        <li><font face="Arial, Helvetica, sans-serif" size="2">Meet with the
                              high school's guidance councilors about the profession. Supply
                              them with CCASLA's brochure for distribution to interested students.
                              </font>
                        <li><font face="Arial, Helvetica, sans-serif" size="2">Find out about
                              the school's career day, and participate in it. </font>
                        <li><font face="Arial, Helvetica, sans-serif" size="2">Offer tours
                              of your firm and personal insight to interested students. </font>
                  </ul>
                  <p><font face="Arial, Helvetica, sans-serif" size="2">You will be contacted
                        twice a year ( fall &amp; spring ) so that you can be reminded of
                        your agreements. But that's all, the rest is <font color="#9910A9"><b><u>up</u>
                        <u>to</u> <u>you!</u></b></font></font></p>
                  <p>&nbsp;</p>
                  <p><font face="Arial, Helvetica, sans-serif" size="2"><b>Sign Up Now!
                        Enter your email address below to sign up!</b></font></p>
                  <form name="email" method="post" action="SignUp.asp">
                        <font face="Arial, Helvetica, sans-serif" size="2">
                        <input type="text" name="emailAddress" size="20">
                        <input type="submit" name="Submit" value="Submit">
                        <input type="button" name="cancel" value="Cancel" onClick="history.back()">
                        </font>
                  </form>
                  
                  <p><font face="Arial, Helvetica, sans-serif" size="2"><b><br>
                        Need more info?</b> <a href="mailto:jmaslyn@civitasinc.com">Contact
                        us.</a></font></p>
                  <p>&nbsp;</p>
            </td>
            <td bgcolor="#CCCCCC" width="25%" valign="top">
                  <p><font color="#008040"><b><font face="Arial, Helvetica, sans-serif" size="2">THANK
                        YOU</font></b><font face="Arial, Helvetica, sans-serif" size="2">
                        to the following firms, organizations, and individuals who have signed
                        up for the High School Adoption Program!</font></font></p>
                  <table width="100%" border="0" >
                        <tr >
                              <th width="44%">
                                    <div align="center"><font color="#008040" face="Arial, Helvetica, sans-serif" size="2">Organization</font></div>
                              </th>
                              <th width="56%">
                                    <div align="center"><font color="#008040" face="Arial, Helvetica, sans-serif" size="2">Individual</font></div>
                              </th>
                        </tr>
                        <%
While ((Repeat1__numRows <> 0) AND (NOT Sponsors.EOF))
%>
                        <tr >
                              <td width="44%">
                                    <div align="center"><font color="#008040" face="Arial, Helvetica, sans-serif" size="2"><%=(Sponsors.Fields.Item("Organization_Name").Value)%></font></div>
                              </td>
                              <td width="56%">
                                    <div align="center"><font color="#008040" face="Arial, Helvetica, sans-serif" size="2"><%=(Sponsors.Fields.Item("Individual_Name").Value)%></font></div>
                              </td>
                        </tr>
                        <%
  Repeat1__index=Repeat1__index+1
  Repeat1__numRows=Repeat1__numRows-1
  Sponsors.MoveNext()
Wend
%>
                  </table>
                  <p>&nbsp;</p>
            </td>
      </tr>
</table>
<p>&nbsp;</p>
</body>
</html>
<%
Sponsors.Close()
%>
ASKER CERTIFIED SOLUTION
Avatar of Michel Sakr
Michel Sakr
Flag of Canada image
Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial
Avatar of Göran Andersson
Göran Andersson
Flag of Sweden image
Use a connection object (just like Silver said), and add a conn.Close at the end. Just to be sure that the connection closes. Access is a bit picky about open connections...
Avatar of mouatts
mouatts
Generally this is an ODBC problem with many many possible causes. The easiest solution is to use a DSN-less connection as silver5 has suggested. (Its actually more efficient as well).

So far as a connection.close is concerned well yes you should have one but it won't cause any problems cos often the connections aren't physically closed due to connection pooling. Under such circumstances it is only closing the connection between your prog and the driver not the database. The end of the program automatically destroys this object and does the close for you.
Avatar of mraible
mraible

ASKER

I actually got this fixed - it was the ISP's issue and a permissions problem.  It seemed that the *.mdb file had rwx permissions, but the directory it was in needed it as well.

Thanks for your assistance.  I'll give points to Silver5 in the hopes I can use this information in a future project.

Thanks,

Matt