Funçao que verifica se o aplicativo Dropbox esta instalado e se nao estiver aguarda instalaçao do mesmo

Boas

existe alguma maneira de criar uma funçao que verifica se o Dropbox esta instalado na maquina do cliente
independentemente do local que possa estar instalado e se nao estiver ele abre o instalador (fornecido com
o meu app)e enquanto o Dropbox nao estiver instalado a funçao nao continua obrigando assim a instalaçao
do Dropbox na maquina do cliente.

Desde já agradeço ao forum
Cumprimentos
Pedro Melo

Edit:
Outra soluçao seria obrigar a intalaçao do Dropbox aquando o uso do InnoSetup pois pretendo criar um exe
com o InnoSetup para instalaçao do meu app.
Ainda nao percebi bem se o InnoSetup tem opçao para verificar se existe "tal" aplicativo na maquina e se nao
existir entao instalar o aplicativo e depois continuar com a instalaçao do meu app.

Ja pensou em verificar se existe a pasta do DropBox no PC? Ela pode estar em 2 lugares: C:\Program Files (x86) ou C:\Program Files.

Basta procurar dentro delas a existência da pasta do DropBox. Se não tiver, manda instalar!

Para a parte de verificar se o Dropbox esta instalado, verifiquei que o proprio instalador efectua
a instalaçao sempre por padrao, nao permitindo o usuario de escolher a pasta de instalaçao.
Sendo assim essa parte esta resolvida, mas continuo a nao saber como fazer o resto:

Se o Dropbox nao estiver instalado o VBA abre o instalador(ate aqui tudo bem) e enquanto
o Dropbox nao for instalado ele nao continua o codigo!

Cumprimentos
Pedro Melo

Veja se este link abaixo ajuda:

devhut.net/2012/07/10/vba-determine-executable-path-for-given-application

Copie o cole no navegador.

[ ]'s

Obrigado pela ajuda.
A informaçao que me deu ajudou numa outra questao que tinha,
mas continuo com a mesma duvida aqui!

Unica coisa que pretendo saber é como fazer o meu programa aguardar
que o Dropbox seja instalado na maquina do cliente.

Exemplo do funcionamento:

Cliente faz download do meu aplicativo.
Ao abrir aplicativo pela primeira vez o aplicativo vai verificar se o Dropbox esta instalado 2 casos acontecem:

Caso 1:
Se o DropBox estiver instalado na maquina do cliente o meu aplicativo segue com a abertura normalmente

Caso 2:
Se o Dropbox nao estiver instalado na maquina do cliente ele vai abrir o instalador e instalar o Dropbox

Apos verificar que o Dropbox finalmente esta instalado ele segue com a abertura normalmente
(enquanto o cliente nao instalar o Dropbox o aplicativo nao abre)

----------------------------------------------------------------------------------------------------------------------------------------
O funcionamento pretendido é o mesmo de quando instalamos um aplicativo "x" e a meio do processo nos informa que
precisamos do Directx instalado, abre o instalador e instala o Directx e só depois continua com a instalaçao do aplicativo  "x".

Cumprimentos
Pedro Melo

Pode não se aplicar a seu caso, mas veja se não da pra adaptar:

Se tratando de Formulario, quando eu abro ele com a opção ,acDialog a linha seguinte só sera executada se o Formulário for fechado.

Ex:

DoCmd.OpenForm "Formulário1", , , , , acDialog
MsgBox "Só Emitirar essa Mensagem apos o Formulário1 ser Encerrado"

No clique de um botão, eu abro o formulario1, e a segunda linha de código so sera lida quando o Fomulário for fechado. Talvez de pra adaptar a seu caso.

Vou estudar a possibilidade de criar um formulario invisivel ou oculto que so fecha se o Dropbox for detectado no pc!

Uma duvida referente ao outro topico mas para evitar reabrir ele:

na parte: separaEntreDuasStringsXML((strTexto), "path" & """: """, """, """ & "host")

se em vez de começar e acabar com  (path": ") e (", "host) for só com: "

nao estou percebendo como fazer!

Cumprimentos
Pedro Melo

É melhor postar la mesmo, no outro Tópico por favor!
Se não confunde os utilizadores!

Ola a todos,

Pedro Melo, coloque codigo abaixo num Modulo e teste:

Código:

Public Function DropboxInstalado() As Boolean
' Autor ..: Alvaro Teixeira (ahteixeira)
' Data ...: 17-04-2018
' Para ...: MaximoAccess.com
' Obs ....: Verifica se Dropbox esta instalado no user logado da maquina
Dim strHost
    strHost = CStr(Environ("USERPROFILE") & "\AppData\Local\Dropbox\host.db")
    If Dir(strHost) <> "" Then DropboxInstalado = True
End Function


Depois com um IF consegue o que pretende.

Muito bem, Alvaro

[ ]'s

Olá Amigo Noob , forte abraço aqui de terras Lusas!

Ficamos aguardar retorno do colega Pedro Melo.

Olá a todos,

Pedro Melo, como ficou a situação?
Os utilizadores do fórum merecem e agradecem o retorno.

Abraço a todos