msgbox شرطی [بایگانی] - برنامه نویس

saman101

پنج شنبه 16 شهریور 1391, 23:11 عصر

سلام من می خواستم هنگام باز شدن فرم اصلیم یه پیغام شرطی باز بشه به این صورت ککه اگه یه فیلد خاص توی جدولم بین تاریخ امروز و تاریخ 15 روز بعد بود این پیام را نشون بده که از کد زیر استفاده کردم ولی error داد ممنون میشم اصلاحش کنین

If instu!finishdate <= dateadd("d",15,date) And instu!finishdate>= date Then msgbox "PAYAM"

ARData

شنبه 18 شهریور 1391, 07:21 صبح

If instu!finishdate <= dateadd("d",15,date) And instu!finishdate>= date Then
msgbox "PAYAM"
end if

saman101

شنبه 18 شهریور 1391, 08:30 صبح

نه عزیز مشکل از end if آخرش نبود اونو که تو اصلش نوشتم . error 424 میده object required

ARData

شنبه 18 شهریور 1391, 11:34 صبح

منظورت از نامگذاري instu!finishdate چي هست ؟ آيا instu فرمه و finishdate فيلدته ؟؟؟

saman101

شنبه 18 شهریور 1391, 12:55 عصر

instu تیبل و finishdate فيلده

ARData

یک شنبه 19 شهریور 1391, 09:14 صبح

دوست عزيز رجوع به يک فيلد از يک جدل با فرمول Dlookup ميسر مي باشد :
Dlookup("[instu]","[finishdate]")
در کل فرمولتونو به اين شکل تغيير دهيد :
If nz(Dlookup("[instu]","[finishdate]") ,0)<= dateadd("d",15,date) And nz(Dlookup("[instu]","[finishdate]") ,0)>= date Then
msgbox "PAYAM"
end if