+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : ما الخطأ في حفظ جدول إلى ملف نصي (/showthread.php?tid=20296)
الصفحات:
1
2
RE: ما الخطأ في حفظ جدول إلى ملف نصي - ahmedfa71 - 10-05-17
شكرا لك أخي منصور على المجهودات
بارك الله فيك
RE: ما الخطأ في حفظ جدول إلى ملف نصي - ahmedfa71 - 14-05-17
(10-05-17, 02:58 PM)mansoor كتب : اعتقد تحتاج تحديث النظام وبالذات محرك الاكسس او بتبسيط للمسألة تحديث الأكسس
جرب المشروع في جهاز آخر.
السلام عليكم ورحمة الله وبركاته
هذا هو كود تحويل جدول من قاعدة البيانات access إلى ملف نصي txt
كود :
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
'حفظ قاعدة البيانات إلى نص
Try
Dim dtResult As New DataTable
con.Open()
'مسار الجدول
Dim dataAdap As New OleDbDataAdapter("SELECT * FROM Article", con)
dataAdap.Fill(dtResult)
con.Close()
Dim Dilaoge As New SaveFileDialog
Dilaoge.Filter = "txt files (*.txt)|*.txt|All files (*.*)|*.*"
Dilaoge.ShowDialog()
Dim NomFechiers As String = Dilaoge.FileName
Dim StreamW As StreamWriter = File.CreateText(NomFechiers)
Try
Dim sb As New StringBuilder
For Each row As DataRow In dtResult.Rows
sb = New StringBuilder
For Each col As DataColumn In dtResult.Columns
sb.Append(row(col.ColumnName))
Next
StreamW.WriteLine(sb.ToString())
Next
Catch ex As Exception
Throw ex
Finally
If Not StreamW Is Nothing Then StreamW.Close()
MsgBox("تمت عملية الحفظ بنجاح")
End Try
Catch ex As Exception
MessageBox.Show(ex.Message, "خطأ 04", MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try
End Subوشكرا
RE: ما الخطأ في حفظ جدول إلى ملف نصي - silverlight - 14-05-17
يمكنك مراجعة الموضوع التالي لمزيد من التفاصيل
الرابط
RE: ما الخطأ في حفظ جدول إلى ملف نصي - ahmedfa71 - 14-05-17
شكرا لك silverlight بارك الله فيك على الرد
الكود في مشاركتي يحفظ الجدول من قاعدة البيانات إلى ملف txt وليس bkp
مع إمكانية تسمية الملف ووضعه في المكان المناسب بمربع الحوار savefiledialog
RE: ما الخطأ في حفظ جدول إلى ملف نصي - العواد الصغير - 15-05-17
عندي اشتغل تمام انظر كما قال لك الاخ منصور ربما الاكسس او جرب جهاز اخر
RE: ما الخطأ في حفظ جدول إلى ملف نصي - Asraa - 06-05-20
مرحبا انا عضوه جديده بلغه فجول بيسك
كيف اكدر اضيف مستند txt عن طريق مربع الحوار
RE: ما الخطأ في حفظ جدول إلى ملف نصي - yaskonofdakla - 17-02-21
السلام علكيم أريد تحويل جدول آكسس إلى ملف نصي