الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

بعض الأسئله : #If ,نوع الwINDOWS ,olE!!!!!

مغلق
بدأه nadeen في 22 ديسمبر 2002 · 11 رد · 1,273 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

:):):)سلام الله عليكم , كيف الشباب ؟ إن شاء الله تمام ! ؟؟! ؟

:)

;);););););)

بدي تجاوبوني عللى هاي الأسئله :

هل هناك كود لمعرفة نوع الWindows (95,98,nt,2ooo,xP

???

كيف يمكن ان احذف مجلد (Folder) او اغير اسمه ؟

====

#If Win32 Then

MsgBox "Win32"

End

#End If

--

If Win32 Then

MsgBox "Win32"

End

End If

اي هل اذا حذفت هذه الأشاره # تختلف النتيجه ؟؟؟

و اللي عنده برنامج ال Fusion أو Vb-Power Wrap يا ريت يبعتلي اياهم على

DunJwan1@Hotmail.com

: )

و شكرا مقدمأ

:)

#2

والله يا اختاه هذا السؤال حلو جدا ولكنى لا املك الخبرة الازمة للرد عليه اما بالنسبة لبرنامج Fusion مستجدين هنا وصلة لإنزاله.

تحياتى لك ولجميع الاعضاء والزوار :)

http://download.com.com/3000-2094-3273850....tml?tag=lst-0-2

#3

مرحبا ...

نعم يمكن معرفة نوع النظام عن طريق توابع الـ API

...

بس ممكن أعرف شو بيعمل برنامج الـ

Fusion

و شكراً ...

#4

اولا - ممكن ان تتعلمي من الملف المرفق كيفيه تحديد نظام التشغيل.

ثانيا - لتغيير اسم فولدر

Name oldpathname As newpathname

ولحذف فولدر

RmDir path

ولكن يجب ان يكون الفولدر فارغ من الملفات .. ولحذف الملفات

Kill pathname

و يجب ملاحظه ان جميع الباراميتر (الكلمات بالخط المائل) هي من نوع String اي يجب ان تحاط بعلامات الاقتباس (" ").

اما بالنسبه للـ #...

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

لن يعمل الفيجوال في الحالة الثانية لانه لا تعرف المقصود بالـ win32.

و هذا ما تقوله مايكوسوفت:

اقتباس
The behavior of the #If...Then...#Else directive is the same as the If...Then...Else statement, except that there is no single-line form of the #If, #Else, #ElseIf, and #End If directives; that is, no other code can appear on the same line as any of the directives. Conditional compilation is typically used to compile the same program for different platforms. It is also used to prevent debugging code from appearing in an executable file. Code excluded during conditional compilation is completely omitted from the final executable file, so it has no size or performance effect.

Regardless of the outcome of any evaluation, all expressions are evaluated.

#5

بس اي ملف مرفق عم تحكي عنوووووووو:(:(:(:(:(:(

و على حد علمي name as بس للملفات مو للفولدرز ؟؟؟

و شكرا الك مره تانيه !!!!!!!!!!!

ســـــــــــلام

#6

يمكن إستخدام أداة sysinfo مع إستخدام طريقة osplatform

http://msdn.microsoft.com/library/default....infocontrol.asp

Technical Lead Developer

My LinkedIn Profile

اللهم قنى شر الجهل و الجهلاء

( اقْتَرَبَ لِلنَّاسِ حِسَابُهُمْ وَهُمْ فِي غَفْلَةٍ مَّعْرِضُونَ ) {الأنبياء:1}

#7

مشكور اخ win98_eg

انا رح اشوف الأداه و ارد عليك ;););)

سلام (f)(f)

#8

كود بسيط للتوضيح للاداة sysinfo

اما بالنسبه لمسح المجلدات فيمكنك إستخدام مكتبة run time script بإستخدام fso(file system object)ايضاً ارفق مثال بسيط

الملفين داخل ملف zip واحد

Technical Lead Developer

My LinkedIn Profile

اللهم قنى شر الجهل و الجهلاء

( اقْتَرَبَ لِلنَّاسِ حِسَابُهُمْ وَهُمْ فِي غَفْلَةٍ مَّعْرِضُونَ ) {الأنبياء:1}

#9

اسف يا جماعة نسيت اضع الكود و لكن ها هو الكود

osvar_cleaner.zip

Technical Lead Developer

My LinkedIn Profile

اللهم قنى شر الجهل و الجهلاء

( اقْتَرَبَ لِلنَّاسِ حِسَابُهُمْ وَهُمْ فِي غَفْلَةٍ مَّعْرِضُونَ ) {الأنبياء:1}

#10

مشكور اخ win98_eg ;);)

و اخ Arafa

شكرا على المعلومه :P:p

سلام (f)

#11

ارجو من الاخوة الذين جربوا الاكواد ان يدلوا باراّهم فيها حتى اتلاشى الاخطاء

Technical Lead Developer

My LinkedIn Profile

اللهم قنى شر الجهل و الجهلاء

( اقْتَرَبَ لِلنَّاسِ حِسَابُهُمْ وَهُمْ فِي غَفْلَةٍ مَّعْرِضُونَ ) {الأنبياء:1}

#12

لوووووووول اخ win98_eg

اشتغلوا تمام

سلموا ايديك

(f)(f)(f)(f)(f)

سلالالالالام

(f)(f)(f)(f)(f)

هذا الموضوع مغلق.

مواضيع مشابهة