[محمد اسماعيل]

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

اريد طريقة لتصدير الداتا جريد فيو لملف csv

علما بالاتي تاني عمود بالداتاجريد يحتوي علي فونت مخصص وهو مشفر بالاسم "AlmaFont"


لايظهر الفونت بملف csv عند تصدير البيانات بملف csv علي الرغم من انة موجود بالداتاجريد فيو

وعايز اتجاهل اول عمود بالداتاجريد فيو عند التصدير لملف csv

الكود الخاص بالتصدير مع وجود العمود الاول المراد تجاهلة وبدون فورمات العمود الثاني للفونت المطلوب

كود :

Dim thecsvfile As String = String.Empty
       For Each column As DataGridViewColumn In DATAG_CLIEN.Columns
           thecsvfile = thecsvfile & column.HeaderText & ","
       Next
       thecsvfile = thecsvfile.TrimEnd(",")
       thecsvfile = thecsvfile & vbCr & vbLf
   
       For Each row As DataGridViewRow In DATAG_CLIEN.Rows
                      For Each cell As DataGridViewCell In row.Cells
               thecsvfile = thecsvfile & cell.FormattedValue.replace(",", "") & ","
           Next
                    thecsvfile = thecsvfile.TrimEnd(",")
           'Add the line to the output
           thecsvfile = thecsvfile & vbCr & vbLf
       Next
       My.Computer.FileSystem.WriteAllText("D:\New folder\export.csv", thecsvfile, False)

[smalw]

(18-12-19, 12:47 AM)محمد اسماعيل كتب : السلام عليكم ورحمة الله وبركاتة

اريد طريقة لتصدير الداتا جريد فيو لملف csv

علما بالاتي تاني عمود بالداتاجريد يحتوي علي فونت مخصص وهو مشفر بالاسم "AlmaFont"


لايظهر الفونت بملف csv عند تصدير البيانات بملف csv علي الرغم من انة موجود بالداتاجريد فيو

وعايز اتجاهل اول عمود بالداتاجريد فيو عند التصدير لملف csv

الكود الخاص بالتصدير مع وجود العمود الاول المراد تجاهلة وبدون فورمات العمود الثاني للفونت المطلوب

كود :

Dim thecsvfile As String = String.Empty
       For Each column As DataGridViewColumn In DATAG_CLIEN.Columns
           thecsvfile = thecsvfile & column.HeaderText & ","
       Next
       thecsvfile = thecsvfile.TrimEnd(",")
       thecsvfile = thecsvfile & vbCr & vbLf
   
       For Each row As DataGridViewRow In DATAG_CLIEN.Rows
                      For Each cell As DataGridViewCell In row.Cells
               thecsvfile = thecsvfile & cell.FormattedValue.replace(",", "") & ","
           Next
                    thecsvfile = thecsvfile.TrimEnd(",")
           'Add the line to the output
           thecsvfile = thecsvfile & vbCr & vbLf
       Next
       My.Computer.FileSystem.WriteAllText("D:\New folder\export.csv", thecsvfile, False)

كود :

Dim thecsvfile As String = String.Empty

' اختر الاعمده التي تريدها
Dim nameHeader = DATAG_CLIEN.Columns(1).HeaderText
Dim dbirthHeader = DATAG_CLIEN.Columns(3).HeaderText

thecsvfile &= String.Join(",", {nameHeader, dbirthHeader}) & vbNewLine

For Each row As DataGridViewRow In DATAG_CLIEN.Rows
   If row.IsNewRow Then Exit For ' الخروج اذا وصل للسطر الجديد اسفل الداتاجريد
   ' اختر الخلايا التي تريد قراءتها الموافقه للاعمده التي اخترتها في الاعلى
   Dim nameValue = row.Cells(1).Value
   Dim dbirthValue = row.Cells(3).Value

   thecsvfile &= String.Join(",", {nameValue, dbirthValue}) & vbNewLine
Next
thecsvfile = thecsvfile.Trim

My.Computer.FileSystem.WriteAllText("D:\New folder\export.csv", thecsvfile, False)

[محمد اسماعيل]

(18-12-19, 01:35 AM)smalw كتب :

(18-12-19, 12:47 AM)محمد اسماعيل كتب : السلام عليكم ورحمة الله وبركاتة

اريد طريقة لتصدير الداتا جريد فيو لملف csv

علما بالاتي تاني عمود بالداتاجريد يحتوي علي فونت مخصص وهو مشفر بالاسم "AlmaFont"


لايظهر الفونت بملف csv عند تصدير البيانات بملف csv علي الرغم من انة موجود بالداتاجريد فيو

وعايز اتجاهل اول عمود بالداتاجريد فيو عند التصدير لملف csv

الكود الخاص بالتصدير مع وجود العمود الاول المراد تجاهلة وبدون فورمات العمود الثاني للفونت المطلوب

كود :

