Buenas nesesito un favor si alguien me echa una mano, quiero saver la ruta donde se encuentra instalado
Firefox.exe entonses decidi buscarlo en el
registro de windows que supongo que los valores serian igual en las distintas pc donde ejecute el programa
Entonses me gustaria prueben el siguente codigo aver si les debuelbe la ruta exacta de Firefox ya que no se si tome el valor correcto en el registro
Cita: Private Function Ruta() As String
On Error Resume Next
Dim El_Objeto As Object
Set El_Objeto = CreateObject("WScript.Shell")
Ruta = El_Objeto.RegRead("HKEY_USERS\S-1-5-21-1708537768-1644491937-725345543-1003\Software\Mozilla\Mozilla Firefox\1.5.0.4 (es-ES)\Main\PathToExe")
Set El_Objeto = Nothing
End Function
Private Sub Form_Load()
MsgBox Ruta
End Sub
Desde ya muchas gracias y cualquier recomendacion es de gran ayuda