رفع چند مورد در پروژه

[mobinsaffarpour]

باسلام خدمت تمامی دوستان عزیز. چندین مورد در پروژه وجود دارد که از دوستان خواهشمندم در صورت امکان جهت رفع این موارد همکاری نمایند./ باتشکر

1 - در صورت وارد نمودن اطلاعات در هریک از فیلدها، سپس فشردن چندین بار کلید Tab، اطلاعات ذخیره می شوند!!!! - - - - - - - انجام شد.

2 - جهت مشاهده تمامی اطلاعات، Table باز شده در زیر فرم قرار می گیرد.آیا راهی وجود دارد که بر روی فرم قرار گیرد. - - - - - - انجام شد.

3 - چگونه میتوان آخرین ردیف از اطلاعات ذخیره شده را پس از فشردن کلید چاپ رسید، به چاپ رساند.

4 - کد های مخفی نمودن محیط اکسس فقط مختص سیستم های عامل 32 بیت میباشد و بر روی 64 بیت خطا می دهد. آیا کدی وجود دارد که برای هر دو سیستم عامل کد عمل نماید. - - - - - - انجام شد.

[saeed28541]

سلام.
متوجه سوال اول وسوم نشدم.
مشکل دومتون حل شد.
مشکل آخر هم به نظر به کد های declare ویندوز مربوط میشه.البته شاید.برای اطمینان به پست 4 این تاپیک برید.

[mobinsaffarpour]

دوست عزیز با سلام و عرض تشکر خدمت شما

منظور از سوال 1 : بعنوان مثال بعد از وارد نمودن کد پرسنلی 12 و فشردن 11 بار Tab، عملیات ذخیره سازی انجام می شود.

سوال 2 : آیا راهی وجود نداره که از روش دیگری استفاده کرد ( از کد یا روش دیگری ) به غیر از این روش که شما زحمت کشیدید

منظور از سوال 3 : برای چاپ بیاد آخرین ردیفی که توی تیبل ذخیره شده رو در نظر بگیره و چاپ کنه

سوال 4 : هرچی پست رو میخونم حقیقتاً منظور رو متوجه نمیشم.

[saeed28541]

سلام.
برای سوال 2 راه دیگه ای بنده نمیدونم
برای سوال اول هنوز متوجه نشدم که قصد دارید بعد از کلید tabذخیره ساز ی انجام بشه یا نشه.؟

[mobinsaffarpour]

سلام و دردود بر شما دوست عزیز
در ارتباط با سوال اول میخوام که انجام نشه.
در رابطه با سوال دوم هم یک نمونه پیدا کردم اما هر کاری میکنم نمیدونم از چه راهی این کار رو انجام داده. ( فایل پیوست )

[saeed28541]

سلام.
در نمونه حالت popup فرم غیر فعال هست برای همین دیتاشیت روی فرم قرار می گیره.
ولی اگربخواید در فرم خصوصیت popup فعال بشه بجزء راه قبلی که پیشنهاد دادم راه دیگه ای به ذهنم نمیرسه

[saeed28541]

برای ذخیره نشدن با کلید tab
nemone.jpg

[mobinsaffarpour]

دوست عزیز با سلام و تشکر فراوان از شما بابت توجهی که داشتید

برای سوال 3 و 4 چه کاری می توان انجام داد.

[saeed28541]

چاپ آخرین رکورد

[mobinsaffarpour]

آیا اجرای این کار از طریق vba راهی دارد.

[mobinsaffarpour]

سوال 4 هم با کد ذیل مشکل رو حل میکنه . البته هنوز روی سیستم 64 بیت امتحان نکرده ام.

Option Compare Database

#If Win64 Then

Private Declare PtrSafe Function ShowWindow Lib "user32" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long

#Else

Private Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long

#End If



Public Sub HideAccess()

Call ShowWindow(Access.hWndAccessApp, 0)

End Sub

Public Sub ShowAccess()

Call ShowWindow(Access.hWndAccessApp, 5)

End Sub