پیدا کردن آدرس ویندوز با وی بی

[Darg]

تو 98 یا Me معادل Empty رو بر می گردونه

مطمعنی ؟
چون ویژوال استودیو 6 قبل از وین اکس پی اومد

از این جهت چشم بسته می گم تو ویندوز هایی که تعریف کاربر ندارند مثل 98 پس پوشه ای به اسم %AllUsersProFile% هم وجود ندارد.

All Users ProFile رو نمی دونم داشت یا نه ولی من خودم اون زمان که
از 98 استفاده می کردم 4 تا یوزر درست کرده بودم برای خانواده !

خوب یادت میاد برای هر کاربر در 98 پروفایل کاربری مجزا درست می شد یا نه؟
خوب معلومه که نه اصلا توی 98 پروفایل کاربری نداریم که بخواد برای هرکدوم یک پوشه سوا و مخصوص درست کنه حالا چه برسه به اینکه بخواد تنظیمات همه کاربران رو در یک مکان خاص AllUsersProFile نگه بداره!!!

[Iron_Fist]

خوب یادت میاد برای هر کاربر در 98 پروفایل کاربری مجزا درست می شد یا نه؟

دقیقآ یادم نیست که پروفایل کاربری مجزا مثل اکس پی درست می شد یا نه
ولی چیزی که یادمه اینه که یوزر ها کاملآ از یکدیگر تفکیک می شدند
درست مثل اکس پی
ببینم شما حدس می زنی یا واقعآ امتحان کردی ؟
که اگه امتحان کردی علکی بحث نکینم

[Darg]

خوب یادت میاد برای هر کاربر در 98 پروفایل کاربری مجزا درست می شد یا نه؟

دقیقآ یادم نیست که پروفایل کاربری مجزا مثل اکس پی درست می شد یا نه
ولی چیزی که یادمه اینه که یوزر ها کاملآ از یکدیگر تفکیک می شدند
درست مثل اکس پی
ببینم شما حدس می زنی یا واقعآ امتحان کردی ؟
که اگه امتحان کردی علکی بحث نکینم

می تونی روی حرف من حساب کنی ؟!
آخه من انقدر تو 98 برنامه نوشتم که از بس ازیت شدم بوسیدمش گذاشتمش کنار حالا دیگه فقط تو XP به بالا می نویسم.
گرچند هنوز در سازمان های دولتی به طور جدی از 98 استفاده می شه که این مسئله باعث شده پیشنهاد های زیادی به برنامه نویسی برای محیط 98 به برنامه نویس های داخلی بشه. من یکی از معروف ترین نرمافزار هارو میشناسه که خیلی از شرکت های بزرگ ازش استفاده می کنند و اون برنامه که اسمش رو به دلایلی نمی گم مخصوص محیط 98 نوشته شده گرچند که برای یک نسخه مخصوص از XP هم تغییراتی درش دادند اما چه فایده یعنی چیزی شده شبیه برنامه نویسی با Qbasic برای Vista !!!!

[Iron_Fist]

می تونی روی حرف من حساب کنی ؟!

آره
چرا که نه ؟
بلاخره شما استاد مایی

[Darg]

می تونی روی حرف من حساب کنی ؟!

آره
چرا که نه ؟
بلاخره شما استاد مایی

]چرا هندونه میزاری زیر بقلم
نکنه اینو گفتی که منم بگم استادی از خودتونه!!!

[Payman62]

و اما..._______________________________________

برنامه رو دیدم. تو اون حلقه اون قدر اختلاف زمانی دارن. پس این مشکل شاید در حد نانو ثانیه سرعت برنامه رو کم کنه.
فقط همین مشکل رو داره؟

ببین آقا پیام من برنامه گذاشتم که دیگه توش هیچ حرف و حدیثی نباشه
اگر از همون اول می گفتم که سرعت API بشتره کلی بحث راه مینداختی که اِله هو بله!

حالاهم درای گیر می دی به حلقه!!!!
آقا جون اون حلقه منظورم رو برای زمانی نشون میده که سیستم اشغاه:
چرا نمی گی با وجود اینکه برای به دست آوردن با API باید مسیر طولانی تر رو توی کد خودمون طی کنیم (اون تابع به دست آوردن مسیر با API) اما باز هم API زمان کمتری می خواد تا روش های دیگه!!!!

عیب نداره حالا یه دلیل دیگه برات میارم که کاملا فنی و حساب شدست و اگر نخوای ایراد بنی اسرائیلی ازش بگیری میشه قبولش کرد:

برای این می گند Environ برای Script نویسی مناسب تره که یک کد اسکریپت به طور مخصوص فقط برای یه نوع سیستم نوشته میشه مثلا 98 یا XP یا 2000 اما API حکم کلی داره و چون قراره برنامه درون همه نوع سیستم جواب بده باید از روشی درش استفاده بشه که سازگار بابقیه سیستم ها هم باشه و API همچین شرایطی رو داره.
حالا اصلا تعریف Environ اینکه که شما بوسیله اون بتونی معادل متغییر های محیطی رو مثلا:
WinDir
SystemRoot
, ...
رو به دست بیاری و خود کلمات متغییر های محیطی درون هر سیستم ممکنه با سیستم دیگه متفاوت باشه مثلا کد:
Environ$("AllUsersProFile") <code
درون ویندوز XP خوب جواب میده اما تو 98 یا Me معادل Empty رو بر می گردونه!!!

