[Ahmed_Mansoor]

وعليكم السلام ورحمة الله وبركاته

أهلا بك أخي الكريم , إستخدم هذا الكود لقراءة أسطر الملف النصي , وتحديد نهاية السطر :

PHP كود :

Dim F As Integer
Dim CurrentLine As String

F = FreeFile
DoEvents

Open App.Path & "\TestFile.txt" For Input As #F
DoEvents

     While Not EOF(F)
      
           Line Input #F, CurrentLine
           DoEvents
                                  
           'نص السطر يكون في هذا المتغير ونهاية السطر هي نهاية محتوى هذا المتغير
           'CurrentLine
           
     Wend

Close #F
DoEvents