منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
كيف تقوم بعمل صفحات للمواضيع :) - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم برمجة وتطوير المواقع (http://vb4arb.com/vb/forumdisplay.php?fid=51)
+--- قسم : قسم ASP.NET (http://vb4arb.com/vb/forumdisplay.php?fid=52)
+---- قسم : قسم مقالات ASP.NET (http://vb4arb.com/vb/forumdisplay.php?fid=54)
+---- الموضوع : كيف تقوم بعمل صفحات للمواضيع :) (/showthread.php?tid=6695)

الصفحات: 1 2 3


كيف تقوم بعمل صفحات للمواضيع :) - H111er - 27-10-12

لكن الا تعتقد ان امكانية حدوث خطا ستقل اذا استخدمت الوسم ؟
عموما على راحتك .. تحياتي لك


كيف تقوم بعمل صفحات للمواضيع :) - سعود - 27-10-12

H111er كتب :لكن الا تعتقد ان امكانية حدوث خطا ستقل اذا استخدمت الوسم ؟
عموما على راحتك .. تحياتي لك

فعلا اخي اظن انها الافضل احاول صياغة جملة بديلة وذلك باستبدال الهايرلينك بالوسم وهذه هي الجملة التي احاول استبدالها
كود :
For t = 1 To Pages
            Dim hyp As New HyperLink
            hyp.Text = t & " "
            hyp.NavigateUrl = "?page=" & t * 5 - 5
            zz.Controls.Add(hyp)

        Next



كيف تقوم بعمل صفحات للمواضيع :) - سعود - 27-10-12

عدلتها الى
كود :
Dim lbl As String = ""
        For t = 1 To Pages
            ' Dim hyp As New HyperLink
            '  hyp.Text = t & " "
            ' hyp.NavigateUrl = "?page=" & t * 5 - 5
            ' zz.Controls.Add(hyp)
            ' lbl &= t & " "
            ' lbl &= "<a href=""Members.aspx?ID=" & dr.Item("tid") & """ target=""_blank"">" & dr.Item("tname") & "</a>"""
            lbl &= "<a href=?page=" & t * 5 - 5 & ">" & t & "</a>"

            zz.InnerHtml = lbl
        Next

اواجه مشكلة وهي قفزر الترقيم الى اعلى بكل الصفحات الاخرى بينما الاولى يظل الترقيم اسفلSad
وهذه اكواد الاتش ام ال
كود :
<table class="style1" dir="rtl">
        <tr>
            <td id="tt" runat="server">
          
                &nbsp;</td>
        </tr>
        <tr>
            <td id="zz" runat="server">
          
                &nbsp;</td>
        </tr>
    </table>



كيف تقوم بعمل صفحات للمواضيع :) - سعود - 27-10-12

عرفت سبب القفز وهو ان الشرط الاول اضف الاداة الى تحكم tt بينما بعد الشرط اضفتها الى me.controls


كيف تقوم بعمل صفحات للمواضيع :) - H111er - 27-10-12

تستطيع استبدالها بهذا ..
إقتباس : For t = 1 To Pages
Dim hyp As String
hyp = "<a href=""?page=" & (t * 5 - 5).ToString & """" & t.tosrting & ">" + t + "</a>"
div1.innerHTML += hyp
Next



كيف تقوم بعمل صفحات للمواضيع :) - H111er - 27-10-12

اعذرني لم ارَ التعليقين الاخيرين Smile
اتمنى انك قد استطعت حل المشكلة .. اذا لم تستطع ارجو منك رفع المثال .. لاحاول معك التعديل عليه ^___^


كيف تقوم بعمل صفحات للمواضيع :) - سعود - 27-10-12

الحمدلله عرفت الاشكال وحليته بفضل الله
لدي استفسار كيف اضع مسافة بين كل رقم جربت
كود :
"&nbsp;"
لكن يظل المسافة ايضا تحتوي ارتباط


كيف تقوم بعمل صفحات للمواضيع :) - H111er - 27-10-12

كلامك صحيح اخي فهذه هي التي تقوم بعمل المسافة و لا خطا بها
مثلا
اذا كان الارتباط الاول يحولك الى google.com
و الثاني الى fb.com
و نريد وضع مسافة بينهما
سوف نكتب :
إقتباس :<a href="http://google.com">Google</a>&nbsp;<a href="http://fb.com">Facebook</a>
باختصار ليس هناك خطا في ما قلته انت ..


كيف تقوم بعمل صفحات للمواضيع :) - shaker.soft - 25-05-13

Nice . . . . . . . .. . . . . .