یک برنامه ساده برای مبتدیان
باز کردن رجیستری در مسیر دلخواه
کافیه مسیر مورد نظرتون از رجیستری رو به تابع زیر بفرستید تا برنامه Regedit در
اون مسیر باز بشه.
طرز کار این تابع اینجوریه که مسیر ورودی رو به عنوان آخرین مسیر بازدید شده
توسط Regedit ، در رجیستری
ذخیره میکنه و سپس برنامه رو صدا میزنه.
Sub RegJump(regKeyStr As String)
Dim RegObj
Set RegObj = Create("W.Shell")
Call RegObj.RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\
CurrentVersion\Applets\Regedit\LastKey", regKeyStr, "REG_SZ")
RegObj.Run ("regedit")
Set RegObj = Nothing
End Sub
نظرات شما عزیزان:
.: Weblog Themes By Pichak :.