+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : استعلام اضافة صورة بجملة استعلام في الوضع المنفصل مع DATAADAPTER (/showthread.php?tid=12066)
استعلام اضافة صورة بجملة استعلام في الوضع المنفصل مع DATAADAPTER - tarek - 15-04-15
بسم الله الرحمن الرحيم
عند اضافة سجل جديد نوع احد حقوله صورة
وجدت كل الاستعلامات الموجودة لاضافة الصورة في الوضع المتصل فقط
أريد استعلام بلغة الاستعلامات الهيكيلية SQl بصيغة INSeRT INTO في الوضع المنفصل
أي ان الاستعلام يكتب مع DATAADAPTer لاضافة صورة من ضمن حقول السجل
شكرا جزيلا لكم
وهل تختلف جملة الاستعلام باختلاف نوع قاعدة البيانات
RE: استعلام اضافة صورة بجملة استعلام في الوضع المنفصل مع DATAADAPTER - سعود - 16-04-15
تفضل المثال
هو باستخدام مكيف البيانات بدون insert into
RE: استعلام اضافة صورة بجملة استعلام في الوضع المنفصل مع DATAADAPTER - tarek - 17-04-15
شكرا لك اخي الفاضل سعود ... بس اكيد هناك طريقة تكتب قيمة داخل حقل الصورة من خلال جملة INSERT INTO
حاولت كتير فعلا مش وصلت لها
RE: استعلام اضافة صورة بجملة استعلام في الوضع المنفصل مع DATAADAPTER - سعود - 17-04-15
انت تريد عن طريق dataadapter توجد خاصية insertcommand لم افهم كيف استخدمها
لقيت الحل اكتب الكود التالي في زر new
كود :
Dim ofd As New OpenFileDialog
If ofd.ShowDialog = Windows.Forms.DialogResult.OK Then
Dim fn As String = ofd.SafeFileName
If endwith(fn) Then
'Dim row As DataRow = ds.Tables(0).NewRow
'row("pic") = My.Computer.FileSystem.ReadAllBytes(ofd.FileName)
'ds.Tables(0).Rows.Add(row)
'da.Update(ds, "pics")
Dim cmd As New OleDb.OleDbCommand("insert into pics(pic) values(@pic)", con)
cmd.Parameters.AddWithValue("@pic", My.Computer.FileSystem.ReadAllBytes(ofd.FileName))
da.InsertCommand = cmd
If con.State = ConnectionState.Closed Then
con.Open()
End If
da.InsertCommand.ExecuteNonQuery()
da.Update(ds, "pics")
gd()
Me.BindingContext(ds, "pics").Position = Me.BindingContext(ds, "pics").Count - 1
pos()
Else
MsgBox("no")
End If
End If
If con.State = ConnectionState.Open Then
con.Close()
End IfRE: استعلام اضافة صورة بجملة استعلام في الوضع المنفصل مع DATAADAPTER - tarek - 17-04-15
شكرا اخي الكريم وانا عاجز عن الشكر ... بس هذا وضع متصل .... اريد استعلام Insert into مكتوب في Dataadapter في الوضع المنفصل .. من باب المعرفة بالشيء فالحمد لله الاكواد التي تكرمت بارسالها تعمل بكفاءة ولكن كما قلت اود زيادة المعرفة ... شكرا لك وللمنتدى
RE: استعلام اضافة صورة بجملة استعلام في الوضع المنفصل مع DATAADAPTER - سعود - 18-04-15
انت متاكد ان اللي تطلبه ممكن؟!
لو تراسل الاخوة الخبراء اما ابو ايهاب او غيره يعطيك الحل او الجواب.
RE: استعلام اضافة صورة بجملة استعلام في الوضع المنفصل مع DATAADAPTER - Abu Ehab - 18-04-15
لو تراسل الاخوة الخبراء اما ابو ايهاب او غيره يعطيك الحل او الجواب.
وأبوأيهاب بيسلم عليكم وبيقول : نصيحة لوجه الله تعالى : اتركوا ADO.Net نهائيا ...
تعاملوا مع EF , XML , LINQ
وياريت كمان تتعاملوا مع السي شارب .. لأنها متعة البرمجة بالفعل
واحد رايح يقول لي صعبة ...
لا سهله خالص وكل الناس اللى بيتعاملوا مع البيسك أساسا هم عارفين سي شارب لكن ما احد منهم واخد باله .
---------------------
طيب : بالنسبة لطلبك : هي باللنكيو : مش محتاجة تعمل لها Convert Or Casting ولا بطــــــيخ ...
مباشرة بتمرر لها الصورة لانها أساسا نوعها Image
بس ويعطيكم لعافية