My.Settings.H = New ArrayList()My.Settings.H = New ArrayList(My.Settings.H)3booody كتب :[COLOR="#000080"]اعتذر على الخطأ لان جربت وما ظهر عندي ,والمشكلة اذا يتم انشاء فئة جديده من الكائن تختفي محتوياته السابقه وما استفدنا شي بهالحالة
ان شاء الله اجد حل عن قريب[/COLOR]
If My.Settings.H Is [color=#FF0000]Nothing[/color] Then
[color=#0000FF] My.Settings.H = New System.Collections.ArrayList[/color]
End Ifالشاكي لله كتب :بعد اذن اخي عبوود
يحصل هذا الخطا عندما يكون الsetting المسمى H فارغ (nothing)
فيمكننا عمل (Instance) ليتم ملأه بنسخة الكائن :
عدل كود webBowser1_documentComplete
PHP كود :
Private Sub WebBrowser1_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted
Try
If My.Settings.H Is Nothing Then
My.Settings.H = New System.Collections.ArrayList
End If
If Not My.Settings.H.Contains(Me.WebBrowser1.Url.AbsoluteUri) Then
My.Settings.H.Add(Me.WebBrowser1.Url.AbsoluteUri)
My.Settings.Save()
MsgBox("تم الحفظ")
End If
Catch ex As Exception
End Try
End Sub
3booody كتب :[COLOR="#800000"]لقيت الحل والحمدلله
غير الكود التالي[/COLOR]
كود :
My.Settings.H = New ArrayList()
الى هذا
كود :
My.Settings.H = New ArrayList(My.Settings.H)