سوال: اولين ركورد [بایگانی]

msf_2008

دوشنبه 10 خرداد 1389, 12:01 عصر

سلام
اين كد رفتن به اولين ركورد در اكسس است ولي اجرا نمي شه؟؟؟
مشكل چيه؟

Private Sub cmdfirst_Click()
Me.Recordset.MoveFirst
cmdprevious.Enabled = False
cmdnext.Enabled = True
cmdlast.Enabled = True

End Sub

mazoolagh

دوشنبه 10 خرداد 1389, 14:52 عصر

چه خطایی میگیره؟

alirezabahrami

دوشنبه 10 خرداد 1389, 16:13 عصر

سلام
اين كد رفتن به اولين ركورد در اكسس است ولي اجرا نمي شه؟؟؟
مشكل چيه؟

Private Sub cmdfirst_Click()
Me.Recordset.MoveFirst
cmdprevious.Enabled = False
cmdnext.Enabled = True
cmdlast.Enabled = True

End Sub

سلام
فكر كنم با اكسس 2007 كار ميكنيد ؛ چون در محيط اكسس 2003 كد فوق قابل اجرا است . اگر با اكسس 2007 كار ميكنيد ابتدا نسبت به فعال نمودن قسمت كد نويسي اقدام كن!
براي انجام اينكار
به مسير زير برو
Access Options\Trust Center\Trust Center Setings\Macro Settings
و در اين قسمت گزينه آخر يعني
Enable all macros
را انتخاب كنيد.
موفق باشيد

msf_2008

سه شنبه 11 خرداد 1389, 13:56 عصر

سلام
حدستون درسته با اكسس 2007 كار مي كنم، ولي قبل از اين كه جوابتون رو ببينم و طبق گزينه هايي كه گفتيد قسمت كد نويسي اكسس 2007 رو فعال كنم...آفيس 2007 رو پاك كردم و 2003 نصب كردم... الان همون قطعه كد كه اجرا نمي شد در اكسس 2003 به خوبي اجرا مي شه...
به هر حال مرسي از جوابتون...
اگه دوباره 2007 نصب كردم اين دفعه اول قسمت كد نويس رو فعال مي كنم... :D

alirezabahrami

سه شنبه 11 خرداد 1389, 14:10 عصر

سلام
حدستون درسته با اكسس 2007 كار مي كنم، ولي قبل از اين كه جوابتون رو ببينم و طبق گزينه هايي كه گفتيد قسمت كد نويسي اكسس 2007 رو فعال كنم...آفيس 2007 رو پاك كردم و 2003 نصب كردم... الان همون قطعه كد كه اجرا نمي شد در اكسس 2003 به خوبي اجرا مي شه...
به هر حال مرسي از جوابتون...
اگه دوباره 2007 نصب كردم اين دفعه اول قسمت كد نويس رو فعال مي كنم... :D
سلام
يك تشكر طلب من

msf_2008

سه شنبه 11 خرداد 1389, 14:14 عصر

سلام
من كه تشكر كردم... الان دكمه تشكر هم زدم... بي حساب شديم...
بازم ممنون

alirezabahrami

سه شنبه 11 خرداد 1389, 14:41 عصر

سلام
من كه تشكر كردم... الان دكمه تشكر هم زدم... بي حساب شديم...
بازم ممنون
دوباره سلام
مزاح كردم به دل نگير !
موفق باشيد