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

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

            Dim sql As String = "select(zepon.num)as x1,(zepon.name) as x2,zepon.phone as x3 ,(zepon.bransh ) as x4,(dailywassel.zepon) ,sum(dailywassel.amount) as x5  ,sum(dailywassel.quentity)as x6 from zepon right join dailywassel on zepon.num =dailywassel . zepon   group by  (dailywassel.zepon),(zepon.num),(zepon.name) ,(zepon.bransh ),zepon.phone order by dailywassel.zepon "
            '(dailywassel.date),
            Dim sqlcommand As New SqlCommand(sql, Con)

            Dim sqladapter = New SqlDataAdapter(sqlcommand)
            Dim dt As New DataTable


اخر سطر هو المشكلة       Dim dt As New DataTable
مش قابلها مطلقا باعرفش شو علاقته مع كود الترحيل الي اكسل والله ما انا فاهم اشي
(08-05-19, 04:25 PM)nooralcown كتب : [ -> ]يا شباب اشتغلت الكود تمام  واشتغل  
اجيت اضيف نفس الكود في فورم جديد  
طلع خطا مع الكود التالي 

            Dim sql As String = "select(zepon.num)as x1,(zepon.name) as x2,zepon.phone as x3 ,(zepon.bransh ) as x4,(dailywassel.zepon) ,sum(dailywassel.amount) as x5  ,sum(dailywassel.quentity)as x6 from zepon right join dailywassel on zepon.num =dailywassel . zepon   group by  (dailywassel.zepon),(zepon.num),(zepon.name) ,(zepon.bransh ),zepon.phone order by dailywassel.zepon "
            '(dailywassel.date),
            Dim sqlcommand As New SqlCommand(sql, Con)

            Dim sqladapter = New SqlDataAdapter(sqlcommand)
            Dim dt As New DataTable


اخر سطر هو المشكلة       Dim dt As New DataTable
مش قابلها مطلقا باعرفش شو علاقته مع كود الترحيل الي اكسل والله ما انا فاهم اشي
http://vb4arb.com/vb/showthread.php?tid=28376
المشكلة فقط ستكون فى تكرار نفس السطر بنفس الحدث
لذلك لا يقبل ويظهر الخطاء بهذا السطر
بمجرد تغيير dt الى dt1 مثلاً سيتم حل المشكلة

هذا ما يمكننى افادتك به حالياً
بسبب عدم وجود الكود كاملاً او ارفاق المثال لتوضيح اين الخطاء تماماً

تحياتى لك
وتمنياتى لك التوفيق