تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
نقل بيانات جدول الى ملف نصي
#11
هذا الكود بعد التعديل الاخير
لكنه في حالة أن التاريخ غير موجود لا يقوم بنقل السجل بمعنى ان السجل الذي ليس به تاريخ لا يتم ارسالة الى الملف النصي

كود :
Dim TextFile As New System.IO.StreamWriter("C:\MyTestFile.txt")
        Dim sSQL As String = String.Empty
        sSQL = "SELECT * FROM tblVIPs"
        Dim Command As New oleDbCommand(sSQL, Con)
        Con.Open()
        Dim Reader As OleDbDataReader = Command.ExecuteReader()
        If Reader.HasRows = True Then
            While Reader.Read()
                If Not Reader.IsDBNull(Reader.GetOrdinal("V_DateBirth")) Then
                    TextFile.WriteLine(Reader.GetString(1) & "@" & Reader.GetDateTime(Reader.GetOrdinal("V_DateBirth")) & "@" & Reader.GetString(3) & "@")
                End If
            End While
            TextFile.Close()
            Con.Close()
        End If
\=
الرد }}}
تم الشكر بواسطة:
#12
بعد اذنك اخي kslawy

اخوي aftfm

استبدل كودك بهذا الكود

كود :
Dim TextFile As New System.IO.StreamWriter("C:\MyTestFile.txt")
        Dim sSQL As String = String.Empty
        sSQL = "SELECT * FROM tblVIPs"
        Dim Command As New oleDbCommand(sSQL, Con)
        Con.Open()
        Dim Reader As OleDbDataReader = Command.ExecuteReader()
        If Reader.HasRows = True Then
            While Reader.Read()
                If Not Reader.IsDBNull(Reader.GetOrdinal("V_DateBirth")) Then
                    TextFile.WriteLine(Reader.GetString(1) & "@" & Reader.GetDateTime(Reader.GetOrdinal("V_DateBirth")) & "@" & Reader.GetString(3) & "@")
                Else
                    TextFile.WriteLine(Reader.GetString(1) & "@" & Reader.GetString(3) & "@")
                End If
            End While
            TextFile.Close()
            Con.Close()
        End If
Big Grin
<---------------------------------------------------------------->

الرد }}}
تم الشكر بواسطة: aftfm , kslawy , محمود رغمان
#13
الف شكر اخي العزيز Easy4ever
الرد }}}
تم الشكر بواسطة: Easy4ever
#14
السلام عليكم ورحمة الله وبركاته

واجهت مشكلة في نفس موضوعي هذا وهي
في حالة ما إذا كان تاريخ الجهاز بفورمات d/M/yyyy
ومع العلم ان التاريخ في قاعدة البيانات مكتوب مثلا 01/02/2014
يقوم بنقل البيانات بتنسيق d/M/yyyy

المطلوب كيف انقل البيانات من جدول قاعدة البيانات الى ملف نصي بتنسيق dd/MM/yyyy مهما كان تنسيق تاريخ الجهاز
الرد }}}
تم الشكر بواسطة:
#15
تم حل المشكلة والحمد لله Big Grin Big Grin Big Grin
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  استعلام من عدة جداول لقاعدة بيانات اكسس Adel27213 1 702 07-11-23, 08:27 AM
آخر رد: justforit
  [SQL] استفسار عن طريقة تحزم قواعد بيانات MSSQL مع البرنامج VB.NET2019 salemq 2 530 18-05-23, 03:02 AM
آخر رد: سعود
  ما معني بيانات تقع بين الرمز[] في حقل في داتا بيس bassant 3 672 03-04-23, 11:53 PM
آخر رد: sanyor77
  [نقاش] مشاركة قاعدة بيانات SQL على شبكه داخليه morkoskhalaf 3 3,009 06-01-23, 03:20 AM
آخر رد: عبدالكريم برشدان
  قاعدة بيانات xml djelloul 3 2,799 07-11-22, 10:27 PM
آخر رد: Am7
  [عنوان معدل]حفظ بيانات listbox fhad24 36 12,240 08-10-22, 06:55 PM
آخر رد: رضوان الجماعي
  استعلام يرجع اسماء الاعمدة و نوع البيانات في جدول معين بسام محمدغانم 0 964 23-10-21, 01:43 AM
آخر رد: بسام محمدغانم
  مشكلة ظهور بياانات حقلين في قاعدة بيانات على شكل علامة استفهام bassant 5 1,632 17-10-21, 02:07 PM
آخر رد: abubasilIraq
  كيف افتح قاعة بيانات اكسس بسام محمدغانم 1 1,404 04-10-21, 02:52 AM
آخر رد: اسلام الكبابى
  تحويل multiline text الى single line في عمود في قاعدة بيانات sql server bassant 0 957 07-09-21, 04:36 PM
آخر رد: bassant

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم