[سعود]

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

كود :

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

والحمدلله الامور تمام يلا من يفطر معي

[amgadtamer]

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

PHP كود :

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


[سعود]

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

[amgadtamer]

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

PHP كود :

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