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

PHP كود :

                       Dim sourlinks As String = Application.StartupPath & "\allqares\" & p.Trim & "\" & p.Trim & "_sl.txt"
                        If IO.File.Exists(sourlinks) = False Then
                            IO.File.Create(sourlinks)
                        End If


                        Str &= m2 & vbNewLine
                        IO.File.WriteAllText(sourlinks, str) 

هنا يحدث خطا ان الملف قيد الاستخدام

سلام

كود :

IO.File.Create(sourlinks).Close()

موفقين

اين اكتبها؟
هل بعد

PHP كود :

IO.File.Create(sourlinks) 

سلام

فقط اضف close بالكود اللي عندك

كود :

Dim sourlinks As String = Application.StartupPath & "\allqares\" & p.Trim & "\" & p.Trim & "_sl.txt"

If IO.File.Exists(sourlinks) = False Then

    IO.File.Create(sourlinks).Close()

End If

Str &= m2 & vbNewLine

IO.File.WriteAllText(sourlinks, str)

ولكن لا تحتاجها طالما تسختدم WriteAllText فهي سنشئ الملف ان كان غير موجود

كود :

Dim sourlinks As String = Application.StartupPath & "\allqares\" & p.Trim & "\" & p.Trim & "_sl.txt"

Str &= m2 & vbNewLine

IO.File.WriteAllText(sourlinks, str)

موفقين

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

سعود

الطالب

سعود

الطالب