Error in convert to Excell

[taheri-ali]

سلام
آقا لطفاً به من کمک کنید
من می خوام اطلاعات رو از دیتا گرید ویو تو یه فایل اکسل اکسپورت کنم روشهای مختلفی رو امتحان کردم اما همه اونا تو یه خط کد مشترک هستند و وقتی کامپایلر به این خط می رسه Error می ده ، عکس فایل خطا رو ضمیمه کردم. کسی می دونه مشکل چیه؟

[Sharif Lotfi]

اين متغير رو تو برنامتون تعريف كنين :

Dim oldCI As System.Globalization.CultureInfo
قبل از كدهاي مربوط به خروجي به excel از اين تابع استفاده كنيد و زبان سيستم رو به انگليسي تغيير بدين :

oldCI = System.Threading.Thread.CurrentThread.CurrentCultu re
'MsgBox(System.Threading.Thread.CurrentThread.Curr entCulture.Name)
System.Threading.Thread.CurrentThread.CurrentCultu re = _
New System.Globalization.CultureInfo("en-US") ' or ("fa-IR")
بعد كدهاي مربوط به خروجي به اكسل رو بنويسين
در آخر بعد از اتمام كار زبان سيستم رو به حالت قبل بر گردونين

System.Threading.Thread.CurrentThread.CurrentCultu re = oldCI