منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب - مشكلة منطقية اكثر من برمجية ارجوا المساعدة

السلام عليكم اخوتي :

عندي مشكلة منطقية وهي عندي برنامج يقوم بقراءة ملف باسم معين مثلا ليكن : Readme.txt
ويقوم بقراءة الملف سطر سطر ... ولحد الآن الامر ماشي تمام ... وعند قراءته الاسطر اذا وجدا مثلا كلمة Vb4arab.com يقوم بفتح الموقع على الانترنت ... والامر ايضا ماشي تمام ... لكن المشكلة هي اني لم اجد فكرة لكي يقوم بفتح الموع مرة واحدة وليس كل مرة ... مع العلم ان الكود السابق الخاص بالقراءة موضوع في Timer ... هل من حل ؟ Huh

PHP كود :

Dim desktopPath As String = Environment.GetFolderPath(Environment.SpecialFolder.Desktop)
        Dim txtFilePath As String = desktopPath & "\Readme.txt"
        Dim wantedSites As New List(Of String)({"www.vb4arb.com", "www.stackoverflow.com"})
        Dim visitedSites As New List(Of String)
        Dim lines As String() = IO.File.ReadAllLines(txtFilePath)
        For x As Integer = 0 To lines.Length - 1
            For xx As Integer = 0 To wantedSites.Count - 1
                If lines(x).Contains(wantedSites(xx)) Then
                    If Not visitedSites.Contains(wantedSites(xx)) Then
                        Process.Start(wantedSites(xx))
                        visitedSites.Add(wantedSites(xx))
                    End If
                End If
            Next
        Next 

منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

Mr.ILI

Aly El-Haddad