PDA

View Full Version : حرفه ای: کمک در مورد برنامه ی برای شبیه سازی Device Manager


mohammadian
سه شنبه 24 شهریور 1388, 13:01 عصر
سلام دوستان.
من یه برنامه ی نوشته شده دارم که دیوایس منیجر رو شبیه سازی کرده، از شما میخوام اگه کسی بلده یه توضیحی در رابطه با اون بده.
دوستان اگه می دونین خواهشا دریغ نکنین چون بدجور نیاز دارم.
ممنون.
سورس برنامه رو هم پیوست میکنم.
mohammadian
سه شنبه 24 شهریور 1388, 22:11 عصر
آقا چرا کسی جواب نمیده؟
یعنی از این 6نفر یکی هم نمی دونه؟
Vahid Wosugy
چهارشنبه 25 شهریور 1388, 01:19 صبح
کار زیاد پیچیده ای انجام نمیدهد
به وسیله چند تا تابع مشخات سیستم رو در میاره.
r0ot$harp
چهارشنبه 25 شهریور 1388, 04:52 صبح
سلام دوستان.
من یه برنامه ی نوشته شده دارم که دیوایس منیجر رو شبیه سازی کرده، از شما میخوام اگه کسی بلده یه توضیحی در رابطه با اون بده.
دوستان اگه می دونین خواهشا دریغ نکنین چون بدجور نیاز دارم.
ممنون.
سورس برنامه رو هم پیوست میکنم.




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

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


باتشکر احسان
mohammadian
چهارشنبه 25 شهریور 1388, 13:15 عصر
Set objWshNet = CreateObject("Wscript.Network")

Set objDeviceSet = objService.InstancesOf(strWBEMClass)set چیه و دو کد بالا چه کاری انجام میدن؟


eilute = eilute + 1علت اینکه یک واحد اضافه میکنیم چیه؟
r0ot$harp
چهارشنبه 25 شهریور 1388, 16:20 عصر
دوست عزیز جواب سوال های شما به شرح زیر می باشد :


Set objWshNet = CreateObject("Wscript.Network")

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


Set objDeviceSet = objService.InstancesOf(strWBEMClass)

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


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


باتشکر احسان
mohammadian
چهارشنبه 25 شهریور 1388, 17:57 عصر
ممکنه بگین من چه کتابی رو مطالعه کنم که بتونم به طور کامل اینا رو یاد بگیرم؟منظورم کدوم قسمت؟
r0ot$harp
چهارشنبه 25 شهریور 1388, 18:19 عصر
ممکنه بگین من چه کتابی رو مطالعه کنم که بتونم به طور کامل اینا رو یاد بگیرم؟منظورم کدوم قسمت؟

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


باتشکر احسان
mohammadian
چهارشنبه 25 شهریور 1388, 18:46 عصر
دوست عزیز برنامه ای که شما دادین از طریق VB Script کارهاشو انجام داده . اگر می خواین خوب یاد بگیرین به Reference های VB Script مراجعه کنید . در ضمن می خواستم بدونم چرا رویه این یه قسمت گیر دادین ؟

خوب اخه بلد نیستم ولی زیاد زیاد هم گیر ندادم ها!
r0ot$harp
پنج شنبه 26 شهریور 1388, 01:47 صبح
خوب اخه بلد نیستم ولی زیاد زیاد هم گیر ندادم ها!

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


باتشکر احسان
vcldeveloper
پنج شنبه 26 شهریور 1388, 09:50 صبح
ممکنه بگین من چه کتابی رو مطالعه کنم که بتونم به طور کامل اینا رو یاد بگیرم؟منظورم کدوم قسمت؟
برید در سایت MSDN و درباره WMI تحقیق کنید.
mohammadian
پنج شنبه 02 مهر 1388, 10:36 صبح
دوست عزیز میدونم منظورتون چنین چیزی نبود.
یه سوال دیگه از دوستان داشتم.
وقتی تو vb فارسی مینویسم فونت رو نمیشناسه، فونت انتخابی هم tahoma هست.
لطفا راهنماییم کنین.
ممنون.
butterfly8528
پنج شنبه 02 مهر 1388, 12:49 عصر
وقتی تو vb فارسی مینویسم فونت رو نمیشناسه، فونت انتخابی هم tahoma هست.
لطفا راهنماییم کنین.

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