Programming Help
 
Forums: » Register « |  User CP |  Games |  Calendar |  Members |  FAQs |  Sitemap |  Support | 
 
User Name:
Password:
Remember me
Go Back   ASP Free ForumsOtherProgramming Help

Reply
Add This Thread To:
  Del.icio.us   Digg   Google   Spurl   Blink   Furl   Simpy   Y! MyWeb 
Thread Tools Search this Thread Rate Thread Display Modes
 
Unread ASP Free Forums Sponsor:
  #1  
Old March 6th, 2007, 01:36 PM
rootdaddy rootdaddy is offline
Registered User
ASP Free Newbie (0 - 499 posts)
 
Join Date: Mar 2007
Posts: 8 rootdaddy User rank is Just a Lowly Private (1 - 20 Reputation Level) 
Time spent in forums: 2 h 27 m 9 sec
Reputation Power: 0
Send a message via AIM to rootdaddy
Question Hopefully this is my last issue with this site ...

Here is the code for the "default page", where the posts will be displayed:

<%
if Request.QueryString("archive")<>"" then
iPage=Request.QueryString("archive")
else
ipage=1
end if




SQL="select post_id,email ,post_date ,equip_type ,manu ,year_made ,model_num ,serial_num ,odo_read ,hour_read ,attach_type ,capacity ,price, post_body,OLE_Object " & _
"from posts" & _
" order by post_date desc"

objrs.open sql,objconn,1,2
if not objrs.eof then
'set the recordset page size
objRS.PageSize=10
totcount=objrs.recordcount
'temp number to count down from
reccount=10
'move to the current page
objRS.AbsolutePage=iPage

'add to a string variable to display later
'this is the page number links for the archive.
recstring= ""

ic=0
if totcount>0 then
for i = 1 to totcount step 10
ic=ic+1
if cint(ic)=cint(ipage) then
recstring=recstring& "<span style=""background-colorrange"">&nbsp;" & ic & "&nbsp;</span>&nbsp;|&nbsp;"
else
recstring=recstring& "<a href=default.asp?archive="&ic & ">&nbsp;" & ic & "&nbsp;</a>&nbsp;|&nbsp;"
end if
next
end if


'now loop through the current page.
while not objrs.eof and reccount>0
reccount=reccount-1

Response.write"<div style=""border:1px solid silver;background-color:eeeeee;font-family:verdana;font-size:12px"">"
Response.Write "<div style=""display:inline;font-size:11px"" align=right>"
Response.write "<b>[ Posted at " & formatdatetime(objrs("post_date"),4) & " "
Response.write "on " & formatdatetime(objrs("post_date"),1) & "</i> ]</b><BR>"
Response.BinaryWrite objrs("OLE_Object") & "<BR>"
Response.Write "<BR>" & "<b>Equipment Type:</b> " & objrs("equip_type") & "<BR>"
Response.Write "<BR>" & "<b>Manufacturer:</b> " & objrs("manu") & "<BR>"
Response.Write "<BR>" & "<b>Year:</b> " & objrs("year_made") & "<BR>"
Response.Write "<BR>" & "<b>Odometer Reading:</b> " & objrs("odo_read") & "<BR>"
Response.Write "<BR>" & "<b>Hour Meter Reading:</b> " & objrs("hour_read") & "<BR>"
Response.Write "<BR>" & "<b>Attachment Type:</b> " & objrs("attach_type") & "<BR>"
Response.Write "<BR>" & "<b>Capacity:</b> " & objrs("capacity") & "<BR>"
Response.Write "<BR>" & "<b>Price:</b> " & objrs("price") & "<BR>"
Response.Write "<BR>" & "<b>Features:</b> " & objrs("post_body") & "<BR>"
Response.Write "<BR>" & "<b>Email Us:</b> " & "&nbsp&nbsp<a href=mailto:willyw@alliftlb.com>Click Here! </a>" & "<BR>"
Response.write "</div></div>"
Response.Write "<BR><BR>"

objrs.movenext

wend


end if


Response.Write "<BR><BR><b> Lift Trucks<BR>"
'output the string we created earlier
Response.Write recstring & "<BR>"


%> </div>

Reply With Quote
  #2  
Old March 6th, 2007, 02:33 PM
mehere's Avatar
mehere mehere is offline
Senior Sarcasm Wizardess
ASP Free God 17th Plane (13000 - 13499 posts)
 
Join Date: Feb 2005
Location: Dreamland
Posts: 13,239 mehere User rank is General 16th Grade (Above 100000 Reputation Level)mehere User rank is General 16th Grade (Above 100000 Reputation Level)mehere User rank is General 16th Grade (Above 100000 Reputation Level)mehere User rank is General 16th Grade (Above 100000 Reputation Level)mehere User rank is General 16th Grade (Above 100000 Reputation Level)mehere User rank is General 16th Grade (Above 100000 Reputation Level)mehere User rank is General 16th Grade (Above 100000 Reputation Level)mehere User rank is General 16th Grade (Above 100000 Reputation Level)mehere User rank is General 16th Grade (Above 100000 Reputation Level)mehere User rank is General 16th Grade (Above 100000 Reputation Level)mehere User rank is General 16th Grade (Above 100000 Reputation Level)mehere User rank is General 16th Grade (Above 100000 Reputation Level)mehere User rank is General 16th Grade (Above 100000 Reputation Level)mehere User rank is General 16th Grade (Above 100000 Reputation Level)mehere User rank is General 16th Grade (Above 100000 Reputation Level)mehere User rank is General 16th Grade (Above 100000 Reputation Level)  Folding Points: 10976 Folding Title: Novice Folder
Time spent in forums: 5 Months 1 Day 20 h 17 m 47 sec
Reputation Power: 2037
do you have a question or a problem?
__________________
Come JOIN the party!!!

Quote of the Month:
Pretension: The downside of being better than everyone else is that people tend to assume you're pretentious.

Questions to Ponder:
You can be overwhelmed and underwhelmed, but why can't you be simply whelmed?

iif([sarcasm]=true,iif([you have to ask]=true,"didn't work","ha ha ha"),"not sarcasm")
copyright© 2008 sbenj69

Reply With Quote
  #3  
Old March 6th, 2007, 03:19 PM
rootdaddy rootdaddy is offline
Registered User
ASP Free Newbie (0 - 499 posts)
 
Join Date: Mar 2007
Posts: 8 rootdaddy User rank is Just a Lowly Private (1 - 20 Reputation Level) 
Time spent in forums: 2 h 27 m 9 sec
Reputation Power: 0
Send a message via AIM to rootdaddy
that's so weird ... I swear I wrote more below all that ...

I'm having a problem with the image not loading in the default.asp file after posting from the new post.asp file ...

Do you know what I've screwed up on ... the image is supposed to load as the Response.BinaryWrite OLE_Object

Reply With Quote
  #4  
Old March 7th, 2007, 08:58 AM
Shadow Wizard's Avatar
Shadow Wizard Shadow Wizard is offline
Moderator From Beyond
Click here for more information
 
Join Date: Sep 2004
Location: Israel
Posts: 29,260 Shadow Wizard User rank is General 23rd Grade (Above 100000 Reputation Level)Shadow Wizard User rank is General 23rd Grade (Above 100000 Reputation Level)Shadow Wizard User rank is General 23rd Grade (Above 100000 Reputation Level)Shadow Wizard User rank is General 23rd Grade (Above 100000 Reputation Level)Shadow Wizard User rank is General 23rd Grade (Above 100000 Reputation Level)Shadow Wizard User rank is General 23rd Grade (Above 100000 Reputation Level)Shadow Wizard User rank is General 23rd Grade (Above 100000 Reputation Level)Shadow Wizard User rank is General 23rd Grade (Above 100000 Reputation Level)Shadow Wizard User rank is General 23rd Grade (Above 100000 Reputation Level)Shadow Wizard User rank is General 23rd Grade (Above 100000 Reputation Level)Shadow Wizard User rank is General 23rd Grade (Above 100000 Reputation Level)Shadow Wizard User rank is General 23rd Grade (Above 100000 Reputation Level)Shadow Wizard User rank is General 23rd Grade (Above 100000 Reputation Level)Shadow Wizard User rank is General 23rd Grade (Above 100000 Reputation Level)Shadow Wizard User rank is General 23rd Grade (Above 100000 Reputation Level)Shadow Wizard User rank is General 23rd Grade (Above 100000 Reputation Level)  Folding Points: 587027 Folding Title: Super Ultimate Folder - Level 2Folding Points: 587027 Folding Title: Super Ultimate Folder - Level 2Folding Points: 587027 Folding Title: Super Ultimate Folder - Level 2Folding Points: 587027 Folding Title: Super Ultimate Folder - Level 2Folding Points: 587027 Folding Title: Super Ultimate Folder - Level 2Folding Points: 587027 Folding Title: Super Ultimate Folder - Level 2Folding Points: 587027 Folding Title: Super Ultimate Folder - Level 2
Time spent in forums: 3 Months 2 Weeks 2 Days 30 m 22 sec
Reputation Power: 2509
please use code tags to wrap your code.

Reply With Quote
Reply

Viewing: ASP Free ForumsOtherProgramming Help > Hopefully this is my last issue with this site ...


Thread Tools  Search this Thread 
Search this Thread:

Advanced Search
Display Modes  Rate This Thread 
Rate This Thread:


Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

vB code is On
Smilies are On
[IMG] code is On
HTML code is Off
View Your Warnings | New Posts | Latest News | Latest Threads | Shoutbox
Forum Jump





 Free IT White Papers!
 
Create the Optimal Architecture for your Critical Applications
Warburton's the largest independently owned bakery in the UK faced a number of difficult challenges in providing the most robust yet efficient IT infrastructure for their organization's success. IBM's services combined with their xSeries servers created the perfect platform for their SAP environment with sufficient flexibility, and did so in very time effective fashion.

 
Five Best Practices for Deploying a Successful Service-Oriented Architecture
This white paper describes the benefits you can expect with SOA, and how IBM can help take your business there.

 
Gartner Magic Quadrant for Application Delivery Controllers
Gartner summarizes its view on Application Delivery Controllers, evaluates strengths and weaknesses of solutions, and provides Magic Quadrant reporting for a quick comparison across all vendors. Learn from Gartner how you can benefit from an all-in-one device like Citrix NetScaler that delivers the highest levels of availability, performance and security.

 
Knowledge is Power
What you don't know can hurt you, and is likely costing you money and increasing your security risks during an era of scarce resources. This white paper proposes six key strategies that enterprise security managers can use to improve their network defense posture.

 
Rationalizing the Multi-Tool Environment
The rationalized multi-tool approach is flexible, scalable and cost effective. It provides the necessary input to the IT service management business processes. It preserves prior investments in monitoring tools, empowers technologists to select the best tools with which to do their jobs, and enhances effective response to incidents.

 

Forums: » Register « |  User CP |  Games |  Calendar |  Members |  FAQs |  Sitemap |  Support | 
  
 





© 2003-2010 by Developer Shed. All rights reserved. DS Cluster 2 Hosted by Hostway
For more Enterprise Application Development news, visit eWeek