Dim thecsvfile As String = String.Empty
       For Each column As DataGridViewColumn In DATAG_CLIEN.Columns
           thecsvfile = thecsvfile & column.HeaderText & ","
       Next
       thecsvfile = thecsvfile.TrimEnd(",")
       thecsvfile = thecsvfile & vbCr & vbLf
   
       For Each row As DataGridViewRow In DATAG_CLIEN.Rows
                      For Each cell As DataGridViewCell In row.Cells
               thecsvfile = thecsvfile & cell.FormattedValue.replace(",", "") & ","
           Next
                    thecsvfile = thecsvfile.TrimEnd(",")
           'Add the line to the output
           thecsvfile = thecsvfile & vbCr & vbLf
       Next
       My.Computer.FileSystem.WriteAllText("D:\New folder\export.csv", thecsvfile, False)

كود :

Dim thecsvfile As String = String.Empty

' اختر الاعمده التي تريدها
Dim nameHeader = DATAG_CLIEN.Columns(1).HeaderText
Dim dbirthHeader = DATAG_CLIEN.Columns(3).HeaderText

thecsvfile &= String.Join(",", {nameHeader, dbirthHeader}) & vbNewLine

For Each row As DataGridViewRow In DATAG_CLIEN.Rows
   If row.IsNewRow Then Exit For ' الخروج اذا وصل للسطر الجديد اسفل الداتاجريد
   ' اختر الخلايا التي تريد قراءتها الموافقه للاعمده التي اخترتها في الاعلى
   Dim nameValue = row.Cells(1).Value
   Dim dbirthValue = row.Cells(3).Value

   thecsvfile &= String.Join(",", {nameValue, dbirthValue}) & vbNewLine
Next
thecsvfile = thecsvfile.Trim

My.Computer.FileSystem.WriteAllText("D:\New folder\export.csv", thecsvfile, False)

انا بشكر ك علي سرعة الرد والمتابعة .

بالنسبة لجزء حذف الاعمدة تمام ظبط معايا بس الخط لازال لايظهر معايا ويظهر بنفس الخطاء القديم.

في طريقة لموضوع الخط دة .

دة كود تعريف الخط الي بستخدمة للداتاجريد فيو

 Dim f = New Font("AlmaFont", 10, FontStyle.Regular)

هل في طريقة نفرمت العمود الثاني الي فية الخط المشفر

[smalw]

(18-12-19, 01:53 AM)محمد اسماعيل كتب :

(18-12-19, 01:35 AM)smalw كتب :

(18-12-19, 12:47 AM)محمد اسماعيل كتب : السلام عليكم ورحمة الله وبركاتة

اريد طريقة لتصدير الداتا جريد فيو لملف csv

علما بالاتي تاني عمود بالداتاجريد يحتوي علي فونت مخصص وهو مشفر بالاسم "AlmaFont"


لايظهر الفونت بملف csv عند تصدير البيانات بملف csv علي الرغم من انة موجود بالداتاجريد فيو

وعايز اتجاهل اول عمود بالداتاجريد فيو عند التصدير لملف csv

الكود الخاص بالتصدير مع وجود العمود الاول المراد تجاهلة وبدون فورمات العمود الثاني للفونت المطلوب

كود :

Dim thecsvfile As String = String.Empty
       For Each column As DataGridViewColumn In DATAG_CLIEN.Columns
           thecsvfile = thecsvfile & column.HeaderText & ","
       Next
       thecsvfile = thecsvfile.TrimEnd(",")
       thecsvfile = thecsvfile & vbCr & vbLf
   
       For Each row As DataGridViewRow In DATAG_CLIEN.Rows
                      For Each cell As DataGridViewCell In row.Cells
               thecsvfile = thecsvfile & cell.FormattedValue.replace(",", "") & ","
           Next
                    thecsvfile = thecsvfile.TrimEnd(",")
           'Add the line to the output
           thecsvfile = thecsvfile & vbCr & vbLf
       Next
       My.Computer.FileSystem.WriteAllText("D:\New folder\export.csv", thecsvfile, False)

كود :

Dim thecsvfile As String = String.Empty

' اختر الاعمده التي تريدها
Dim nameHeader = DATAG_CLIEN.Columns(1).HeaderText
Dim dbirthHeader = DATAG_CLIEN.Columns(3).HeaderText

thecsvfile &= String.Join(",", {nameHeader, dbirthHeader}) & vbNewLine

For Each row As DataGridViewRow In DATAG_CLIEN.Rows
   If row.IsNewRow Then Exit For ' الخروج اذا وصل للسطر الجديد اسفل الداتاجريد
   ' اختر الخلايا التي تريد قراءتها الموافقه للاعمده التي اخترتها في الاعلى
   Dim nameValue = row.Cells(1).Value
   Dim dbirthValue = row.Cells(3).Value

   thecsvfile &= String.Join(",", {nameValue, dbirthValue}) & vbNewLine
Next
thecsvfile = thecsvfile.Trim

My.Computer.FileSystem.WriteAllText("D:\New folder\export.csv", thecsvfile, False)

انا بشكر ك علي سرعة الرد والمتابعة .

بالنسبة لجزء حذف الاعمدة تمام ظبط معايا بس الخط لازال لايظهر معايا ويظهر بنفس الخطاء القديم.

في طريقة لموضوع الخط دة .

