PDA

View Full Version : اتصال Text Box به نتیجه Query در فرم Unbound



Milad_ATM
پنج شنبه 03 آذر 1401, 15:44 عصر
با سلام
اساتید محترم
Query ایجاد کردم که بعد از لاگین User یک امتیاز به اون میده
ینی فقط یک عدد در فیلد Weight بمن میده
چطور میتونم یک TextBox رو در یک فرم Unbound در رویداد On Load فرمم به اون وصل کنم و اون یک مقدار رو در اون نشون بدم؟
توضیح اینکه فرم رو بنا بدلایلی نمیخوام Bound کنم و ترجیحاً نمیخوام از Subform استفاده کنم.
154259

به این صورت انجامش دادم که متاسفانه با خطای parameter مواجه میشم!

Me.txtWeightUser = DLookup("Weight", "qryUserRanking", "Username=TempVars!tempUser")

154260

Milad_ATM
جمعه 04 آذر 1401, 06:48 صبح
برای اینکه کسی مجدداً به مشکل من برنخوره
مشکل این بود که از اسامی کلیدی استفاده کردم
در واقع اسم فیلدی که فراخوانی میکردم بطور مستقیم در vba قابل استفاده نبود.

Weight

mazoolagh
شنبه 05 آذر 1401, 09:13 صبح
1- همون کد اولی هم باید بدون مشکل کار کنه، weight از کلمات کلیدی نیست!

2- حتی اگر weight یک کلمه کلیدی بود باز هم استفاده از اون مشکلی نداره بشرطی که درون [] باشه.

3- چون شما شرط رو در خود کوئری qryUserRanking آوردین، دیگه آوردنش در dlookup بی مورد هست:
Me.txtWeightUser = DLookup("Weight", "qryUserRanking")

4- میتونین بجای ساخت کوئری و بعد استفاده از dlookup ، مستقیما با dsum محاسبه کنین (مگر این که دلیلی برای این کار داشته باشین):
Me.txtWeightUser = DSUM("Weight", "tbl.....", "Username=TempVars!tempUser")