تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] أريد كود لاستيراد ملف اكسل من الحاسوب و نقله الى قاعدة البيانات
#1
من فضلكم أريد عندما أضغط على زر أختار ملف اكسل من بعدها يرسل مباشرة الى قاعدة البيانات mysql  Confused Angel
الرد }}
تم الشكر بواسطة:
#2
اعتقد  هذا الكود ينفعك  اخي  العزيز  هذا الكود  هو  لتحميل  الملف  من الحاسوب  ما يتبقى  عليك  هو فقك  ان  تعرف  كيف  تربطه في  قاعدة البيانات  


كود :
'Public Con_Excel As New System.Data.OleDb.OleDbConnection
Dim OFD As New OpenFileDialog
With OFD
.Filter = "Excel File (*.xlsx)|*.xlsx""|Excel File (*.xls)|*.xls""|All Files (*.*)|*.*"
.FilterIndex = 3
.Title = "Choose Excel File"
.FileName = "Choose Only Excel File"
End With
'--------------------------------------------------------------
Dim strExt, Strpath As String
If OFD.ShowDialog = DialogResult.OK Then
Txtpath.Text = OFD.FileName
Strpath = OFD.FileName
strExt = OFD.FileName.Substring(OFD.FileName.LastIndexOf("."))
If strExt = ".xls" Then
Con_Excel.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Strpath &";Extended Properties=Excel 8.0;"
ElseIf strExt = ".xlsx" Then
Con_Excel.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source="& Strpath &";Extended Properties=Excel 12.0;"
Else
MessageBox.Show(" يجب إختار ملف من نوع أكسل فقط", "خطأ", MessageBoxButtons.OK, MessageBoxIcon.Error, MessageBoxDefaultButton.Button1, MessageBoxOptions.RightAlign)

Strpath = vbNullString : Txtpath.Text = vbNullString
Exit Sub
End If
End If
((  لا أحد يمكن له  ان يحدد متى يموت ولكن هو  من يقدر  ان يحدد  كيف يعيش بعد الموت فالحياة والمماة بيد الله  لكن  حياتك بعد الموت بيدك  فلا  تندم  على شيء فاتك في الدنيا لربما يرزقك  الله  خير  منه في  الاخرة  او لربما  دفع الله  عنك به  شيأ  اعظم  ...  تلك  هي  مشيئة الله  عز  وجل )) 
الرد }}
تم الشكر بواسطة: عبد العزيز البسكري
#3
اذا كان ما تقصده
هو تحويل محتوى ملف Excel الى جدول بقاعدة البيانات 
فكل ما عليك هو متابعة الفيديو التالى وتطبيق الكود

تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

ساهم دائماً فى    لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل 
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد }}
تم الشكر بواسطة:



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


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