What is a "Foreword" to a blog?
Hotizontal Records Display in ASP.
Hello Guest		   
  • Login
• Register…
• Start blog		   • Who, Where, When
• What can I do?
• What to Read?		   • Polls
• Avatars
• Interests		   • Cities and Countries
• Random blog
• Users search		   • Search
• Games
• Tests
• QAIX		   • Сообщества
• Talxy Chat
• Horoscope
• Online		  
Зарегистрируйся!
QAIX > ASP web-programming > Hotizontal Records Display in ASP. 16 September 2008 04:07:29
  Recent blog posts: 
True nobleness
On the calm sea, everybody is the navigator. However, only the sunshine has no shade, only have no…

_4_
…

mego day!
:-O­ yesss I today went for a walk from a 6 morning! it super! so merrily that pipec!

Everybody is a book
Everybody is a book, parents are our publishing houses, and our publication time on birthday, the ID…

boring..boring...boring :-|…
boring..boring...bor­­ing :-|­ where people? bitchs...not abandon me one…

here so quietly and boring! on…
here so quietly and boring! on beone merrier far! well but I can sit in a quiet.... and not who by the…

Transfer iTunes Library to Zune
If you have moved from Apple iPod to Microsoft Zune, you probably have some songs that you purchased&hellip­;

hello!
hello!I here new! interestingly me what people dwell on this site... I search friends from the command…

Routes on Sale!
Looking for great Quality/Competitive­­ Rates???? Breezecom FZC is offering: PAKISTAN! CLI…

Hello!
Hello!

  Forums:   
    topic feeds

• QAIX  all topics, blogs and comments

• PHP web-programming

• Perl web-programming

• ASP web-programming

• Visual Basic Programming

• .Net Development

• C/C++ Programming

• Java Programming

• Javascript web-programming

• Apache HTTP Server

• Web-design

• Web-hosting, dedicated, colocation

• HTML web-programming

• XML development

• General Web-programming

• Content Management Systems

• ColdFusion

• Search Engine Optimization

• Hardware

• Software, Computer Help

• MySQL database development

• PostgreSQL database development

• MS Access database development

• Oracle database development

• MS SQL database development

• Informix database development

• Buy / Sell

• Open discussion

• Anonymous
  Discuss: 
Select Records between…
I've built a Point-of-Sale using "classic" asp (it's what I know) and I'm trying to get daily…

Borwser prompts for…
I have put together a very simple internal web site that runs on Windows 2003 Server. Anonymous access…

Possible to include SSI in ASP…
Hi, We want to include some SSI in our ASP pages, but where the SSI is located on a different server…

text wait or hourglass
Hi Can someone please help me with the following: I have an ASP-page where a query runs, it…
  Recent forum topics: 
[blead-227-gbd2db5d] mkppport…
Small fix, mkppport is using catfile instead of catdir. -John wb8tyw@gmai.com…

[blead-227-gbd2db5d]…
When VMS is in UNIX mode, conversions from UNIX specifications to VMS can result in a trailing '.'…

[blead-227-gbd2db5d]…
The tests lib/blib.t and lib/h2xs.t need fixes to know when VMS is in the UNIX report mode. -John…
  Recent forum comments:
RE: NEW NEOPOINT GENERATOR v2…
Is it really that hard to hack neopets? I figure someone must of done something about that O:

RE: Playing a video
Hi Murray First, thanks for your response. I'm kind of a "non techie" so I'm not sure if I…

RE: Playing a video
See http://www.w3.org/Q­A/Tools/#validators and in particular…

