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

نسخة كاملة : تقسيم ملف نصي
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
هل من الممكن تقسيم محتوى ملف نصي الى عدة ملفات جزئية حيث يتم تحديد محتوى كل نص من خلال ملف نصي اخر يبين عدد الاسطر لكل ملف جزئي


كما هو موضح في الصورة

تفضل
PHP كود :
   Private Sub Button1_Click(sender As System.ObjectAs System.EventArgsHandles Button1.Click

        Dim splitref
() As String IO.File.ReadAllLines("مرجع التقسيم.txt")
 
       Dim globallines() As String IO.File.ReadAllLines("global.txt")

 
       Dim pos As Integer 0

        For Each s 
As String In splitref
            Dim t 
As New System.Text.StringBuilder

            Dim filename 
As String Split(s"=")(0) & ".txt"
 
           Dim count As Integer Val(Split(s"=")(1))

 
           For j 0 To count 1
                t
.AppendLine(globallines(pos j))
 
           Next

            pos 
+= count

            IO
.File.WriteAllText(filenamet.ToString)
 
       Next

    End Sub 
شيء محبط أن لا يعلق الكاتب على الموضوع وقت مشاهدته للحل.

أشكر الأستاذ أبو ليلي على محاولته تشجيع الاعضاء.

وداعاً.
(15-11-16, 01:59 AM)mhmd_911 كتب : [ -> ]شيء محبط أن لا يعلق الكاتب على الموضوع وقت مشاهدته للحل.

أشكر الأستاذ أبو ليلي على محاولته تشجيع الاعضاء.

وداعاً.

اسف اخي mhmd_911 كنت اعتقد اني علقت على جوابك على العموم كان حلك فعال و في صميم السؤال جزاك الله عنا الف خير