Printable View
سلام خدمت دوستان و استید گرامی
فرم دیتاشیتی دارم که با sql ارتباط داده شده با جدول، چون تعداد فیلدها زیاده میخوام با حلقه تکرار و کمتر کردن کدنویسی ControlSource فیلدها رو با sql ارتباط بدم.(نمیدونم منظورمو رسوندم)
البته توی تصویر توضیح دادم.
ممنون میشم راهنمایی بفرمائید.
ضمیمه 156280
سلام
کدها رو بصورت زیر تغییر بده ببین جواب میده !
Dim fld
For Each fld In Form_frmper.Recordset.Fields
Form_frmper.Controls(fld.Name) = fld.Value
Next
سلام
ممنونم بابت پاسختون
ولی این کد فقط رکورد اول رو برمیگردونه و برای Single Form جواب میده، در Datasheet Form کل لیست میشه رکورد اول (رکورد اول تا پایین لیست تکرار میشه)
فکر کنم کد زیر جواب بده:نقل قول:
نوشته شده توسط Masoud.eh
Dim fld
For Each fld In Form_frmper.Recordset.Fields
Form_frmper.Controls(fld.Name).ControlSource = fld.Name
Next
ممنونم دوست عزیز
جواب داد
سلام و روز خوش
البته به مورد سئوال ربطی نداره،
ولی اون کد sql که در تصویر دیده میشه جدای از این که ریسک sql injection داره،
بیش از اندازه پیچیده است!
سلامنقل قول:
نوشته شده توسط mazoolagh
راهی برای ساده تر کردن کدهای Sql هست؟
سلام دوباره
آره - حتما هست.
دیتا نمونه و خروجی مورد نظر رو پیوست کنین.
دیتا لازم نیست واقعی باشه - ولی ساختارش همینی باشه که دارین،
خروجی مورد نظر رو هم بصورت جدول بگذارین و نه اسکرین شات.
اگر فرم هم لازم هست در پیوست باشه - کلا مینیمم چیزی که داستان رو بیان کنه.