29-09-20, 07:05 PM
(04-04-20, 03:43 AM)محمد العامر كتب : السلام عليكم ورحمة الله وبركاته
يعطيك العافيه وبارك الله فيك
انا عني مشكلة في فتح الملف وهي عرض أول ملف مرفق في GridView فقط يعني إذا أرفقط ملف أخر وقمت بفتحه يتم فتح أول ملف GridView فقط.
![]()
كود :
' التحقق اذا كان الداتا جريد ممتلئة ام فارغة لتنفيذ كود فتح الملف
If (GridView1.RowCount > 0) Then
' تحويل الكود المسجل بقاعدة البيانات الى ملف
Dim ff() As Byte = CType(dt.Rows(DgId)(3), Byte())
Dim FPath = Application.StartupPath & "\" & dt.Rows(DgId)(1).ToString() & dt.Rows(DgId)(2).ToString()
Dim FFS As FileStream = New FileStream(FPath, FileMode.Create, FileAccess.Write)
FFS.Write(ff, 0, ff.Length)
FFS.Close()
' تنفيذ فتح الملف بعد انشائه بالكود السابق
Process.Start(FPath)
Else
' رسالة تنبيه بان الداتا جريد فارغة
MsgBox("Please Add Any Data So You Can Open File Selecte
مرحباً اخى بخصوص الكود الخاص بك هل من الممكن توضيح اين تعريف DgId
اجد فى كل الاكواد وجود DgId كا قيمة ولكن غير معرفة واذا كانت بلا قيمة وانها تم تعريفها من نوع رقم
فيصبح القيمة الافتراضية دائماً 0 وهو اول سطر التى تتحدث عنه دائماً يتم جلب الملف الخاص به
يفضل مراجعة الموضوع والمرفق جيداً وسيتم حل المشكلة

