PDA

View Full Version : سوال: کنترل جدول از فرم


m3343kh
پنج شنبه 17 خرداد 1397, 22:41 عصر
سلام
میخواهم از طریق دکمه روی فرم، مقدار فیلد چک باکسی جدولی که در فرم نیست، را True کنم.
لطفاً با vb راهنمایی فرمایید.
نمیدونم چطور فایل نمونه را بفرستم.
vahidmasoudi1391
جمعه 18 خرداد 1397, 10:14 صبح
سلام
میخواهم از طریق دکمه روی فرم، مقدار فیلد چک باکسی جدولی که در فرم نیست، را True کنم.
لطفاً با vb راهنمایی فرمایید.
نمیدونم چطور فایل نمونه را بفرستم.

سلام دوست عزیز
شما از طریق مدیریت ضمیمه فایل خود را آپلود کنید تا بتونیم کمک تان کنیم یا حداقل تصویرش
تو قسمت حالت پیشرفته می تونی فایل را آپلود کنید
موفق باشید
m3343kh
یک شنبه 20 خرداد 1397, 00:21 صبح
سلام مجدد
پیرو سوال قبلی
سه تا جدول دارم به نامهای tblA, tblA, ,tblC
هر کدام از این جدولها شامل name از نوع text و Chech از نوع yes/no میباشند.
یک جدول اصلی دارم که شامل کمبودهایی به نامهای: nameA, nameB, nameC هست، که اطلاعاتشون رو از جدولها فوق بصورت کمبو دریافت میکنند.
حالا میخواهم در جدول اصلی هرگاه مثلاً nameA, در کمبو A وارد شد، همزمان CheckA مربوط به همان ردیف جدول tblA نیز True شود.
لطفاً با کد vb توضیح فرمایید.
ممنون.
m3343kh
یک شنبه 20 خرداد 1397, 22:45 عصر
سلام
خواهشمندم اگر توضیحات کافی بود، راه حلی ارائه نماید.
ضمناً من گزینه پیشرفته را زدم، ولی مدیریت ضمیمه را ندیدم.
با تشکر
Mehr@ban
یک شنبه 20 خرداد 1397, 22:58 عصر
سلام

دوست عزیز به این روش فکر نمیکنم به نتیجه برسید.
باید فایل نمونتون رو ارسال کنید تا دوستان بتونن کمک کنند.

زیر همین کادر پایین که نوشته پاسخ فوری، بر روی حالت پیشرفته کلیک کنید، کمی پایینتر یک دکمه با متن مدیریت ضمیمه موجود هست که میتونید فایل ضمیمه خودتون رو توی انجمن بارگزاری کنید.
m3343kh
یک شنبه 20 خرداد 1397, 23:19 عصر
سلام
علت اینکه قبلاً نمیتونستم فایل ارسال کنم این بود که از تبلت استفاده میکردم، اما وقتی گزینه Full site را زدم امکان ارسال نیز روئیت شد، این را گفتم که دوستان دیگری که شاید این مشکل من را داشته باشند، استفاده کنند.
m3343kh
یک شنبه 20 خرداد 1397, 23:22 عصر
تشکر از صبر و حوصله ای که به خرج دادید.
Mehr@ban
دوشنبه 21 خرداد 1397, 00:12 صبح
خب حالا بهتر شد!

در رویداد on Click دکمه بررسیA کد زیر رو قرار بدین و تست کنید:

DoCmd.RunSQL "UPDATE tblA SET tblA.CheckA = True WHERE (((tblA.IDA)=[forms]![frmMain]![NameA]));"
m3343kh
دوشنبه 21 خرداد 1397, 00:45 صبح
تشکر بی پایان
"هرکس مرا کلمه ای بیاموزد، مرا بنده خویش ساخته است"
Mehr@ban
دوشنبه 21 خرداد 1397, 00:58 صبح
خواهش میکنم
ولی فشردن همون کلید تشکر کردن کفایت میکرد :لبخند:
m3343kh
شنبه 26 خرداد 1397, 19:47 عصر
با سلام
چطور میشه از نمایش پیغام اکسس، مبنی بر آپدیت شدن جلوگیری کرد؟
در کد vb آپدیت کورئری که ارسال فرمودید.
Mehr@ban
یک شنبه 27 خرداد 1397, 08:31 صبح
سلام

اگر اشتباه نکنم باید قبل از دستور SQL خط زیر رو بنویسید:
DoCmd.SetWarnings False
و بعدش دستور زیر
DoCmd.SetWarnings True