Saber si un programa esta instalado

[enterariel]

Si como el titulo dice como se puede saber si un programa esta instalado desde VB6

Específicamente quiero saber si el WampServer esta instalado en el Windows, pero mejor si se puede comprobar cualquier programa esta o no instalado.

[$Edu$]

En si lo que te podes fijar es si existe un x archivo, si existe C:\archivos de programa\xampserver.exe por ejemplo y eso lo podes hacer algo como:

Código (vb) [Seleccionar] Expandir

If Len(Dir$("C:\archivos de programa\xampserver.exe")) <> 0 then
msgbox "Existe"
else
msgbox "No existe"
end if

Algo asi era

[enterariel]

Si así lo tengo ahora mi amigo, pero no me sirve así por que el cliente pudo haber instalado en otro lugar.

[ignorantev1.1]

HKEY_LOCAL_MACHINE/Software/Microsoft/Windows/CurrentVersion/Uninstall

Y leer un buen tutorial sobre el manejo del registro de Windows en VB y... Listo!

Saludos!