RE: Limitation in Number of Fields…
Stefan, Thanks for your response ... The last field that is captured by the database in called (40…

RE: Frustrated, Frontpage…
terrabit;9214809 Wrote: Or better still upgrade to Dreamweaver, once you learn how to use it properly…

RE: saving a page in fp
Save html pages as web pages. First principles: Before doing anything, open the web site in FrontPage…

RE: Limitation in Number of Fields…
Post a URL to the form online -- ___________________­____________________­______ SBR…

RE: Captcha
You can do a simple captcha-like validation with FP's forms...just put question there like; Ice is Hot…

RE: saving a page in fp
omg... thank yu so very much ronx. i know my ramblings were just thrown out there and i really didnt…

RE: Creating Java/DHTML Vertical…
On Sep 24, 1:59pm, "Trevor Lawrence" <Trevor L.@Canberra> wrote: Hi Trevor, yeah I'm…
  Moderators:
 Administrator
 Protorioris

Hotizontal Records Display in ASP.

iahamed via WebmasterKB.com 16 September 2008 04:07:29
 Hi all,

I need to display records Horizontally, I do not know for some reason this
code gives me an error, uses an access db.

Error type:

Microsoft VBScript compilation (0x800A040E)
'loop' without 'do'
/aspcodes/DisplayRO­wsHorizon/index.asp,­ line 26
Loop

I normally use the While Not objRS.EOF and close it with a Wend. Using what
ever way here it clashes with the If Statement Logic.


index.asp

</html>

<title>Hotizontal Records Display.</title>

<!--#include file="conn.asp"-->

<body>

<%
DIM mySQL, objRS
mySQL = "SELECT * FROM tblData"
Set objRS = Server.CreateObject­("ADODB.Recordset")
objRS.Open mySQL, objConn

DIM recCount
IF Not objRS.EOF THEN
Response.Write "<table width='100%'>"
recCount = 0
Do UNTIL objRS.EOF

IF recCount Mod 3 = 0 THEN

IF recCount <> 0 THEN
Response.Write "</tr>"
Response.Write "<tr><td>"&objRS("I­tem")&"</td>"
ELSE
Response.Write "<td>"&objRS("Item"­)&"</td>"
END IF

recCount = recCount + 1
objRS.MoveNext
Loop

Response.Write"</tr­></table>"
ELSE
Response.Write "Sorry, there are no records in our database."
END IF
%>

</body>

</html>

-------------------­--------------------­--------------------­-------------

Con.asp

'Dim objRS Name is in Index so cannot redefine
'Dim objRS
set objRS= Server.CreateObject­("ADODB.Connection")­
objRS.Open ("Provider=Microsof­t.Jet.OLEDB.4.0; Data Source="& Server.MapPath
("/aspcodes/Display­ROwsHorizon/DisRowHo­rizon.mdb"))


Your Help in this regard will be Highly appreciated.

Thank you.

--
Message posted via WebmasterKB.com
http://www.webmaste­rkb.com/Uwe/Forums.a­spx/asp-db/200808/1

Add comment
Evertjan. 10 August 2008 11:21:57 [ permanent link ]
 iahamed via WebmasterKB.com wrote on 10 aug 2008 in
microsoft.public.in­etserver.asp.db:

I need to display records Horizontally, I do not know for some reason
this code gives me an error, uses an access db.

Please do not multipost, already answered elsewhere.

--
Evertjan.
The Netherlands.
(Please change the x'es to dots in my emailaddress)
Add comment
iahamed via WebmasterKB.com 11 August 2008 07:31:29 [ permanent link ]
 Hello Evertjan,

I do not know How to thank you and the Great Forum of WebmasterKB. This is
One Forum that I always visit to get solutions in ASP. Its nice to see the
ASP Lovers here. Thank you So much, SO much for the wonderful Help given in
this Regard.

It was an erroneous error made by me in the DB connection, with your Kind
Generosity Evertjan, I had to make it work with ASP and HTML table that makes
it more Rational. Heres the Code:


<%
Dim connStr
connStr = "Provider=Microsoft­.Jet.OLEDB.4.0; Data Source=" & Server.MapPath
("DisRowHorizon.mdb­")
Dim objRS
Set objRS = Server.CreateObject­("ADODB.Recordset")
objRS.Open "select [Id],[Item] from tblData order by [ID] desc",
connStr, 3, 4
%>
<%
IF Not objRS.EOF THEN %>

<table border="1" width="150" cellspacing="3" id="table1" height="64"
bordercolorlight="#­F5F5F5" style="border-colla­pse: collapse"
bordercolor="#F5F5F­5" cellpadding="3">

<% recCount = 0
While Not objRS.EOF
'DO UNTIL objRS.EOF

IF recCount Mod 3 = 0 THEN
%>
<tr>

<% END IF %>

<td><%=objRS("Item"­)%></td>

<% recCount = recCount + 1

IF recCount Mod 3 = 0 THEN %>

</tr>

<% END IF

objRS.MoveNext
'LOOP
Wend

IF recCount Mod 3 <> 0 THEN %>

</tr>

<% END IF %>


</table>

<%

ELSE
Response.Write "Sorry, there are no records in our database."
END IF

objRS.Close
Set objRS = Nothing

%>


Thank you Once again Evertjan, WIsh you good luck in your career. Web master
KB, thank you for the Lovely Work.

B' Regards.

--
Message posted via WebmasterKB.com
http://www.webmaste­rkb.com/Uwe/Forums.a­spx/asp/200808/1

Add comment
Guest 16 September 2008 04:07:29 [ permanent link ]
 On Aug 10, 2:52am, "iahamed via WebmasterKB.com" <u42620@uwe> wrote:
Hi all,
I need to display records Horizontally, I do not know for some reason this
code gives me an error, uses an access db.
Error type:
Microsoft VBScript compilation (0x800A040E)
'loop' without 'do'
/aspcodes/DisplayRO­wsHorizon/index.asp,­ line 26
Loop
I normally use the While Not objRS.EOF and close it with a Wend. Using what
ever way here it clashes with the If Statement Logic.
index.asp
</html>
<title>Hotizontal Records Display.</title>
<!--#include file="conn.asp"-->
<body>
<%
DIM mySQL, objRS
mySQL = "SELECT * FROM tblData"
Set objRS = Server.CreateObject­("ADODB.Recordset")
objRS.Open mySQL, objConn
DIM recCount
IF Not objRS.EOF THEN
Response.Write "<table width='100%'>"
recCount = 0
Do UNTIL objRS.EOF
IF recCount Mod 3 = 0 THEN
IF recCount <> 0 THEN
Response.Write "</tr>"
Response.Write "<tr><td>"&objRS("I­tem")&"</td>"
ELSE
Response.Write "<td>"&objRS("Item"­)&"</td>"
END IF
recCount = recCount + 1
objRS.MoveNext
Loop
Response.Write"</tr­></table>"
ELSE
Response.Write "Sorry, there are no records in our database."
END IF
%>
</body>
</html>
-------------------­--------------------­--------------------­-------------
Con.asp
'Dim objRS Name is in Index so cannot redefine
'Dim objRS
set objRS= Server.CreateObject­("ADODB.Connection")­
objRS.Open ("Provider=Microsof­t.Jet.OLEDB.4.0; Data Source="& Server.MapPath
("/aspcodes/Display­ROwsHorizon/DisRowHo­rizon.mdb"))
Your Help in this regard will be Highly appreciated.
Thank you.
--
Message posted via WebmasterKB.comhttp­://www.webmasterkb.c­om/Uwe/Forums.aspx/a­sp-db/200808/1

For reference here's a short article I wrote about displaying records
horizontally:

Classic ASP Design Tips - Multiple Records in Each Row
http://www.bullschm­idt.com/devtip-multi­plerecsineachrow.asp­

Best regards,
-Paul
www.Bullschmidt.com­ - Freelance Web and Database Developer
www.Bullschmidt.com­/DevTip.asp - Classic ASP Design Tips
Add comment
 

Add new comment

As:
Login:  Password:  
 
 
  
 
Пожалуйста, относитесь к собеседникам уважительно, не используйте нецензурные слова, не злоупотребляйте заглавными буквами, не публикуйте рекламу и объявления о купле/продаже, а также материалы нарушающие сетевой этикет или УК РФ.

QAIX > ASP web-programming > Hotizontal Records Display in ASP. 16 September 2008 04:07:29
see also:
Delegation syntax? (was: Re: Private…
Object Instantiation (Was: Re…
Re: Perlmasons. Be the first on your…
пройди тесты:
see also:
Reports from jemmy framework
documentum training
why not in frensh?
  Copyright © 2001—2008 QAIX
Idea: Miсhael Monashev
Помощь и задать вопросы можно в сообществе support.qaix.com.
Сообщения об ошибках оставляем в сообществе bugs.qaix.com.
Предложения и комментарии пишем в сообществе suggest.qaix.com.
Информация для родителей.
Write us at:
If you would like to report an abuse of our service, such as a spam message, please .