| Muchas gracias Eternal, encontre otra solución más rápida:
Dim objShell As New WshShell
Dim strkey As String
Dim path As String
strkey = "HKEY_CLASSES_ROOT\htmlfile\shell\open\command \"
path = objShell.RegRead(strkey)
Para que funciones tenemos que agregar la referencia Windows Script Host Object Model
Muchas gracias otra vez por el interes prestado!
:saludos:
__________________
Una buena forma de sacar las castañas del fuego sin quemarse: LEE FOROSDELWEB..... :si:
------
F.P.R. MCAD .NET |