الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

مطلوب التعديل في هذا الكود

مغلق
بدأه iwi في 27 أبريل 2003 · 4 رد · 662 مشاهدة · في منتدى تصميم صفحات الويب
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

هذا الكود(Edit_conf ) يظهر كل البيانات في صفحة واحده , المراد تقسيم البيانات على عده صفحات, وجدت الكود الذي يقوم بهذه المهمةو هو مرفق ايضا ولكن لم ينجح معي,

----------------

التغيير يجب ان يكون في صفحة edit_conf.asp عند ,

' sub list here%>

<%

----------------------

الكود من الموقع

http://www.aspwebpro.com/aspscripts.asp

وشكرا.

display_next_page.rar

#2

ها هو كود تقسيم السجلات إلى حقول :

<%@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

#3

شكرا للرد استاذ محمد:

الرجاء النظر الى صفحةedit_site.asp في الملف المرفق, لانة الكود الاصلي, و هو واضح و سوف تفهم قصدي ان شاء الله.

aw_search.rar

#4

و الله أخي سامحني فلا وقت عندي الان .. فأنا في فترة اختبارات .. الطريقة التي كتبتها واضحة .. حاول فهمها و استيعابها و تطبيقها حتى تستفيد.. :)

You can fly while you can touch the sky

#5

ok . thanks a lot,

هذا الموضوع مغلق.

مواضيع مشابهة