سوال: مشکل در کد آپدیت دیتابیس [بایگانی]

isaac23

پنج شنبه 07 اسفند 1393, 09:55 صبح

(dbs6.Execute "Update Froo1 Set kod =" & Trim(Text6.Text) And Tav = " & Trim(Text8.Text)" & " Where shf=" & Trim(Text5.Text

ahmad abdoli

پنج شنبه 07 اسفند 1393, 10:07 صبح

And جزء دستورات sql هست و باید درون گیومه باشه

dbs6.Execute "Update Froo1 Set kod =" & Trim(Text6.Text) & " And Tav =" & Trim(Text8.Text) & " Where shf=" & Trim(Text5.Text)

isaac23

پنج شنبه 07 اسفند 1393, 11:24 صبح

این کار رو انجام دادم ولی باز م نشد؟

میلاد علوی

پنج شنبه 07 اسفند 1393, 11:45 صبح

شکل درست کد شما ب اینصورته

(dbs6.Execute "Update Froo1 Set kod =" & Trim(Text6.Text) " And Tav =" & Trim(Text8.Text) & " Where shf=" & Trim(Text5.Text

اگر بازهم جواب نداد از این کد استفاده کنید
(dbs6.Execute "Update Froo1 Set kod =" & VAL(Trim(Text6.Text)) " And Tav =" & VAL(Trim(Text8.Text)) & " Where shf=" & VAL(Trim(Text5.Text))

hrj1981

پنج شنبه 07 اسفند 1393, 14:49 عصر

اینم امتحان کن

"Update Froo1 Set kod =" & Trim(Text6.Text) & ",Tav = " & Trim(Text8.Text)" & " Where shf=" & Trim(Text5.Text) & ""
فقط یک نکته مهم
اگر فیلدها خاصیت رشته داشته باشند باید شروط داخل دو تا (') قرار بگیرند و اگر نامبریک باشند که مثل بالا بدون علامت کوتیشن نوشته میشن

isaac23

شنبه 09 اسفند 1393, 09:47 صبح

سلام دوستان ممنون از همکاری می خواستم بگم اره فیلد که قراره اطلاعات داخلش ذخیره بشه Text هستش ولی بازم نمی دونم چطوری تست کردم نشد

hrj1981

شنبه 09 اسفند 1393, 15:44 عصر

1 - فرض کنیم تمامی فیلدها از نوع text (رشته) ، چه اونهایی که میخواهید آپدیت بشه و چه شرط باشن :

"Update Froo1 Set kod ='" & Trim(Text6.Text) & "',Tav = '" & Trim(Text8.Text) & "' Where shf='" & Trim(Text5.Text) & "'"
2- فرض بر اینکه فیلدها آپدیت شونده از نوع TEXT(رشته) باشند و شرط از نوع عدد :

"Update Froo1 Set kod ='" & Trim(Text6.Text) & "',Tav = '" & Trim(Text8.Text) & "' Where shf=" & Trim(Text5.Text) & ""
و الی آخر
فقط کافیه مقدار برای فیلدهای رشته داخل دو تا کوتیشن قرار بگیره و برای مقادیر عددی اون کوتیشن ها لازم نیست

isaac23

شنبه 16 اسفند 1393, 06:51 صبح

1 - فرض کنیم تمامی فیلدها از نوع text (رشته) ، چه اونهایی که میخواهید آپدیت بشه و چه شرط باشن :

"Update Froo1 Set kod ='" & Trim(Text6.Text) & "',Tav = '" & Trim(Text8.Text) & "' Where shf='" & Trim(Text5.Text) & "'"
2- فرض بر اینکه فیلدها آپدیت شونده از نوع TEXT(رشته) باشند و شرط از نوع عدد :

"Update Froo1 Set kod ='" & Trim(Text6.Text) & "',Tav = '" & Trim(Text8.Text) & "' Where shf=" & Trim(Text5.Text) & ""
و الی آخر
فقط کافیه مقدار برای فیلدهای رشته داخل دو تا کوتیشن قرار بگیره و برای مقادیر عددی اون کوتیشن ها لازم نیست

دستت درد نکنه کارم راه افتاد ممنون