تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] ما الخطأ في هذا الكود
#1
كود :
Public Class Form1
   Function GetDatafromExcelSheet(ByVal filepath As String, ByVal sql As String) As DataTable
       Dim myconnection As New OleDb.OleDbConnection
       Dim mycommand As New OleDb.OleDbCommand
       Dim da As New OleDb.OleDbDataAdapter
       Dim dt As New DataTable
       myconnection.ConnectionString =
           "provider= microsoft.jet.oledb.4.0;datasource='" & filepath & "';extended properties=excel 8.0"
       mycommand.Connection = myconnection
       mycommand.CommandText = sql
       da.SelectCommand = mycommand
       da.Fill(dt)
       Return dt

   End Function

   Private Sub Form1_Shown(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Shown
       Dim dt As New DataTable
       dt = GetDatafromExcelSheet("D:\atlas\database\atlas.xls", "Select القارة from [data$]")
       Me.cmbbxcontinent.DataSource = dt
       Me.cmbbxcontinent.DisplayMember = dt.Columns(0).ToString
       Me.cmbbxcontinent.ValueMember = dt.Columns(0).ToString
       Me.cmbbxcontinent.SelectedIndex = 1

   End Sub
End Class
الرد
تم الشكر بواسطة:
#2
الخطأ في datasource، فهي كلمتين منفصلتين بمسافة فتكون data source
الرد
تم الشكر بواسطة: sawsan , sawsan
#3
(17-01-20, 09:46 PM)جميل4 كتب : الخطأ في datasource، فهي كلمتين منفصلتين بمسافة فتكون data source

شكراً جزيلاً , لم أنتبه إلي ذلك
الرد
تم الشكر بواسطة: جميل4


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Rainbow [كود] ماهو الخطا في الكود الموضح لكم محمد مسافر 2 58 , 01:09 AM
آخر رد: محمد مسافر
  ممكن مساعدة (الخطأ غير واضح في كود الحفظ) sofiane-phy 2 52 22-09-20, 12:15 PM
آخر رد: sofiane-phy
  عندي مشكلة بخصوص الكود هدا The program '[13020] MainProj.exe' has exited with code 0 ٍOfelas 1 47 21-09-20, 12:27 AM
آخر رد: Anas Mahmoud
  التعديل على الكود للتخلص من مشكلة البطىء حيث عدد السجلات كبير momani33 0 111 09-09-20, 01:33 PM
آخر رد: momani33
  ماهو الخطاء في هذا الكود عمور2016 1 108 06-09-20, 06:33 PM
آخر رد: حريف برمجة
  [سؤال] طرب الويندوز ومحتاج اجداد الكود سحاب روابط قائيمة تشغيل من اليتيوب Ali Edal 11 937 05-09-20, 03:36 PM
آخر رد: معاند الحظ
  [سؤال] خطأ في التنفيذ الكود بعد فلترة dataGridView محمد العامر 2 219 20-08-20, 01:38 PM
آخر رد: محمد العامر
  [مشروع] هلا ساعدتموني في اكتشاف الخطأ في الكود gharib 6 302 18-08-20, 03:45 PM
آخر رد: gharib
  [كود] اريد التعديل على الكود وهو عدم التكرار عمور2016 3 259 23-07-20, 01:03 AM
آخر رد: عبد العزيز البسكري
  كلمت حاولت أضيف Report Viewer اجد هذا الخطأ المهنا 2 237 22-07-20, 11:31 PM
آخر رد: المهنا

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


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