أستغفر الله العظيم ... سبحان الله وبحمده



العودة   منتديات داماس > منتدى البرمجة العام > لغات البرمجة


مواضيع مميزة  


آخر عشرة مواضيع المواضيع النشطة


12-02-2018, 10:29 PM
gokerjako غير متصل
عضو جديد
رقم العضوية: 537940
تاريخ التسجيل: Dec 2014
المشاركات: 10
إعجاب: 4
تلقى 4 إعجاب على 3 مشاركة
تلقى دعوات الى: 0 موضوع
    #1  

طلب كود تصدير بيانات الداتا جريد فيو الى ملف اكسيل سى شارب


طلب كود تصدير بيانات الداتا جريد فيو الى ملف اكسيل سى شارب

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




المواضيع المشابهه
الموضوع كاتب الموضوع المنتدى مشاركات آخر مشاركة
دورة صناعة برنامج سوبر ماركت بالسي شارب وقاعدة بيانات سكوال Abufahmi لغات البرمجة 235 29-03-2018 12:35 AM
برنامج حفظ المستندات(ورد-اكسيل-pdf-صور-txt) وحفظ بيانات الدخول لمواقع الانترنت المختلفة محمود بكرى برامج 12 12-05-2017 01:07 AM
صيانة شارب تكييف شارب توكيل شارب خدمة عملاء شارب شماغ السمو شركات صيانة الاجهزة الكهربائية والالكترونية 0 25-01-2012 05:24 PM
وانا العب صارت اللعبة مو بحجم الشاشة صارت اللعبة صغيرة ما بعرف شلون serjo العاب كمبيوتر PC Games 0 13-08-2004 04:34 PM
16-02-2018, 12:06 AM
Abufahmi غير متصل
مدير منتدى البرمجة العام - والهندسة العكسية
رقم العضوية: 411198
تاريخ التسجيل: Jan 2013
الإقامة: Jordan
المشاركات: 2,917
إعجاب: 907
تلقى 2,382 إعجاب على 771 مشاركة
تلقى دعوات الى: 2618 موضوع
    #2  
بداية قوم باضافة مرجع :


ثم اختار من الكوم رقم اصدار الأكسل التابع لجهازك :



الآن لحفظ كامل الجريد فيو بملف أكسل انسخ الكود التالي :
 private void SaveDataToExcel()
        {
            try
            {
                
// جعل المؤشر بحالة الانتظار
                
Cursor Cursors.WaitCursor;

                
// نستنسخ متغير النظام اللي نعمل عليه حتي يطبع بلغتنا
                
System.Globalization.CultureInfo oldCI System.Threading.Thread.CurrentThread.CurrentCulture;
                
System.Threading.Thread.CurrentThread.CurrentCulture = new System.Globalization.CultureInfo("en-US");

                
// متغير تطبيق الاكسل
                
Excel.Application xlApp;

                
// متغير WorkBook
                
Excel.Workbook xlWorkBook;

                
// متغير Excelsheet داخل متغير WorkBook
                
Excel.Worksheet xlWorkSheet;
                
object misValue System.Reflection.Missing.Value;

                
// اعطاء المتغير الاكسل قيمة فارغة
                
xlApp = new Excel.Application();
                
xlWorkBook xlApp.Workbooks.Add(misValue);
                
xlWorkSheet = (Excel.Worksheet)xlWorkBook.Worksheets.get_Item(1);

                
// جلب جميع البيانات بالجريد فيو
                
int i 0;
                
int j 0;
                for (
0<= DgItems.RowCount 1i++)
                {
                    for (
0<= DgItems.ColumnCount 1j++)
                    {
                        
DataGridViewCell cell DgItems[ji];
                        
xlWorkSheet.Cells[11] = cell.Value;
                    }
                }

                
// متغير مسار المجلد
                
string ExcelFilePath "C:\\Saved Excel";

                
// التحقق من مسار المجلد انشأ ام لا
                
if (!Directory.Exists(ExcelFilePath))
                {
                    
Directory.CreateDirectory(ExcelFilePath);
                }

                
// عملية التحقق من ان اسم الملف موجود ام لا ومن ثم خفظ جميع البيانات
                
int x 0;
                
+= 1;
                if (!
Directory.Exists(ExcelFilePath))
                {
                    
Directory.CreateDirectory(ExcelFilePath);
                    
string ExcelFileName ExcelFilePath "\\NewExcelFile(" ").xls";
                    
xlWorkBook.SaveAs(ExcelFileNameType.MissingType.MissingType.MissingType.MissingType.Missing,
                        
Excel.XlSaveAsAccessMode.xlExclusiveType.MissingType.MissingType.MissingType.Missing);
                }
                else
                {
                    for (
int a 1; ; ++a)
                    {
                        
string ExcelFileName ExcelFilePath "\\NewExcelFile(" ").xls";
                        if (!
File.Exists(ExcelFileName))
                        {
                            
xlWorkBook.SaveAs(ExcelFileNameType.MissingType.MissingType.MissingType.MissingType.Missing,
                                 
Excel.XlSaveAsAccessMode.xlExclusiveType.MissingType.MissingType.MissingType.Missing);
                            break;
                        }
                    }
                }

                
// الخروج من البرنامج الأكسل
                
xlApp.Quit();
                
System.Threading.Thread.CurrentThread.CurrentCulture oldCI;

                
// استدعاء المارشال التابع للوندوز لادارة العملية
                
releaseObject(xlWorkSheet);
                
releaseObject(xlWorkBook);
                
releaseObject(xlApp);

                
// اعادة المرشر الي حالة الديفولت
                
Cursor Cursors.Default;
                
MessageBox.Show("Excel file created successfully ... , you can find the file " ExcelFilePath """Success"MessageBoxButtons.OKMessageBoxIcon.Information);
            }
            catch(
Exception ex)
            {
                
Cursor Cursors.Default;
                
MessageBox.Show(ex.ToString());
            }
        }

        private 
void releaseObject(object obj)
        {
            try
            {
                
System.Runtime.InteropServices.Marshal.ReleaseComObject(obj);
                
obj null;
            }
            catch (
Exception ex)
            {
                
obj null;
                
MessageBox.Show("Exception Occured while releasing object " ex.ToString());
            }
            
finally
            
{
                
GC.Collect();
            }
        } 


لحفظ بيانات جدول معين استخدم نفس الكود السابق
ولكن بدون اجراء :
private void releaseObject(object obj
انسخه باجراء جديد وضيف ببدايته :
DataTable dt = new DataTable();
dt اسم اجراء جلب الجدول(); 
ثم نستبدل فقط الكود هذا من الاجراء السابق:
// جلب جميع البيانات بالجريد فيو
                
int i 0;
                
int j 0;
                for (
0<= DgItems.RowCount 1i++)
                {
                    for (
0<= DgItems.ColumnCount 1j++)
                    {
                        
DataGridViewCell cell DgItems[ji];
                        
xlWorkSheet.Cells[11] = cell.Value;
                    }
                } 
بالكود التالي :
 // اضافة عناوين الأعمدة
                
for (var 0dt.Columns.Counti++)
                {
                    
xlWorkSheet.Cells[11] = dt.Columns[i].ColumnName;
                }

                
// اضافة جميع حقول الأسطر
                
for (var 0dt.Rows.Counti++)
                {
                    for (var 
0dt.Columns.Countj++)
                    {
                        
xlWorkSheet.Cells[21] = dt.Rows[i][j];
                    }
                } 
واستدعي اي من الاجرائين فقط
بالتوفيق ان شاء الله



 


طلب كود تصدير بيانات الداتا جريد فيو الى ملف اكسيل سى شارب

English

Powered by vBulletin® Version
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd.
The owner and operator of the site is not responsible for the availability of, or any content provided.
Topics that are written in the site reflect the opinion of the author.
جميع ما يُطرح من مواضيع ومشاركات تعبر عن رأي كاتبها ولا تعبر عن رأي مالك الموقع أو الإدارة بأي حال من الأحوال.