می دونی می خوام چی بگم. می خوام بگم اگر شما برنامت رو با Environ بنویسی نمی تونی مطمعن باشی که اون برنامه درون ویندوز های جدید یا قدیمی تر اجرا بشه و درست کار کنه در حالی که API سیستم حالت خودش رو حفظ می کنه و به طور وراثتی برای نسخه های جدید هم طوری تدبیر اندیشیدند که API خاصیت خودش رو از دست نده.
اما اسکریپت رو می کد مثلا فلان اسکریپت مختص فقط ویندوز XP اون هم مثلا SP2 هست فقط.

اما برای من همون سرعت ملاک عمل اصلیه.
و نمی گم که Environ کارایی نداره بله دراه اما برای کسایی که می خواند از زیر کار دربرند و کد راحت و بی درد سری داشته باشند (گرچند ه اعتقاد بنده بر اینه که API بهتر درد سر کد نویسی رو کم می کنه تا زیاد)

سلام.
باز به من گفتی پیام. من کوچیک شما پیمانم. (حالا لابد میخوای بگی من بهت گفتم درگ. نه اون خسرو بود من نبودم).

دوست عزیز من فقط دلیل منطقی خواستم.
شما اگه این خط کد رو هم به تابع SysPath برای تکمیلش اضافه کنی گاهی اوقات سرعت api از environ هم میاد پایین تر.
SysPath = Left(SysPath, InStr(1, SysPath, Chr(0)) - 1)

در حالی که API سیستم حالت خودش رو حفظ می کنه و به طور وراثتی برای نسخه های جدید هم طوری تدبیر اندیشیدند که API خاصیت خودش رو از دست نده.

ولی بعضی API ها هم در نسخه های جدید ویندوز حذف شدن. مثل: RegisterServiceProcess
البته به ندرت پیش میاد که APIیی حذف شه. اینم که حذف کردن به این دلیل بود که تو ویندوز 98 برای مخفی کردن پروسه ها ازش سو استفاده میشد. ولی دیگه تو xp نمیشه از این API استفاده کرد.

در کل دلیل دومت قابل قبول و منطقیه. ممنون که کامل توضیح دادی.

[Darg]

اختیار دارید بزرگی از خودتونه
باز خوبه تو عمرم یه کار مثبت در سایت انجام دادم که حداقل یکی رو قانع کرد

[Iron_Fist]

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

نه شما نمی خواهد چیزی بگی  
استاد که نباید شاگردش رو ضایع کنه

(حالا لابد میخوای بگی من بهت گفتم درگ. نه اون خسرو بود من نبودم)

ولی بعضی API ها هم در نسخه های جدید ویندوز حذف شدن. مثل: RegisterServiceProcess

این تابع یک پروسس از نوع سرویس رو برنامه ای روش پیاده می کنه که بعد از لاگ آف یوزر (کاما) پروسسه به کارش ادامه بده و یا به عبارتی

A service process that needs to stay running when the user logs off can call the RegisterServiceProcess API to make itself exempt from the automatic shutdown of all applications at logoff time

و چون مکانیزم سوریس ها در ویندوز های سری NT تغییر کرده دیگه
امکان استفاده از این تابع وجود نداره

[Darg]

ولی بعضی API ها هم در نسخه های جدید ویندوز حذف شدن. مثل: RegisterServiceProcess

این تابع یک پروسس از نوع سرویس رو برنامه ای روش پیاده می کنه که بعد از لاگ آف یوزر (کاما) پروسسه به کارش ادامه بده و یا به عبارتی

A service process that needs to stay running when the user logs off can call the RegisterServiceProcess API to make itself exempt from the automatic shutdown of all applications at logoff time

و چون مکانیزم سوریس ها در ویندوز های سری NT تغییر کرده دیگه
امکان استفاده از این تابع وجود نداره

ای ول
نگفتم استادی از خودتونه و برازنده شماست.

[Payman62]

سلام.
بسه دیگه جفتتون مدیرید. انقدر واسه هم تارف تیکه پاره نکنین.

شکی در مورد صحت صحبت خسرو در مورد اون API نیست. قضیه مخفی کردن پروسه هم که بنده عرض کردم درسته. حیف که حذف شد. واسه ویروس نویسی خیلی خوب بود.

[Darg]

بسه دیگه جفتتون مدیرید. انقدر واسه هم تارف تیکه پاره نکنین.

چه ربطی داره مگه مدیر ها آدم نیستند که بخواند تعارف کنند.

شکی در مورد صحت صحبت خسرو در مورد اون API نیست. قضیه مخفی کردن پروسه هم که بنده عرض کردم درسته. حیف که حذف شد. واسه ویروس نویسی خیلی خوب بود.

ای شیطون پس خوب شد که خذفش کردند