Como posso criar um comando em um botão para executar um atalho na área de trabalho? Obrigado.
4 participantes
[Resolvido]Botão Executa atalho na área de trabalho
Rasec- Avançado
- Respeito às regras :
Sexo :
Localização :
Mensagens : 246
Registrado : 19/12/2015
- Mensagem nº1
[Resolvido]Botão Executa atalho na área de trabalho
Cláudio Machado- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 1636
Registrado : 17/03/2011
Coloque no evento ao clicar do seu botão.
Call Shell(""C:\Documents and Settings\All Users\Desktop\SeuPrograma.exe", 1)
Call Shell(""C:\Documents and Settings\All Users\Desktop\SeuPrograma.exe", 1)
.................................................................................
" Nunca cruze os braços diante de qualquer problema ou dificuldade, pois o maior homem do mundo Jesus, morreu de braços abertos."
Agradeça e feche o tópico clicando no botão Resolvido. Se não sabe como, veja AQUI.
Não esqueça de clicar no Joinha para agradecer a dica que solucionou seu problema.
Rasec- Avançado
- Respeito às regras :
Sexo :
Localização :
Mensagens : 246
Registrado : 19/12/2015
Veja, eu tenho um atalho na área de trabalho, nome do atalho "Emissor de Nota Fiscal Eletronica (NF-e) 3.10", colocando o nome do atalho não consegui fazer func. De outra forma nas propriedades do atalho ele remete para "C:\Program Files\Java\jre1.8.0_66\bin\javaws.exe" -localfile -J-Djnlp.application.href=http://downloadnfe.fazenda.sp.gov.br/v310/aplicativo/emissorNFe.jnlp "C:\Users\César\AppData\LocalLow\Sun\Java\Deployment\cache\6.0\4\585cbec4-604b1a24". Aí, ferrou tudo porque com esse monte de aspas eu não me acho mesmo, queria apenas executar o atalho, para executar o programa. Agradeço a força.
Cláudio Machado- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 1636
Registrado : 17/03/2011
Se usar assim.
Call Shell(""C:\Program Files\Java\jre1.8.0_66\bin\javaws.exe" -localfile -J-Djnlp.application.href=http://downloadnfe.fazenda.sp.gov.br/v310/aplicativo/emissorNFe.jnlp ", 1)
Call Shell(""C:\Program Files\Java\jre1.8.0_66\bin\javaws.exe" -localfile -J-Djnlp.application.href=http://downloadnfe.fazenda.sp.gov.br/v310/aplicativo/emissorNFe.jnlp ", 1)
.................................................................................
" Nunca cruze os braços diante de qualquer problema ou dificuldade, pois o maior homem do mundo Jesus, morreu de braços abertos."
Agradeça e feche o tópico clicando no botão Resolvido. Se não sabe como, veja AQUI.
Não esqueça de clicar no Joinha para agradecer a dica que solucionou seu problema.
Rasec- Avançado
- Respeito às regras :
Sexo :
Localização :
Mensagens : 246
Registrado : 19/12/2015
Deu erro de sintaxe.
JPaulo- Moderador
- Respeito às regras :
Sexo :
Localização :
Mensagens : 11026
Registrado : 04/11/2009
Um pitaco;
Os atalhos contêm uma extensão não visivel no sistema operativo Windows (.lnk)
Os atalhos contêm uma extensão não visivel no sistema operativo Windows (.lnk)
- Código:
Dim strCaminho$
strCaminho = Environ("USERPROFILE") & "\Desktop" & "\" & "Emissor de Nota Fiscal Eletronica (NF-e) 3.10" & ".lnk"
Application.FollowHyperlink strCaminho, , True
.................................................................................
Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.
Pay-Pal R$ Aqui
Pay-Pal € Aqui
Ou ainda: Aqui (Novo)
Sucesso e Bons Estudos
Success and Good Studies
Utilize o Sistema de Busca do Fórum...
102 Códigos VBA Gratuitos...
Instruções SQL como utilizar...
Cláudio Machado- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 1636
Registrado : 17/03/2011
Sempre Mestre.
.................................................................................
" Nunca cruze os braços diante de qualquer problema ou dificuldade, pois o maior homem do mundo Jesus, morreu de braços abertos."
Agradeça e feche o tópico clicando no botão Resolvido. Se não sabe como, veja AQUI.
Não esqueça de clicar no Joinha para agradecer a dica que solucionou seu problema.
Rasec- Avançado
- Respeito às regras :
Sexo :
Localização :
Mensagens : 246
Registrado : 19/12/2015
Tu é fera, funcionou direitinho. Obrigado.
JPaulo- Moderador
- Respeito às regras :
Sexo :
Localização :
Mensagens : 11026
Registrado : 04/11/2009
Fico feliz.
Obrigado pelo retorno o forum agradece.
Obrigado pelo retorno o forum agradece.
.................................................................................
Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.
Pay-Pal R$ Aqui
Pay-Pal € Aqui
Ou ainda: Aqui (Novo)
Sucesso e Bons Estudos
Success and Good Studies
Utilize o Sistema de Busca do Fórum...
102 Códigos VBA Gratuitos...
Instruções SQL como utilizar...
crysostomo- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 2746
Registrado : 23/01/2018
- Mensagem nº10
Re: [Resolvido]Botão Executa atalho na área de trabalho
Mestre Jp.
Ele coloca no desktop, mas não coloca a área de trabalho.
Att..
Ele coloca no desktop, mas não coloca a área de trabalho.
Att..
.................................................................................
Obs.: Coloque somente as partes defeituosas para que possamos encontrar e entender o problema mais rápido para lhe ajudar. Disponho.
Uma mão ajuda a outra.
Feliz aquele que transfere o que sabe e aprende o que ensina.