By using this site, you agree to our updated Privacy Policy and our Terms of Use. Manage your Cookies Settings.
457,864 Members | 1,264 Online
Bytes IT Community
+ Ask a Question
Need help? Post your question and get tips & solutions from a community of 457,864 IT Pros & Developers. It's quick & easy.

distribute in a page..

P: n/a
Hello..

I'm for a very long time trying to make somthing, but everytime it doesn't work..
This is what must happend:

If i have a guestbook with 100 letters, then wath i want is that a script distribute the letters on a page of 10 end that i have under the letters a buttun to go to te next letters ( 11-20 ) and a button to go back if you are not at page one. And in the middle of those 2 buttons i want to see how many pages with letters there are, and that you kan choose a number of a page to go to it.

It must show a bit like this

(1) (2) (3) (4) (5) Next page <-- this if you are on the first page
Prevous page (1) (2) (3) (4) (5) next page <-- this if you are on page 2 or whits one you want..

It must happend with this script:

----------------------------------------------
set rst = cnn.execute("SELECT * FROM tblGastenboek WHERE Gb_Pro_ID_Aan=" & CheckDBNum(Request("Pro_ID")) & " ORDER BY Gb_ID DESC ")

do until rst.eof
%>
<html>
<head>
<title>Profiel wijzigen</title>
<link rel="stylesheet" type="text/css" href="Style/Default.css">
</head>
<body topmargin="12" leftmargin="10" rightmargin="10" bottommargin="10">
<br>
<center>
<table width="400" cellpadding="0" cellspacing="1" border="0" bgcolor="#000000">
<tr>
<td bgcolor="#000000" height="15" width="165"><font color="#FFFFFF"><b>&nbsp;<%=rst("GBNickname")%></b></font></td>
<td bgcolor="#000000" width="84" align="center"><%
sPro_ID = session("Pro_ID")
if trim(sPro_ID) = trim(request("Pro_ID")) then %>
<a href="Gastenboek.asp?ACTION=DELETE&ID=<%=rst("GB_I D")%>&Pro_ID=<%=request("Pro_ID")%>"><font color="#FFFFFF">&nbsp;Verwijderen&nbsp;</font></a>
<%end if%>
</td>
<td bgcolor="#000000" width="147" align="center"><font color="#FFFFFF"><b><%=rst("GBDatum")%></b></font></td>
</tr>
<tr>
<td bgcolor="white" colspan="3">
<%
Bericht = rst("GBtekst")
If Bericht <> "" then
Bericht = Replace(Bericht, ">", "&gt;")
Bericht = Replace(Bericht, "<", "&lt;")
End if
%>
<%=Bericht%>
</td>
</tr>
</table>
</center>
</body>
</html>
<%
rst.movenext
loop
rst.close
set rst = nothing
----------------------------------------------

Is there sombody how can make it for me in this script.. please don't tell me wath i can try or can do, it wont work.. Zo please
if you know how to fix it, please make it for me..

If you can help me i wanna thank you very much!

Gr. Robert
Sep 3 '05 #1
Share this Question
Share on Google+
1 Reply


P: n/a
http://aspfaq.com/show.asp?id=2120

--
Regards

Steven Burn
Ur I.T. Mate Group
www.it-mate.co.uk

Keeping it FREE!

"Robert" <Bl*@bla.nl> wrote in message news:df**********@news.cistron.nl...
Hello..

I'm for a very long time trying to make somthing, but everytime it doesn't
work..
This is what must happend:

If i have a guestbook with 100 letters, then wath i want is that a script
distribute the letters on a page of 10 end that i have under the letters a
buttun to go to te next letters ( 11-20 ) and a button to go back if you are
not at page one. And in the middle of those 2 buttons i want to see how many
pages with letters there are, and that you kan choose a number of a page to
go to it.

It must show a bit like this

(1) (2) (3) (4) (5) Next page <-- this if you are on the first page
Prevous page (1) (2) (3) (4) (5) next page <-- this if you are on page 2 or
whits one you want..

It must happend with this script:

----------------------------------------------
set rst = cnn.execute("SELECT * FROM tblGastenboek WHERE Gb_Pro_ID_Aan=" &
CheckDBNum(Request("Pro_ID")) & " ORDER BY Gb_ID DESC ")

do until rst.eof
%>
<html>
<head>
<title>Profiel wijzigen</title>
<link rel="stylesheet" type="text/css" href="Style/Default.css">
</head>
<body topmargin="12" leftmargin="10" rightmargin="10" bottommargin="10">
<br>
<center>
<table width="400" cellpadding="0" cellspacing="1" border="0"
bgcolor="#000000">
<tr>
<td bgcolor="#000000" height="15" width="165"><font
color="#FFFFFF"><b>&nbsp;<%=rst("GBNickname")%></b></font></td>
<td bgcolor="#000000" width="84" align="center"><%
sPro_ID = session("Pro_ID")
if trim(sPro_ID) = trim(request("Pro_ID")) then %>
<a
href="Gastenboek.asp?ACTION=DELETE&ID=<%=rst("GB_I D")%>&Pro_ID=<%=request("P
ro_ID")%>"><font color="#FFFFFF">&nbsp;Verwijderen&nbsp;</font></a>
<%end if%>
</td>
<td bgcolor="#000000" width="147" align="center"><font
color="#FFFFFF"><b><%=rst("GBDatum")%></b></font></td>
</tr>
<tr>
<td bgcolor="white" colspan="3">
<%
Bericht = rst("GBtekst")
If Bericht <> "" then
Bericht = Replace(Bericht, ">", "&gt;")
Bericht = Replace(Bericht, "<", "&lt;")
End if
%>
<%=Bericht%>
</td>
</tr>
</table>
</center>
</body>
</html>
<%
rst.movenext
loop
rst.close
set rst = nothing
----------------------------------------------

Is there sombody how can make it for me in this script.. please don't tell
me wath i can try or can do, it wont work.. Zo please
if you know how to fix it, please make it for me..

If you can help me i wanna thank you very much!

Gr. Robert

Sep 3 '05 #2

This discussion thread is closed

Replies have been disabled for this discussion.