منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

اخواني الاعزاء توصلت لطريقة عرض الاسماء المسجلين بالطريقة التالية:
ضمن موديول كتبت

كود :

Public lst As New List(Of String)

وعند تسجيل الدخول بعد التحقق كتبت

كود :

Session("name") = dr.Item("tname")

            Session("tid") = dr.Item("tid")

            lst.Add(Session("name"))

وبالصفحة الرئيسية كتبت

كود :

For Each itm In lst

            If Label1.Text.Contains(itm) = False Then

                Label1.Text &= "<a href=member.aspx?mid=" & Session("tid") & "&mn=" & itm & ">" & itm & "</a>" & " ,"

            End If

        Next

الاشكال ان رقم الاي دي موحد للكل بسبب متغير حالة الجلسة يعني لو الاي دي رقم 1 للمسجل سيصبح الكل رقم 1 فكيف اقوم بتخزين الاي دي ضمن List بنفس الطريقة لكن اريد ان اعرف ان الرقم الفلاني للمسجل الفلاني؟
ارجو ان يكون السؤال واضحا وشكرا لكم جميعا

وجدت الحل والحمدلله وهو بتخزين الاسم وبعده الاي دي وبينهم علامة مثل "#" ونستخدم split ليكون مكان الاسم 0 ومكان الاي دي 1

كود :

Dim P() As String

        For Each itm In lst

            Dim o As String = itm

            P = o.Split("#")

            If Label1.Text.Contains(P(0)) = False Then

                '  Label1.Text &= "<a href=member.aspx?mn=" & itm & ">" & itm & "</a>" & " ,"

                Label1.Text &= "<a href=member.aspx?mid=" & P(1) & "&mn=" & P(0) & ">" & P(0) & "</a>" & " ,"

            End If

        Next

والحمدلله الامور تمام Smile

يلا من يفطر معي Smile

كان بامكانك استخدام

PHP كود :

Dim myvariable As New Generic.Dictionary(Of Integer, String)
او
        Dim myvariable1 As New Generic.SortedDictionary(Of Integer, String)
بحيث تقوم بتمرير ال id والاسم 

طيب اخوي امجد شلون نخزن بها قيم؟

استكمالا للكود

PHP كود :

myvariable.add(session("tid"),session("name"))
وبهذا يتم اضافة ال id والاسم معا 

منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

سعود

سعود

amgadtamer

سعود

amgadtamer