|
|
 |
| Classic ASP Professional For advanced coder questions in ASP 3. NOT for ASP.NET 1.0, 1.1, or 2.0. |
Welcome to the p2p.wrox.com Forums.
You are currently viewing the Classic ASP Professional section of the Wrox p2p Programmer to Programmer discussion community. This is a community of more than 40,000 computer programmers including Wrox book authors and readers. As a guest, you can read any forum posting. By joining our free Wrox p2p community you can post your own programming questions and respond to other programmers’ questions. Registered users also don't have to see the ads that are displayed to guests. Registration is fast, simple and absolutely free so please, join today!
Join today and post to win prizes! Post more to increase your chances of being Wrox’s top poster of the month.
|
 |
November 22nd, 2005, 11:50 AM
|
|
Authorized User
|
|
Join Date: Mar 2005
Location: arima, West Indies, Trinidad and Tobago.
Posts: 40
Thanks: 0
Thanked 0 Times in 0 Posts
|
|
Local Host Problem
My OS is windows 2000 (not server). Database is Access and I have an asp page that allows you to retrieve information from the database. Everything works fine the first time, immediately after when you try the second time the page just comes up blank. No info from the database shows. If you wait a while it works again but once again another attempt gives a blank page. Is there some kind of setting in IIS I have to specify that would overcome this problem. I am using asp and i have specified only one recordset to open up. In fact I am using a Table Procedure. Not to sure if this is a problem but the OS is Windows 2000 running 256 or thereabout RAM. Service pack 4. If more information is needed I'll be glad to give it. Just in case, here's the Procedure:
Code:
Sub MakeTable(SourceIn,dsnIn)
Dim oRSmt
Dim countn
Set oRSmt = Server.CreateObject("ADODB.Recordset")
oRSmt.CursorLocation = 3 'Used to keep count of how many records are going to be displayed
oRSmt.Open SourceIn, "DSN=" & dsnIn
oRSmt.MoveFirst
Response.Write "<TABLE BORDER='1'><TR>"
For Each Field in oRSmt.Fields
Response.Write"<TH>" & Field.name & "</TH>"
Next
Do While NOT oRSmt.EOF
Response.Write "<TR>"
For each objField in oRSmt.Fields
Response.Write "<TD>" & objField.value & " </TD>"
Next
countn = oRSmt.RecordCount 'Assign the record count to variable countn
oRSmt.MoveNext
Response.Write "</TR>"
Loop
Response.Write "</TR></TABLE>"
Response.Write "<p>Total Number of Entries are " & countn & "</p>"
Response.Write "<a href='javascript:void(0)' onClick='self.close();return false'>Close Window</a>"
Response.End
End Sub
<%
Dim sORce
sORce = Request.Form("report")
'Response.Write sORce
call MakeTable(sORce,"KeyData;pwd=private")
%>
Hope I can get some help
|
November 23rd, 2005, 05:23 AM
|
|
Friend of Wrox
|
|
Join Date: Jul 2003
Location: , , United Kingdom.
Posts: 685
Thanks: 0
Thanked 0 Times in 0 Posts
|
|
Can't see anything obvious arimakidd, but it's worth closing & destroying the recordset once you have finished using it.
HTH,
Chris
|
| Thread Tools |
Search this Thread |
|
|
|
| Display Modes |
 Linear Mode
|
Posting Rules
|
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts
HTML code is Off
|
|
|
|
|
