منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : استراد وزتصدير الداتا الي الاكسيل
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم ورحمة الله وبركاته الاخوة الكرام

عملت مشروع بسيط لاستيراد وتصدير الداتا من والي الاكسيل

الكود عمل بنجاح في حالة الاستيراد من الاكسيل

ولكن للاسف لم يعمل في حال التصدير للاكسيل

ملف الاكسيل في داخل المشروع واسمه  NSN_Data_Base

وكان مسار هذا الملف علي ال D

فبرجاء المساعدة في تصحيح الكود مع وافر الشكر والاحترام

و السلام عليكم ورحمة الله وبركاته
لم تكمل insert

تكون مثلا
PHP كود :
Dim cmd As New OleDbCommand("INSERT INTO  [Sheet1$] VALUES (@Id, @Name, @Age, @Mob)"conn)
cmd.Parameters.AddWithValue("@Id"txtId.Text)
cmd.Parameters.AddWithValue("@Name"txtName.Text)
cmd.Parameters.AddWithValue("@Age"txtAge.Text)
cmd.Parameters.AddWithValue("@Mob"txtMob.Text)

conn.Open()
cmd.ExecuteNonQuery()
conn.Close() 
(12-05-17, 03:22 AM)mansoor كتب : [ -> ]لم تكمل insert

تكون مثلا
PHP كود :
Dim cmd As New OleDbCommand("INSERT INTO  [Sheet1$] VALUES (@Id, @Name, @Age, @Mob)"conn)
cmd.Parameters.AddWithValue("@Id"txtId.Text)
cmd.Parameters.AddWithValue("@Name"txtName.Text)
cmd.Parameters.AddWithValue("@Age"txtAge.Text)
cmd.Parameters.AddWithValue("@Mob"txtMob.Text)

conn.Open()
cmd.ExecuteNonQuery()
conn.Close() 

 الاخ الحبيب منصور 

اكملت جملة ال insert 

ولكن للاسف مازالت لا تعمل فبرجاء فحص المرفقات 

مع الشكر والاحترام