Printable View
سلام
نگو جستجو نکردی که چشممام جلو مانیتور کور شد هر چقدر هم می گردم سردرگم تر می شم که علتش آماتوریه
از دوستان خواهش می کنم توضیحشون کامل بگن
در یک بانک اکسس پروجکت چطور می شه هنگام لود شدن فرم ،" مقداری از داخل تکس باکس یک فرم دیگر" که قبلا باز شده (مثل سویچ برد) بطور پیش فرض در فیلدی بارگذاری کرد .
مسئله اصلی من اینه که می خواهم کد کاربری رو از این طریق به فرمها انتقال بدم تا بعد از تکمیل یک رکورد به فیلد خودش در جدول افزوده بشه
توجه کنید بانک از نوع اکسس پروجکت (adp ) است:افسرده:
براي انتقال اطلاعات از يک تکست باکس به با تکست باکس ديگر ، لازم است دو تا فرم هم باز باشند :
Form_FrmA.Txt1 = Form_FrmB.Txt2
سلام
من يك سوال داشتم اگه بي ربط بود پاكش كنيد:
اين چيزي كه شما نوشتيد بيشتر وقتها به به جاي _ از ! استفاده ميشود. فرق دو تاشون چيه و از كدام يكي استفاده كنيم بهتر است.
جواب نمیده داداش قرار شد کامل بنویسی!
"_" براي دسترسي به کليه کنترل ها و Properties فرم هاي باز استفاده ميشه ولي از ! جهت دسترسي به خصوصيات کنترل فرم هاي باز استفاده مي شود مثلا براي دسترسي به کپشن يک فرم باز از - اسفاده مي شود ...
اگر می دونید تو رویداد befor_update چه کدی باید بنویسم که قبل از اعمال تغییرات مقدار اون تکس از فرم دیگر در تکس فرم در حال آپدیت شدن درج بشه راهنمایی کنید .ممنون .
سلام دوست عزیز
شما چندتا کار می تونین بکنین
1- توی Before Update بنویسید
TxtBox=Forms![FormName]![Field]
2- توی Default Value فیلد مورد نظر بنویسید
=Forms![FormName]![Field]
با سلام اگه زحمتي نيست لطفا يك نمونه بزارين (2003) عمل نميكنه خطا ميده
[QUOTE]من يك سوال داشتم اگه بي ربط بود پاكش كنيد:
اين چيزي كه شما نوشتيد بيشتر وقتها به به جاي _ از ! استفاده ميشود. فرق دو تاشون چيه و از كدام يكي استفاده كنيم بهتر است. [/QU
از "!" درهمه جا میتوان استفاده کرد: در محیط VBE در عبارات داخل کنترلهای فرم ودر کوئریها.
ولی از "_" فقط در محیط VBE و آنهم درصورتی که خصوصیت Has Module فرم Yes باشد. حسن مورد اخیر اینست که تمام خصوصیتها ومتدها نمایش داده میشود(Auto List Member)
باسلام و خسته نباشید
من یک کوئری از جدولم ساختم که مقدار جمع یک ستون رو نمایش میده
حالا من میخام در یک فرم دیگر این مقدار رو توی ی تکست باکس ویا لیبل مقدارش رو نشون بدم
اینجوری بگم یک مقدار اولیه دارم مثلا 100 عدد در یک جدول مادر . میخام مقدار اولیه و مقدار موجودی رو در یک فرم نشان بدم
ایشالله ک تونسته باشم منظورم رو قشنگ رسونده باشم
ممنون میشم توضیح بدید
سلام و روز خوشنقل قول:
نوشته شده توسط ahmad29769
یعنی کوئری شما فقط یک مقدار برمیگردونه دیگه (sum)؟
یک راه این هست که بجای کوئری مستقیما با dsum محاسبه کنین و اون رو بعنوان control source تکسباکس بذارین:
=DSUM("TableName","FieldName")
اگر کوئری شما پیچیده است و با یک sum ساده انجام نمیشه، یا به هر دلیلی حتما باید از کوئری استفاده بشه:
=DFIRST("QueryName","ColumnName")
تشکر خیلی عالی بود
فقط ی سوال دیگه :
من 3 تا تکس باکس دارم که برای جستجو قرار دادم و 3 تا تکس باکس رو به صورت and سری کردم که همزمان 3 تا مقدار تکس باکس رو فیلتر کنه . حالا میخام یه option group رو به شرطم اضاف کنم چجوری میتونم این کار رو انجام بدم
دستوراتم رو کپی کردم که بهتر متوجه بشید
Public Function TblFilter()
DoCmd.SetFilter , "nz([ReciverName]) like '*" & Forms!FormAllDataEvents.ComboReciver & "*' and nz([Commerce]) like '*" & Forms!FormAllDataEvents.ComboCommerce & "*' and nz([FactorySender]) like '*" &
Forms!FormAllDataEvents.ComboSearchFactorySender & "*' and nz([DestinationCity]) like '*" & Forms!FormAllDataEvents.ComboDestinationCity & "*' "
Select Case Frame423
Case 1
Form_FormAllDataEvents.FilterOn = False
Case 2
Form_FormAllDataEvents.Filter = "[StatusBar]=0"
Form_FormAllDataEvents.FilterOn = True
Case 3
Form_FormAllDataEvents.Filter = "[StatusBar]=-1"
Form_FormAllDataEvents.FilterOn = True
End Select
End Function
1- همیشه کدها رو درون تگ مناسب بگذارین تا خوانا باشه:نقل قول:
من 3 تا تکس باکس دارم که برای جستجو قرار دادم و 3 تا تکس باکس رو به صورت and سری کردم که همزمان 3 تا مقدار تکس باکس رو فیلتر کنه . حالا میخام یه option group رو به شرطم اضاف کنم چجوری میتونم این کار رو انجام بدم
ضمیمه 154792
Public Function TblFilter()
DoCmd.SetFilter , "nz([ReciverName]) like '*" & Forms!FormAllDataEvents.ComboReciver & "*' and nz([Commerce]) like '*" & Forms!FormAllDataEvents.ComboCommerce & "*' and nz([FactorySender]) like '*" &
Forms!FormAllDataEvents.ComboSearchFactorySender & "*' and nz([DestinationCity]) like '*" & Forms!FormAllDataEvents.ComboDestinationCity & "*' "
Select Case Frame423
Case 1
Form_FormAllDataEvents.FilterOn = False
Case 2
Form_FormAllDataEvents.Filter = "[StatusBar]=0"
Form_FormAllDataEvents.FilterOn = True
Case 3
Form_FormAllDataEvents.Filter = "[StatusBar]=-1"
Form_FormAllDataEvents.FilterOn = True
End Select
End Function
2- گویا یک فرم جستجو دارین که نتایج رو در یک فرم دیگه نمایش میده و در اون فرم مقادیر شرط رو از این فرم جستجو میخونین.
پیشنهاد میکنم اول این تاپیک و همچنین این یکی تاپیک رو ببینین،
ممکنه به شما کمک کنه.
3- الان مشخص نیست که نتیجه این option group باید با اونای دیگه AND بشه یا اینکه وظیفه دیگه ای داره.
با سلام
نیاز دارم آدرس یک تکستباکس رو از یک فرم، در فرم دیگهای استفاده کنم.
اگه در همون فرم باشه که کدش می شه:
Me.Text20 = "T"
ولی اگه توی فرم دیگه ای باشه، میشه چی؟
Me.Forms![Form2]![Text20]
که مطمین هستم اشتباه هست
نقل قول:
نوشته شده توسط ARData
سلام
نیاز دارم آدرس یک تکستباکس رو از یک فرم، در فرم دیگهای استفاده کنم.
اگه در همون فرم باشه که کدش می شه:
Me.Text20 = "T"
ولی اگه توی فرم دیگه ای باشه، میشه چی؟
Me.Forms![Form2]![Text20]
که مطمینم اشتباه هست
سلام و روز خوشنقل قول:
نوشته شده توسط arman2000
کد دوم اشتباه هست (همونجور که خودتون گفتین)؛
وقتی به یک فرم بیرونی رفرنس میدین دیگه Me بی معنی هست،
اون برای رفرنس به همون فرمی هست که کد داره در اون اجرا میشه.
تاپیک زیر رو ببینین:
آموزش: چگونه از یک فرم به فرم دیگر رفرنس (آدرس) بدهیم (barnamenevis.org)
سپاس بزرگوار :تشویق::تشویق: