PDA

View Full Version : حرفه ای: خواندن ریجستری در ویژوال بیسیک



maxtools
شنبه 30 مرداد 1389, 13:38 عصر
چطور میشه یک مسیر رو تو وِیژوال بیسیک خواند و انداختش رو یه تکس باکس ؟

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

saeedvir
شنبه 30 مرداد 1389, 16:21 عصر
بفرما


Private Sub Form_Load()
Set wshshell = CreateObject("WScript.Shell")
Text1.Text = wshshell.RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\Curr entVersion\ProductId")
End Sub