[bidaya]

السلام عليكم ورحمة الله
عندي مصفوفة بها اميل وكلمة السر
اريد عرض الاميل في TextBox1
وعرض كلمة السر في TextBox2
المصفوفة في ملف Debug
ارجو المساعدة وشكرا

[مساعدة]

السلام عليكم

سيتم استخدام Split بناء على علامة أو رمز يفرق بين الايميل وكلمة السر.

[silverlight]

ما هو شكل المدخلات في المصفوفة
عموما يمكنك ان تقرأ كل سطر في المصفوفة علي حده و تفصل كل سطر الي جزئين
و إما تضيفهم الي مصفوفتان أحدهما لكلمة السر و الأخري للإيميل
أو تضيفهم الي Dictionary (Of String, String) بحيث يكون المفتاح هو كلمة السر و القيمة هي الايميل او العكس

[bidaya]

(20-01-17, 02:09 AM)مساعدة كتب : السلام عليكم

سيتم استخدام Split بناء على علامة أو رمز يفرق بين الايميل وكلمة السر.

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

[مساعدة]

ممكن عينة لو سمحت

[bidaya]

(20-01-17, 02:21 AM)silverlight كتب : ما هو شكل المدخلات في المصفوفة
عموما يمكنك ان تقرأ كل سطر في المصفوفة علي حده و تفصل كل سطر الي جزئين
و إما تضيفهم الي مصفوفتان أحدهما لكلمة السر و الأخري للإيميل
أو تضيفهم الي Dictionary (Of String, String) بحيث يكون المفتاح هو كلمة السر و القيمة هي الايميل او العكس

كود :

Public Class AssetInfo

   Public Index As String
   Public UriString As String

End Class

---

(20-01-17, 02:21 AM)silverlight كتب : ما هو شكل المدخلات في المصفوفة
عموما يمكنك ان تقرأ كل سطر في المصفوفة علي حده و تفصل كل سطر الي جزئين
و إما تضيفهم الي مصفوفتان أحدهما لكلمة السر و الأخري للإيميل
أو تضيفهم الي Dictionary (Of String, String) بحيث يكون المفتاح هو كلمة السر و القيمة هي الايميل او العكس

اخي الكريم silverlight
هي الفكرة الي انتا عملتها لي في هذا الموضوع اردت تطبيقها على الاميل و كلمة السر
بحيث اعرض الاميل لوحده
وكلمة السر لوحدها بعد فك التشفير

[silverlight]

ارفع مشروعك لو تقدر

عموما في الكود الموجود في اللينك هناك دالة تقرأ المدخلات من الملف و هي عبارة عن شئ مثل الكود التالي
Function Read(filename As String, guard As String) As List(Of AssetInfo)
لو استخدمها للقراةءة بشكل دقيق فهنا لن تحتاج الي عمل split لأن المدخلات اصلا عبارة عن الكلاس  AssetInfo
الي هو مكوناته String و ايميل

انا كنت كتبت لك كيف تقرأ من الملف كالتالي

كود :

For Each current As AssetInfo In context.Read
            ListBox1.Items.Add(current.Index + "- " + current.UriString)
        Next

بدل من اضافتهم الي الليست بوكس يمكن ان تستخدم البيانات مباشرة بأي شكل يحلو لك لأن كل Current له ايميل و له اسم

[bidaya]

اخي الكريم انا لا اريد تغيير الكنترول اريد تقسيم المصفوفة
مثلا المصفوفة بها اميل وكلمة السر فقط .
اريد ان اعرض كل واحد لوحده لا يهم تغيير الكنترول
الاميل لوحده في اي كنترول كان
وكلمة السر لوحدها في اي كنترول كان
ارجو ان تعذرني على الاطالة
وشكرا

[silverlight]

يمكنك أن تفعل الأتي
تضيف ليست بوكس اخر
و تقسم المخرجات كالأتي

PHP كود :

       For Each current As AssetInfo In AssetContextReader.Instance.Read
            If AssetsValidator.IsValidHttpOrNull(New Uri(current.UriString)) Then
                ListBox1.Items.Add(current.UriString)
                ListBox2.Items.Add(current.Index)
            End If
        Next 


او تضيف المخرجات الي مصفوفتان كالأتي

PHP كود :

       Dim list1 As New List(Of String)()
        Dim list2 As New List(Of String)()

        For Each current As AssetInfo In AssetContextReader.Instance.Read
            If AssetsValidator.IsValidHttpOrNull(New Uri(current.UriString)) Then
                list1.Add(current.UriString)
                list2.Add(current.Index)
            End If
        Next 


[bidaya]

(20-01-17, 03:05 AM)silverlight كتب : يمكنك أن تفعل الأتي
تضيف ليست بوكس اخر
و تقسم المخرجات كالأتي

PHP كود :

       For Each current As AssetInfo In AssetContextReader.Instance.Read
            If AssetsValidator.IsValidHttpOrNull(New Uri(current.UriString)) Then
                ListBox1.Items.Add(current.UriString)
                ListBox2.Items.Add(current.Index)
            End If
        Next 


او تضيف المخرجات الي مصفوفتان كالأتي

PHP كود :

       Dim list1 As New List(Of String)()
        Dim list2 As New List(Of String)()

        For Each current As AssetInfo In AssetContextReader.Instance.Read
            If AssetsValidator.IsValidHttpOrNull(New Uri(current.UriString)) Then
                list1.Add(current.UriString)
                list2.Add(current.Index)
            End If
        Next 


بعد تغيير كلمة السر الى ارقام