I.T. Discussion Community!
-Collapse +Expand
ASP Classic
Search ASP Classic Group:

Advanced
-Collapse +Expand ASP Classic Store

Prestwood eMagazine

June Edition
Subscribe now! It's Free!
Enter your email:

   ► MB LobbyASP Classic Coding BoardASP Classic - Handling Data Topic   Print This     

View records in table ???

View records in table ??? in ASP Classic - Handling Data topic (part of our ASP Classic Coding group).

Quick Search: records   View records   View records table  
Mido
 (Inactive)
-- USA
Hi all ....I'm your neighborhood next door Big Grin! from delphi forum Big Grin! ... this my first Q here in ASP hope to get answer.
My Q is that I have an MDB file and it contains one field .... and I want to view the records in many columns and rows .... so could you please help me ??
 Posted 18 years ago (Thread Starter)
Comment Quote
About Mido -Collapse +Expand
Visit Profile
Inactive member.
Member does not subscribe to this thread.
Email Not Verified!
Once email is verified, we will review and approve the account.
Web Presence Hidden.
Once above is taken care of, full Profile content will display including back links, about me, my message, custom Profile html, social networking links, message board signature, company profile, etc.

Post ID #2605, 2 replies
Thread Started 6/18/2001 2:53:00 AM
View Counter=2799
Last Reply Posted 8/14/2001 10:05:00 PM)
Location=-- USA 
Joined=18 years ago   MB Posts=21  
Most Recent Post
William Pantoja
Woodinville, WA, USA
Actually, I think what the problem is how to display the data in multiple columns instead of just one.

<%

Dim objConnection
Dim objRecordSet
Dim intMaxColumns
Dim intColumn

intMaxColumns = 5 'Set this to the number of
'columns you want in the
'table

Set objConnection = Server.CreateObject.... 'open connection
Set objRecordSet = objConnection.Execute.... 'execute query
Response.Write("<table border=0 cellspacing=1 cellpadding=2>" & vbCrLf)
Response.Write("<tr>" & vbCrLf)
If Not objRecordSet.Eof Then
intColumn = 0
Do While Not objRecordSet.Eof
Response.Write("<td>" & objRecordSet("MyField") & "</td>" & vbCrLf)
intColumn = intColumn+1
If intColumn = intMaxColumns Then
Response.Write("</tr>" & vbCrLf)
Response.Write("<tr>" & vbCrLf)
intColumn = 0
End If
objRecordSet.MoveNext
Loop
If intColumn > 0 Then
Do While intColumn < intMaxColumns
Response.Write("<td>&nbsp;</td>" & vbCrLf)
intColumn = intColumn+1
If intColumn = intMaxColumns Then
Response.Write("</tr>" & vbCrLf)
End If
Loop
End If
Else
Response.Write("<td>No data available.</td>" & vbCrLf)
Response.Write("</tr>" & vbCrLf)
End If
Response.Write("</table>" & vbCrLf)

%>

---
William Pantoja

Consultant/Software Engineer
ForceOne Technologies, Inc.

 Posted 18 years ago
Comment Quote
About William Pantoja -Collapse +Expand
Visit Profile
Approved member.
Member subscribes to this thread with a verified email.

Post ID #3388 (Level 1.1)  Reply to 2605
Thread Started 8/14/2001 10:05:00 PM
View Counter=2
Location=Woodinville, WA, USA  
Joined=18 years ago   MB Posts=163   KB Posts=1  
Brady Bouchard
-- USA
You can find the code to access a mdb file here:
Old UBB Archived Link: [URL=http://www.codeproject.com/asp/accessdb.asp]http://www.codeproject.com/asp/accessdb.asp[/URL]
 Posted 18 years ago
Comment Quote
About Brady Bouchard -Collapse +Expand
Visit Profile
Membership pending.
Member subscribes to this thread but email is NOT VERIFIED.
Email Not Verified!
Once email is verified, we will review and approve the account.
Web Presence Hidden.
Once above is taken care of, full Profile content will display including back links, about me, my message, custom Profile html, social networking links, message board signature, company profile, etc.

Post ID #3387 (Level 1.2)  Reply to 2605
Reply Posted 8/14/2001 7:03:00 PM
Location=-- USA 
Joined=18 years ago   MB Posts=1  

Revive Thread!

Add a comment to revive this old thread and make this archived thread more useful.

Write a Comment...
Full Editor
...
Sign in...

If you are a member, Sign In. Or, you can Create a Free account now.


Anonymous Post (text-only, no HTML):

Enter your name and security key.

Your Name:
Security key = P1194A1
Enter key:
Icon: A Post    Thread    Idea    Important!    Cool    Sad    No    Yes    Includes a Link...   
Thread #2605 Counter
2799
Since 4/2/2008
Follow PrestwoodBoards on: 


©1995-2019 PrestwoodBoards  [Security & Privacy]
Professional IT Services: Coding | Websites | Computer Tech