16-08-13, 07:22 PM
الشاكي لله كتب :بعد اذن اخي عبوود
يحصل هذا الخطا عندما يكون ال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
جزيل الشكر اخي ممنون
