Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Lucas Alessandro

Fazer abrir outro .exe

Recommended Posts

Olá pessoal, eu tenho um servidor de MMO e possuo um updater que ao abrir ele verifica se existe alguma atualização e se tiver atualiza. Eu gostaria de que após ele terminar de atualizar ele abrisse um .exe. Alguém poderia me ajudar ? Obrigado desde ja.

 

@EDIT

Quando termina a atualização tem um botão que puxa o .exe, mas eu gostaria que após termina ja fosse automático.

Compartilhar este post


Link para o post
Compartilhar em outros sites

Quando terminar de carregar, ou seja, quando a barra de progresso estiver no 100% vocÊ da um performClick() no botão.

 

Ex em um timer:

If progressbar.value >= 100 Then

Button.PerformClick()
timer.enabled = false

End if

Compartilhar este post


Link para o post
Compartilhar em outros sites

Quando terminar de carregar, ou seja, quando a barra de progresso estiver no 100% vocÊ da um performClick() no botão.

 

Ex em um timer:

If progressbar.value >= 100 Then

Button.PerformClick()
timer.enabled = false

End if

 

No caso eu teria que subistituir no lugar do botão ?

 

Meu botão que puxa o .exe quando clica:

Private Sub Image11_Click()

If IsFile("Game.exe") = False Then
MsgBox ("Game.exe não encontrado! Reinstale o patch."), vbInformation
Else
Shell App.Path & "\Game.exe", vbNormalFocus
End
End If

End Sub

 

Sou iniciante com VB, peguei o projeto e apenas editei e gostaria de fazer essa modificação.

Compartilhar este post


Link para o post
Compartilhar em outros sites

Tipo assim tenho updater.exe e game.exe, mas gostaria que o game.exe so fosse aberto pelo updater.exe, se voce tentar abrir direto pelo game.exe aparece uma msg "Abra pelo updater.exe", entendeu mais ou menos?

Tentei usar isso na Sub Main

 

 

 

If command() <> "teste" Then 


Call News.show


end if
Exit Sub

E la no updater no botão:

 

 

 

Private Sub lblConnect_Click()
    
    If UpToDate <> 0 Then
        If FileExist("Game.exe") Then
            Shell App.Path & "\Game.exe teste, vbNormalFocus"
        Else
            MsgBox "Game.exe não encontrado! Reinstale o patch. " & vbCritical
        End If
        DestroyUpdater
    End If


End Sub

Compartilhar este post


Link para o post
Compartilhar em outros sites

Você vai precisar passar parâmetros para esse executável. Salve um arquivo de texto ou algo do tipo toda vez que o updater.exe for aberto, e no game exe você faz esta verificação se o arquivo existe e ai o deleta.

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.