01-06-21, 06:30 PM (آخر تعديل لهذه المشاركة : 01-06-21, 06:32 PM {2} بواسطة alfaiz678.)
كود :
Dim conn As OleDbConnection
Dim dtr As OleDbDataReader
Dim dta As OleDbDataAdapter
Dim cmd As OleDbCommand
Dim dts As DataSet
Dim excel As String
Dim OpenFileDialog As New OpenFileDialog
Dim conn As OleDbConnection
Dim dtr As OleDbDataReader
Dim dta As OleDbDataAdapter
Dim cmd As OleDbCommand
Dim dts As DataSet
Dim excel As String
Dim OpenFileDialog As New OpenFileDialog
03-06-21, 04:32 PM (آخر تعديل لهذه المشاركة : 03-06-21, 04:34 PM {2} بواسطة Munther.)
(03-06-21, 01:34 PM)alfaiz678 كتب : الكود يعمل جيدا لكن اظنك لم تطبقه بالشكل الصحيح
على العموم
البرنامج جاهز
حمله من الفرقات
مرفق معه ملف اكسل للتجربة
اخي الكريم شكرا لك لكن حملت المشروع المرفق واضفت بيانات على ملف الاكسل للاخ emad mm وتم لصق البيانات بشكل صحيح على الداتا كريت فيو لكن المشكلة حاولت حفظ البيانات الجديدة المشكلة لم يتم حفظ هذه البيانات الجديدة على قاعدة البيانات الاساسية ياريت المساعدة