السلام عليكم ورحمة الله
عندي مصفوفة بها اميل وكلمة السر
اريد عرض الاميل في TextBox1
وعرض كلمة السر في TextBox2
المصفوفة في ملف Debug
ارجو المساعدة وشكرا
السلام عليكم
سيتم استخدام Split بناء على علامة أو رمز يفرق بين الايميل وكلمة السر.
ما هو شكل المدخلات في المصفوفة
عموما يمكنك ان تقرأ كل سطر في المصفوفة علي حده و تفصل كل سطر الي جزئين
و إما تضيفهم الي مصفوفتان أحدهما لكلمة السر و الأخري للإيميل
أو تضيفهم الي Dictionary (Of String, String) بحيث يكون المفتاح هو كلمة السر و القيمة هي الايميل او العكس
(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
هي الفكرة الي انتا عملتها لي في
هذا الموضوع اردت تطبيقها على الاميل و كلمة السر
بحيث اعرض الاميل لوحده
وكلمة السر لوحدها بعد فك التشفير
ارفع مشروعك لو تقدر
عموما في الكود الموجود في اللينك هناك دالة تقرأ المدخلات من الملف و هي عبارة عن شئ مثل الكود التالي
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 له ايميل و له اسم
اخي الكريم انا لا اريد تغيير الكنترول اريد تقسيم المصفوفة
مثلا المصفوفة بها اميل وكلمة السر فقط .
اريد ان اعرض كل واحد لوحده لا يهم تغيير الكنترول
الاميل لوحده في اي كنترول كان
وكلمة السر لوحدها في اي كنترول كان
ارجو ان تعذرني على الاطالة
وشكرا
يمكنك أن تفعل الأتي
تضيف ليست بوكس اخر
و تقسم المخرجات كالأتي
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
(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
بعد تغيير كلمة السر الى ارقام