AYMAN Z HARB قام بنشر يونيو 25, 2008 قام بنشر يونيو 25, 2008 اصدقائي الاعزاء - اريد ربط منظومة استخراج سيريال نمبر الجهاز واضافتها لمنظومة خبور الاصدار الثاني او الثالث بحيث لا تعمل منظومة خبور الا على جهاز واحد فقط لقد حاولت نسخ الكود ولكن لم تنحج العملية مرفق لكم المحاولة شاكرا لكم مساعدتكم _____________________2_3.rar
cat101 قام بنشر يونيو 25, 2008 قام بنشر يونيو 25, 2008 ياترى ايه الداعي انها تعمل على حهاز واحد فقط .. مجرد سؤال ؟
AYMAN Z HARB قام بنشر يونيو 25, 2008 الكاتب قام بنشر يونيو 25, 2008 لان عندي شبكة ومش عايز حد ينقل المنظومة ويعمل عليها لاحتوائها على اسرار العمل واضح الان
هادى محمد المامون سالم قام بنشر يونيو 25, 2008 قام بنشر يونيو 25, 2008 بسم الله الرحمن الرحيم لاستخراج سيريال نمبر الجهاز استخدم الكود التالى Sub Auto_Open() Dim fs, d, s, t Set fs = CreateObject("Scripting.FileSystemObject") Set d = fs.GetDrive(fs.GetDriveName(fs.GetAbsolutePathName(drvpath))) Select Case d.DriveType Case 0: t = "Unknown" Case 1: t = "Removable" Case 2: t = "Fixed" Case 3: t = "Network" Case 4: t = "CD-ROM" Case 5: t = "RAM Disk" End Select s = "Drive " & d.DriveLetter & ": - " & t s = s & vbCrLf & "SN: " & d.SerialNumber MsgBox s End Sub مرفق ملف السلام عليكم My_Drive.rar
AYMAN Z HARB قام بنشر يونيو 26, 2008 الكاتب قام بنشر يونيو 26, 2008 الاخ هادي سالم لك منى جزيل الشكر والامتنان لاهتمامك بي وبارك الله فيك جعلها الله في ميزان حسناتك
AYMAN Z HARB قام بنشر يونيو 26, 2008 الكاتب قام بنشر يونيو 26, 2008 ما اريده يا استاذ هادي يوجد كود بالملف المرفق بمنظومة خبور الاصدار الثاني في الفيجوال بيسك ولكن بينهما تعارض كود يحسب عدد مرات فتح الملف وكود اظهار رقم الجهاز المطلوب فك هذا التعارض مع جزيل الشكر
أبو شرف قام بنشر يوليو 7, 2008 قام بنشر يوليو 7, 2008 اخواني الأعزاء في المنتدى العزيز ارجو منكم توضيح الخطوات التي نعمل عليها هذا الكود لملف الأكسل لذلك ارجو التوضيح لاننا احيانا لدينا ملفات مهمة واسرار عمل ولكم الشكر مقدما والحمد لله رب العالمين اخوكم محاسب ابو شرف
AYMAN Z HARB قام بنشر يوليو 10, 2008 الكاتب قام بنشر يوليو 10, 2008 وينكم يا جماعة ممكن يا استاذ خبور ايميلك الشخصي لموضوع هام
DIAA125 قام بنشر يوليو 11, 2008 قام بنشر يوليو 11, 2008 الاخ ابو ياسمين انظر الرابط التالي هيساعدك http://www.officena.net/ib/index.php?showt...mp;#entry115515
DIAA125 قام بنشر يوليو 12, 2008 قام بنشر يوليو 12, 2008 الاخ ابو ياسمين انظر الرابط التالي هيساعدك http://www.officena.net/ib/index.php?showt...mp;#entry115515 سوري الاخت ايو ياسمين
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.