سورس کامل برنامه کنترل باشگاه بدن سازی در ویژوال بیسیک 6

[jafaripur]

http://jafaripur.persiangig.com/image/GYM_System_VB_1.jpg

برنامه ای عالی برای کنترل باشگاه بدن سازی .
برنامه نویسی شده با ویژوال بیسیک 6
پایگاه داده برنامه با اکسس هستش و متد ADO نوشته شده .
از امکانات برنامه می توان به این موارد اشاره کرد :
استفاده از شیوه پایگاه داده رابطه ای .
افزودن و ویرایش کاربران و افزودن - ویرایش و حذف مدیران .
ورود - خروج کاربران از باشگاه .
پرداخت شهریه برای باشگاه .
گزارش گیری از لیست کاربران باشگاه .
گزارش از ورود و خروج کاربران .
گزارش از شهریه های پرداختی .
کنترل اعضایی که شهریه پرداخت نکردند .
گرفتن پشتیبان از برنامه و بازیابی آن .
پسورد برای ورود به برنامه : 123456
پسورد پایگاه داده : 123456Jafaripur
این برنامه سورس باز هستش و می توانید به سورس این برنامه دسترسی داشته باشید .
برنامه رو کپی و به اسم خود نزنید این یک جور دزدی می باشد فقط شما می توانید با دیدن سورس این برنامه با شیوه های برنامه نویسی پایگاه داده آشنا شوید و الگو برداری کنید از سورس برنامه مورد نظر . بعداً سورس های دیگه هم خواهم گذاشت منتظر باشید .
حجم فایل : 332 KB
گرفتن سورس (http://jafaripur.persiangig.com/Project/VB6/GYM_System_VB.zip)

ویرایش 3.0 این برنامه را می توانید اینجا (http://barnamenevis.org/forum/showthread.php?p=792316) ببینید .

[polisoftco]

سلام
ممنون مستر جعفری پور برنامه باحالی بود.
درضمن لینکش هم سالمه من گرفتم.
باتشکر
بای

[MMR_1344]

دوست غزیز متشکر اما لينک دريافتش مشکل داره

[xxxxx_xxxxx]

سلام. باتشكر از آقاي جعفري پور
دوستان لينك سالمه خواهشاً تا صفحه 30 ام نگيد لينك خرابه. با اجازه آقاي جعفري پور من برنامه رو همين جا آپلود مي كنم تا ديگه دوستان هم مشكلي با لينك نداشته باشند.
موفق باشيد/

[paysokhan]

مال من در این خط ارور می ده و اجرا نمی کنه


stbMain.Panels(4).Text = Shamsi.Convert_Date(Date, Gregorian_, HijriShamsi_)


چه کنم؟

[jafaripur]

مال من در این خط ارور می ده و اجرا نمی کنه


stbMain.Panels(4).Text = Shamsi.Convert_Date(Date, Gregorian_, HijriShamsi_)


چه کنم؟

یا فایل MEShamsiDate.dll رجیستر نشده تو کامپیوتر تو و یا اکتیوکس MSCOMCTL.OCX تو کامپیوترت نیستش ...

[oskarimbns]

براي رجيستر كردن فايل MEShamsiDate.dll تو كامپيوتر چه بايد كنيم يا اكتيوكس MSCOMCTL.OCX را از كجا پبيدا كنيم

[warden]

اون دو تا فایل رو تو System32 کپی کن سپس برو Start > Run > Regsvr32 MEShamsiDate.dll یا بجای MEShamsiDate.dll - MSCOMCTL.OCX بزن.

[jafaripur]

براي رجيستر كردن فايل MEShamsiDate.dll تو كامپيوتر چه بايد كنيم يا اكتيوكس MSCOMCTL.OCX را از كجا پبيدا كنيم
می تونی تو گوگل بنویسی MSCOMCTL.OCX و بگیریش ...

[emprator2009]

سلام به همه دوستان و تشکر از آقای جعفری پور به خاطر برنامه بسیار خوبش.
من یک مشکل داشتم :
من وقتی که می خواهم بیش از یک کاربر رو ثبت کنم معمولا دوتا پیغام خطا برام میاد.(در ضمن باید یاد آور بشم من اطلاعاتم رو به هبچ وجه تکراری وارد نمی کنم)
http://www.gigaimage.com/images/6jwh1nudiywc9xuih2y.jpg
http://www.gigaimage.com/images/gd8pac34zfx486p38yj.jpg

و از .Recordset.Update ایراد میگره مشکل من کجاست میشه بهم بگید
مرسی
موفق باشید.

[Mbt925]

نمونه اصلاح شده رو دانلود (http://mbt925.googlepages.com/GYM_System_VB.rar)کنید.

مشکل: به فیلد AutoNumber مقدار می دادن (مقدار 0)
کنترل اکتیوایکس MEShamsiDate رو هم با نسخه جدیدش جایگزین کردم.

[jafaripur]

واسه یه اشتباه کوچیک بود برنامه اصلاح شد .

[hamid2live]

با تشکر از برادر عزیزمون. من وقتی من میخوام اجراش کنم تو این خط خطا میده
SetParent pic.hwnd, GetDesktopWindow: pic.Move 0, 0, Screen.Width, Screen.Height

GetDesktopWindow

[jafaripur]

با تشکر از برادر عزیزمون. من وقتی من میخوام اجراش کنم تو این خط خطا میده
SetParent pic.hwnd, GetDesktopWindow: pic.Move 0, 0, Screen.Width, Screen.Height

GetDesktopWindow
فقط از لینکی بگیر که در اول پست گذاشتم .
برنامه اجرا می شه مشکلی نداره . . .

[hamid2live]

شاید مشکل از سیستم منه ولی این خطا رو میده

[jafaripur]

شاید مشکل از سیستم منه ولی این خطا رو میده

حتماً از سیستم عامل شماست . . . یه DLL که مربوط GetDesktopWindow هستش و از API استفاده شده در سیستم عامل شما وجود نداره می تونی یه ویندوز اصلی بزنی و بدون دستکاری شده .
و شما می تونید تابع AnimateForm را از برنامه حذف کنید و فراخانیش از تمامی فرم ها را نیز حف کنید . چون از این تابع به خاطر زیبایی استفاده شده و کار چندانی نمی کنه . . .