تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
كيفية تخصيص تسمية ملف نصي
#1
السلام عليكم ورحمة الله وبركاته 
لدي ملف نصي أريد حفظه بإسم مخصص 
بحيث هذا الإسم يأخد السنة + الشهر + الرقم
مثلا 
19_77_032019.txt
على أن أختار مكان حفظ الملف 
مع العلم الأرقام هي قيم  
txtboxNem1 و txtboxNem2
كود :
       Using Dilaoge As New SaveFileDialog
           Dilaoge.Filter = "txt files (*.txt)|*.txt|All files (*.*)|*.*"
           If Dilaoge.ShowDialog() = Windows.Forms.DialogResult.OK Then
               Dim NomFechiers As String = Dilaoge.FileName
               Dim StreamW As StreamWriter = File.CreateText(NomFechiers)

               Dim total = (From x As DataGridViewRow In DGView.Rows Select CDbl(x.Cells(4).Value)).Sum
               StreamW.WriteLine("" & DGView.RowCount & "" & Today.ToLongDateString & "" & FormatNumber(total))

               Dim Cellule1, Cellule2, Cellule3, Cellule4 As String
               For i As Integer = 0 To DGView.Rows.Count - 1
                   Cellule2 = (DGView.Rows(i).Cells(2).Value.ToString().PadLeft(5, "0") & "")
                   Cellule3 = (DGView.Rows(i).Cells(3).Value.ToString() & "")
                   Cellule4 = (DGView.Rows(i).Cells(4).Value.ToString() & "")
                   Cellule1 = (DGView.Rows(i).Cells(1).Value.ToString().PadLeft(27))
                   StreamW.Write(Cellule2 & "" & Cellule3 & "" & GetFormatNumber(Cellule4) & "" & Cellule1)
                   StreamW.WriteLine("")
               Next
               StreamW.Close()
               MessageBox.Show("تمت عملية الحفظ بنجاح")
           End If
       End Using
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] كيفية اضافة drm لمتصفح geckofx لسبسيب 2 75 27-10-20, 02:51 PM
آخر رد: لسبسيب
  كيفية معرفة رقم الهارديسك المتألق9 6 740 25-09-20, 11:42 PM
آخر رد: عبد العزيز البسكري
  [VB.NET] مشروع مرفق يبين كيفية التعامل مع Datagridview lkaam 4 2,666 23-09-20, 12:28 PM
آخر رد: sulim
  [VB.NET] كيفية تشفير اكواد البرنامج من السرقة ميدو الفنان 1 212 22-09-20, 07:17 AM
آخر رد: Anas Mahmoud
  كيفية الربط مع جوجل ايرث khaled12345 3 1,320 28-08-20, 06:14 PM
آخر رد: ahnouche sofiane
  كيفية الزيادة التلقائية لرصيد الإجازات في قاعدة البيانات الوايلي 3 1,542 28-08-20, 03:09 PM
آخر رد: Sholh
  كيفية عرض بيانات الغرفة من قاعدة البيانات إلى واجهة المستخدم sherf 0 225 16-08-20, 06:01 AM
آخر رد: sherf
  كيفية تحكم في TextBox cordava 6 524 07-07-20, 07:15 PM
آخر رد: cordava
  [سؤال] كيفية تحميل ادوات الديف اكسبريس ؟ منه 6 673 10-06-20, 06:00 AM
آخر رد: khodor1985
  [سؤال] كيفية عمل ارشيف للملفات المحفوظة عاصم النجار 4 467 03-06-20, 08:11 PM
آخر رد: kiki

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم