هذا الكود(Edit_conf ) يظهر كل البيانات في صفحة واحده , المراد تقسيم البيانات على عده صفحات, وجدت الكود الذي يقوم بهذه المهمةو هو مرفق ايضا ولكن لم ينجح معي,
----------------
التغيير يجب ان يكون في صفحة edit_conf.asp عند ,
' sub list here%>
<%
----------------------
الكود من الموقع
http://www.aspwebpro.com/aspscripts.asp
وشكرا.
ها هو كود تقسيم السجلات إلى حقول :
<%@codepage=1256%>
<html dir="rtl">
<head>
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1256">
<title>Pagination</title>
</head>
<body>
<%
Set objConn = CreateObject("ADODB.Connection")
objConn.Open("driver={Microsoft Access Driver (*.mdb)};dbq=" & _
Server.MapPath("db.mdb"))
SQL="select * from table1"
set rs=Server.CreateObject("ADODB.Recordset")
rs.open SQL,objconn,3
page=CLng(request("page"))
if page="" then page=1
if page<1 then page=1
rs.pagesize=10
rs.AbsolutePage=page
for ipage=1 to rs.pagesize
response.write "
"
response.write rs("name")
rs.movenext
if rs.eof then exit for
next
%>
</body>
<%
path="default.asp?"
printFNBE page,path
function printFNBE(page,path)
response.write "<center>"
if page<>1 then
response.write "
"
response.write "البداية"&VBCrlf
response.write "للخلف"&VBCrlf
end if
if page<>rs.pagecount then
response.write "للأمام"&VBCrlf
response.write "النهاية"&VBCrlf
end if
response.write "
"
response.write "<font color=""red"">"&rs.pagecount&"/"&page&"</font>"
response.write "</center>"
end function
%>
</html>You can fly while you can touch the sky
شكرا للرد استاذ محمد:
الرجاء النظر الى صفحةedit_site.asp في الملف المرفق, لانة الكود الاصلي, و هو واضح و سوف تفهم قصدي ان شاء الله.
و الله أخي سامحني فلا وقت عندي الان .. فأنا في فترة اختبارات .. الطريقة التي كتبتها واضحة .. حاول فهمها و استيعابها و تطبيقها حتى تستفيد.. :)
You can fly while you can touch the sky
ok . thanks a lot,
هذا الموضوع مغلق.