دة كود تعريف الخط الي بستخدمة للداتاجريد فيو

 Dim f = New Font("AlmaFont", 10, FontStyle.Regular)

هل في طريقة نفرمت العمود الثاني الي فية الخط المشفر

ملف csv هو بيانات نصيه فقط ليس لها علاقه بنوع الفونت المكتوب
الفونت يخص البرنامج الذي يعرض البيانات وليس csv


او اني لم افهم ما تقصده

[محمد اسماعيل]

طيب لو افترضنا ان عندي داتاجريد وشفرت مدخلات العمود رقم 2 تمام بالفونت السابق مثلا .

لما اصدر البيانات من الداتاجريد الي الملف النصي لازم ارجع اديلة نفس الخط او لو في طريقة نغيرة الي utf8 يمكن لما بفتح يفرمط الخط

ثانيا انا بفتح الملف بالاكسيل ومسطب الفونت علي الجهاز .

[url=https://onlineutf8tools.com/url-decode-utf8][/url]

[smalw]

(18-12-19, 02:07 AM)محمد اسماعيل كتب : طيب لو افترضنا ان عندي داتاجريد وشفرت مدخلات العمود رقم 2 تمام بالفونت السابق مثلا .

لما اصدر البيانات من الداتاجريد الي الملف النصي لازم ارجع اديلة نفس الخط او لو في طريقة نغيرة الي utf8 يمكن لما بفتح يفرمط الخط

ثانيا انا بفتح الملف بالاكسيل ومسطب الفونت علي الجهاز .

[url=https://onlineutf8tools.com/url-decode-utf8][/url]

عشان يكون القارئ في الصوره ممكن تشرح :
(شفرت مدخلات العمود رقم 2 بالفونت السابق)

[محمد اسماعيل]

(18-12-19, 02:09 AM)smalw كتب :

(18-12-19, 02:07 AM)محمد اسماعيل كتب : طيب لو افترضنا ان عندي داتاجريد وشفرت مدخلات العمود رقم 2 تمام بالفونت السابق مثلا .

لما اصدر البيانات من الداتاجريد الي الملف النصي لازم ارجع اديلة نفس الخط او لو في طريقة نغيرة الي utf8 يمكن لما بفتح يفرمط الخط

ثانيا انا بفتح الملف بالاكسيل ومسطب الفونت علي الجهاز .

[url=https://onlineutf8tools.com/url-decode-utf8][/url]

ممكن تشرح عشان يكون القارئ في الصوره:
(شفرت مدخلات العمود رقم 2)

نعم شفرت مدخلات العمود رقم 2 بالفونت بالاسم دة "AlmaFont"

لما بيظهر بالملف csv لايظهر نفس الفونت  بالعمود الثاني عشان يظهر بفتح الملف بالاكسيل وحدد العمود كلة وعملة تغير فونت بالاسم دة "AlmaFont"

[smalw]

(18-12-19, 02:13 AM)محمد اسماعيل كتب :

(18-12-19, 02:09 AM)smalw كتب :

(18-12-19, 02:07 AM)محمد اسماعيل كتب : طيب لو افترضنا ان عندي داتاجريد وشفرت مدخلات العمود رقم 2 تمام بالفونت السابق مثلا .

لما اصدر البيانات من الداتاجريد الي الملف النصي لازم ارجع اديلة نفس الخط او لو في طريقة نغيرة الي utf8 يمكن لما بفتح يفرمط الخط

ثانيا انا بفتح الملف بالاكسيل ومسطب الفونت علي الجهاز .

[url=https://onlineutf8tools.com/url-decode-utf8][/url]

ممكن تشرح عشان يكون القارئ في الصوره:
(شفرت مدخلات العمود رقم 2)

نعم شفرت مدخلات العمود رقم 2 بالفونت بالاسم دة "AlmaFont"

لما بيظهر بالملف csv لايظهر نفس الفونت  بالعمود الثاني عشان يظهر بفتح الملف بالاكسيل وحدد العمود كلة وعملة تغير فونت بالاسم دة "AlmaFont"

حتى الان
لم افهم ما تقصد بالتشفير
لوتضع صور توضح المقصود

لكن ملف cvs هو نص فقط مثل الملف txt الخاص بالمفكره
فهل تستطيع ان تغير سطر محدد بالمفكره بفونت معين!

[محمد اسماعيل]

عشان كدة !

يعني يعتبرcsv ملف txt .

كل الي جهة في بالي انة مدام بيفتح بالاكسيل يبقي اقدر اتحكم بالفونت .

الخطاء من قلة التركيز اسف علي الخطا وبشكرك مرة اخري علي الرد.

[smalw]

(18-12-19, 02:21 AM)محمد اسماعيل كتب : عشان كدة !

يعني يعتبرcsv ملف txt .

كل الي جهة في بالي انة مدام بيفتح بالاكسيل يبقي اقدر اتحكم بالفونت .

الخطاء من قلة التركيز اسف علي الخطا وبشكرك مرة اخري علي الرد.

سعدت بك جدا وتقديرك لجميع الاعضاء دون تخصيص

ملاحظه: اعتقد ان ملف csv يستخدم الفاصل ; وليس ,