کمک در مورد برنامه ی برای شبیه سازی Device Manager

[mohammadian]

سلام دوستان.
من یه برنامه ی نوشته شده دارم که دیوایس منیجر رو شبیه سازی کرده، از شما میخوام اگه کسی بلده یه توضیحی در رابطه با اون بده.
دوستان اگه می دونین خواهشا دریغ نکنین چون بدجور نیاز دارم.
ممنون.
سورس برنامه رو هم پیوست میکنم.

[mohammadian]

آقا چرا کسی جواب نمیده؟
یعنی از این 6نفر یکی هم نمی دونه؟

[Vahid Wosugy]

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

[r0ot$harp]

سلام دوستان.
من یه برنامه ی نوشته شده دارم که دیوایس منیجر رو شبیه سازی کرده، از شما میخوام اگه کسی بلده یه توضیحی در رابطه با اون بده.
دوستان اگه می دونین خواهشا دریغ نکنین چون بدجور نیاز دارم.
ممنون.
سورس برنامه رو هم پیوست میکنم.

دوست عزیز آخه شما بگین کجا رو مشکل دارین تا توضیح بدیم . کل کد رو که نمیشه توضیح داد . در ضمن اگر دنبال اینی که یکی بیاد فقط یه دو خط رو توضیح بده و تمام نباش . ببین کجا ها رو نمی فهمی توضیح بدیم .

در ضمن این کد خیلی مزخرف و ناقص هست .


باتشکر احسان

[mohammadian]

Set objWshNet = CreateObject("Wscript.Network")

Set objDeviceSet = objService.InstancesOf(strWBEMClass)

set چیه و دو کد بالا چه کاری انجام میدن؟

eilute = eilute + 1

علت اینکه یک واحد اضافه میکنیم چیه؟

[r0ot$harp]

دوست عزیز جواب سوال های شما به شرح زیر می باشد :

Set objWshNet = CreateObject("Wscript.Network")                      

برای ساختن یک آبجکت از نوع Wscript.Network . این کار کاری شبیه به اضافه کردن Reference می باشد . برنامه نویس از طریق این آبجکت نام کامیوتری که برنامه روش هست رو دریافت کرده . این نوع کد نویسی بیشتر در زبان Vbscript مورد استفاده قرار می گیره .

Set objDeviceSet = objService.InstancesOf(strWBEMClass)

دوست عزیز در خط بالا strWBEMClass اسم کلاس آبجکتی هست که شما می خواهید زیر مجموع یا Child هاشو پیدا کنید . خط بالا میاد و objDeviceSet رو ُSet می کنه با نوعی سرویس از اون کلاس تا بتونه زیر مموعه های اون نوع Device رو پیدا کنه .

eilute = eilute + 1                      

تا اینجایی که من متوجه شدم این قسمت عددی هست منحصر بفرد برای هر کدام از کلاس های Device ها هست .


باتشکر احسان

[mohammadian]

ممکنه بگین من چه کتابی رو مطالعه کنم که بتونم به طور کامل اینا رو یاد بگیرم؟منظورم کدوم قسمت؟

[r0ot$harp]

ممکنه بگین من چه کتابی رو مطالعه کنم که بتونم به طور کامل اینا رو یاد بگیرم؟منظورم کدوم قسمت؟

دوست عزیز برنامه ای که شما دادین از طریق VB Script کارهاشو انجام داده . اگر می خواین خوب یاد بگیرین به Reference های VB Script مراجعه کنید . در ضمن می خواستم بدونم چرا رویه این یه قسمت گیر دادین ؟


باتشکر احسان

[mohammadian]

دوست عزیز برنامه ای که شما دادین از طریق VB Script کارهاشو انجام داده . اگر می خواین خوب یاد بگیرین به Reference های VB Script مراجعه کنید . در ضمن می خواستم بدونم چرا رویه این یه قسمت گیر دادین ؟

خوب اخه بلد نیستم ولی زیاد زیاد هم گیر ندادم ها!

[r0ot$harp]

خوب اخه بلد نیستم ولی زیاد زیاد هم گیر ندادم ها!

نه دوست عزیز اصلا منظور من بی احترامی یا توهین نبود . بلد نبودن یکی از راه های موفقیت هست . منظور من این هست که اگر برای یادگیری داری روی این موضوع ها وقت گذاری می کنید بهتر این کار رو نکنید چون به هیچ درد نمی خوره .


باتشکر احسان

[vcldeveloper]

ممکنه بگین من چه کتابی رو مطالعه کنم که بتونم به طور کامل اینا رو یاد بگیرم؟منظورم کدوم قسمت؟

برید در سایت MSDN و درباره WMI تحقیق کنید.

[mohammadian]

دوست عزیز میدونم منظورتون چنین چیزی نبود.
یه سوال دیگه از دوستان داشتم.
وقتی تو vb فارسی مینویسم فونت رو نمیشناسه، فونت انتخابی هم tahoma هست.
لطفا راهنماییم کنین.
ممنون.

[butterfly8528]

وقتی تو vb فارسی مینویسم فونت رو نمیشناسه، فونت انتخابی هم tahoma هست.
لطفا راهنماییم کنین.

حد اقل 3 بار تو 10 صفحه آخر انجمن در این مورد بحث شده ! جستجو کنید .