الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

جملة استعلام للتعديل اكثر من حقل

مغلق
بدأه عبدالجليل العقوري في 29 يوليو 2006 · 1 رد · 538 مشاهدة · في Microsoft Visual Basic.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم أخواتي

أريد منك جملة استعلام تقوم بالتالي

TABEL1

S_NO1 ......... QTY1

01 ........... 100

02 ........... 200

03 ........... 300

.

TABEL2

S_NO2 .......... QTY2

01 ............ 150

02 ... ........ 320

03 ............ 400

استبدال جميع " تعديل " جميع الكميات QTY2 التي بالجدول الثاني بالكميات التي بالجدول الاول من خلال

استخدام جملة استعلام واحده

المشكلة استطعت أن أحلها وذلك بالمرور على جميع الحقول باستخدام جملة FOR

ولكن هذه الفكرة تستهلك الكثير من الوقت وخصوصا اني اعمل هذا التعديل على أكثر من 28000 بند مخزني

تم تعديل هذه المشاركة بواسطة عبدالجليل العقوري في 29 يوليو 2006 في 23:20

"نحن لا نستسلم... ننتصر أو نموت.... وهذه ليست النهاية... بل سيكون عليكم أن تحاربوا الجيل القادم والاجيال التي تليه... اما أنا... فإن عمري سيكون أطول من عمر شانقي."

عمر المختار

اللهم انعم على بلادي بالأمن والأمان

#2

الجملة هي :

		SQL_Query = "Update [Table1],[Table2] "
		SQL_Query &= "Set [S_NO2] = [S_NO1] "
		SQL_Query &= " Where [QTY2]=[QTY1] "

والتطبيق هو :

		SQL_Query = "Update [Table1],[Table2] "
		SQL_Query &= "Set [S_NO2] = [S_NO1] "
		SQL_Query &= " Where [QTY2]=[QTY1] "
		Dim MyCommand As New System.Data.OleDb.OleDbCommand(SQL_Query, MyConn)
		MyConn.Open()
		Try
			Dim RecordsAffected As Integer = MyCommand.ExecuteNonQuery()
			If RecordsAffected = 0 Then
				MessageBox.Show("لم يتم تحديث السجلات ")
			Else
				'msgbox "Done
			End If
		Catch ex As Exception
			MsgBox(ex.Message)
		 End Try
		MyConn.Close()

تم تعديل هذه المشاركة بواسطة وليد مندني في 14 أغسطس 2006 في 07:51

هذا الموضوع مغلق.

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…