Jump to content

Iniciar programa com o windows


RafaelFranckilin

Recommended Posts

Para arrancar com o Windows a melhor solução passa por criares um serviço que arranque com o sistema operativo.
Quando tens uma aplicação, em especial se tiver GUI, terás de ter um utilizador autenticado no sistema, se tal for possível, podes colocar na pasta de arranque/start up.

10 REM Generation 48K!
20 INPUT "URL:", A$
30 IF A$(1 TO 4) = "HTTP" THEN PRINT "400 Bad Request": GOTO 50
40 PRINT "404 Not Found"
50 PRINT "./M6 @ Portugal a Programar."

 

Link to comment
Share on other sites

  • 1 month later...
' Botão para iniciar programa com windows
Public Sub AdicionarAplicacaoAoIniciar()
        Try
            Using key As RegistryKey = Registry.CurrentUser.OpenSubKey("SOFTWARE\Microsoft\Windows\CurrentVersion\Run", True)
                key.SetValue(caminho, """" + Application.ExecutablePath + """")
            End Using
        Catch
            Throw
        End Try
 End Sub

' Para desactivar arranque com o windows

Public Sub RemoverAplicacaoAoIniciar()
  Try
       Using key As RegistryKey = Registry.CurrentUser.OpenSubKey("SOFTWARE\Microsoft\Windows\CurrentVersion\Run", True)
	key.DeleteValue(caminho, False)
       End Using
  Catch  
      Throw
  End Try
End Sub

Private Sub btnIniciarApp_Click(sender As Object, e As EventArgs)
	Try
		AdicionarAplicacaoAoIniciar()
	Catch ex As Exception
		MessageBox.Show("Erro " + ex.Message, "Erro", MessageBoxButtons.OK, MessageBoxIcon.[Error])
	End Try
End Sub

Private Sub btnRemoverAppRegistro_Click(sender As Object, e As EventArgs)
	Try
		RemoverAplicacaoAoIniciar()
	Catch ex As Exception
		MessageBox.Show("Erro " + ex.Message, "Erro", MessageBoxButtons.OK, MessageBoxIcon.[Error])
	End Try
End Sub
Edited by programadorvb6

______________________________________________________________________________

Que minha coragem seja maior que meu medo e que minha força seja tão grande quanto minha fé.
 

Link to comment
Share on other sites

  • 2 months later...

Muito obrigado pela ajuda, mas esse exemplo funcionaria se o meu programa estiver configurado para abrir apenas como administrador do sistema? Esse meu programa é portable, eu levo no pendrive para usar em vários computadores e tenho um arquivo de configuração (app.config) junto com ele, da ultima vez que tentei iniciar ele com o sistema, ele não encontrou o app.config.

Em 07/11/2019 às 13:27, programadorvb6 disse:

' Botão para iniciar programa com windows
Public Sub AdicionarAplicacaoAoIniciar()
        Try
            Using key As RegistryKey = Registry.CurrentUser.OpenSubKey("SOFTWARE\Microsoft\Windows\CurrentVersion\Run", True)
                key.SetValue(caminho, """" + Application.ExecutablePath + """")
            End Using
        Catch
            Throw
        End Try
 End Sub

' Para desactivar arranque com o windows

Public Sub RemoverAplicacaoAoIniciar()
  Try
       Using key As RegistryKey = Registry.CurrentUser.OpenSubKey("SOFTWARE\Microsoft\Windows\CurrentVersion\Run", True)
	key.DeleteValue(caminho, False)
       End Using
  Catch  
      Throw
  End Try
End Sub

Private Sub btnIniciarApp_Click(sender As Object, e As EventArgs)
	Try
		AdicionarAplicacaoAoIniciar()
	Catch ex As Exception
		MessageBox.Show("Erro " + ex.Message, "Erro", MessageBoxButtons.OK, MessageBoxIcon.[Error])
	End Try
End Sub

Private Sub btnRemoverAppRegistro_Click(sender As Object, e As EventArgs)
	Try
		RemoverAplicacaoAoIniciar()
	Catch ex As Exception
		MessageBox.Show("Erro " + ex.Message, "Erro", MessageBoxButtons.OK, MessageBoxIcon.[Error])
	End Try
End Sub
Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
×
×
  • Create New...

Important Information

By using this site you accept our Terms of Use and Privacy Policy. We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.