ايران ويج

نسخه‌ی کامل: تو رو خدا كمكم كنيد
شما در حال مشاهده‌ی نسخه‌ی متنی این صفحه می‌باشید. مشاهده‌ی نسخه‌ی کامل با قالب بندی مناسب.
صفحه‌ها: 1 2 3 4
استادی که فقط بیاد پروژه بخواد و بره اخر ترمم نمره الکی بده شاگردشم میشم من
شمارشو داشتم الان خودم میزنگیدم و هر چی از دهن میومد بهش میگفتم

اونقد اعصابم خورده که کم مونده مثل بچه ها .......


ممنونم از همتون لطف بزرگی کردین بهم
(۰۹-اردیبهشت-۱۳۹۰, ۰۰:۱۹:۲۸)bah69man نوشته است: [ -> ]داداش کدو خودتون دادین ببخشین از رو سایت حذفش کنین منم پاک میکنم از رو سیستم تا ناراحت نشین
عجب
من چی میگم تو چی میگی

عزیز من ، نوشته منو با ملایمت بخون نه با خشونت.Heart

میگم این کدها که فرستادی، کد همون پروژه ای هست که من بهت دادم نه پروژه خودت .
اینها که خطا ندارن یعنی از اولشم نداشتن .
شما میگی پروژت خطا میده، خوب دوست عزیز من اون پروژه ای که خطا میده رو بذار نه همون نمونه سالمی که من بهت دادم رو عزیز من .
نه داداش قفلو وقتی میبرم رو پروژه اون فرمی که قفل توشه خطا میده و گرنه پروژه سالمه با اون قفلی که عدد 1000 رقمی میده تو سایت هم هستش کار میکنه ولی اون تو رجیستری سیو نمیکنه رمزشم خیلی طولانیه
الان برات شروع میکنم یکی مینیویسم :d
ممنون داداش فداتون بشم الهییییییییییییییییییییییییییییییییییییییییییی

فقط ویندوز عوض شد با سریال قبلی کار کنه
تا ویندوز عوض نشده سریال نخواد
قابلیت انتقال به فرم 2 بعد از تائید صحت سریال رو داشته باشه
پی سی عوض شد کد جدید بده که مال من نمیداد Biggrin

هیچوقت خوبیتونو فراموش نمیکنمط:X
بیا اینم سورس کد
هم اکتیو کی میده هم سریال
اسون راحت نوشتمش تا راحت بتونی یاد بگیری
برام دعا کن خوشبخت بشم Biggrin
دانلود سورس کد : Heart
[attachment=6380]
ممنون ایشالاااااااااا خوشبخت شی

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


منون از لطف بزرگی که بهم کردین
خوب یه اکتیو کی میده
بعد اکتیو کی میده شما و شما یه سریال میدی طرف
دکمه رو فشار میدی اگر سریال به اکتیو کی خورد برنامه اکتیو میشه
اینو پاک کن
اون فیلد دومی دیگه پر نمیشه
InputKey = UnActiveKey 'Code Active Key
من خیلی ساده خیلی ساده نوشتمش که راحت بفهمی
یه توضیح دیگه میدم
این 2 تا تابع
کد:
Public Function GetActiveKey() As String
GetActiveKey = Val(GetSerialNumber("c:\")) + Val("1234")
End Function
Public Function UnActiveKey() As String
UnActiveKey = Val(GetSerialNumber("c:\")) - Val("1234")
End Function
یکیش اکتیو کی میده بر اساس سریال هارد دیسک درایو c یکیش هم سریال
سریالو بدتس اووردم به اضافه عدد 1234 کردم نیومدم پیچیدش کنم
2 تا تابع قبلی پاک کن اون 2 تا بالایی جایگزین کن
به دلخواه یه الگوریتم بنویس
منم قاط کردم
اینم عکس تست برنامه
[تصویر:  q7xqhvlpdqfjocdbzxo1_thumb.jpg]
من که اخرشم نفهمیدم مشکل شما با خود قفل بود یا اگه اگه قفل خوب بود با ترکیبش تو پروژه خودتون بود .

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

بازم بخخشین وقتتونو گرفتم
ممنون
صفحه‌ها: 1 2 3 4