MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    [Resolvido]Atalho no Deskop

    Compartilhe

    Jr.Wano
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 152
    Registrado : 29/01/2010

    [Resolvido]Atalho no Deskop

    Mensagem  Jr.Wano em Sex 26 Fev 2010, 11:18

    Uso o código abaixo para criar um atalho Desktop,
    gostaria também de definir por código na propriedade do atalho:
    Executar: Minimizado
    Comentário: Wano Sistemas


    Dim caminho As String
    Dim atalhoLnk As Object
    Dim WshShell As Object

    Set WshShell = CreateObject("WScript.Shell")
    caminho = WshShell.SpecialFolders("Desktop")

    Set atalhoLnk = WshShell.CreateShortcut(caminho & "\" & Me.NmAtalho & ".lnk")
    atalhoLnk.IconLocation = Me.EIcone
    atalhoLnk.TargetPath = Me.FE
    atalhoLnk.Save

    Abraços,
    avatar
    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 9805
    Registrado : 04/11/2009

    Re: [Resolvido]Atalho no Deskop

    Mensagem  JPaulo em Seg 01 Mar 2010, 12:12

    Amigão desculpe ae de só agora ver a sua duvida.

    O DisplayMode funciona assim: 1:Normal, 3:Maximizado, 7:Minimizado

    Veja se funfa:

    Dim caminho As String
    Dim atalhoLnk As Object
    Dim WshShell As Object

    Set WshShell = CreateObject("WScript.Shell")
    caminho = WshShell.SpecialFolders("Desktop")

    Set atalhoLnk = WshShell.CreateShortCut(caminho & "\" & Me.NmAtalho & ".lnk")
    atalhoLnk.IconLocation = Me.EIcone
    atalhoLnk.TargetPath = Me.FE
    atalhoLnk.WindowStyle = 7
    atalhoLnk.Description = "Wano Sistemas"
    atalhoLnk.Save


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver este link.]

    Sucesso e Bons Estudos
    Success and Good Studies

    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]

    Jr.Wano
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 152
    Registrado : 29/01/2010

    Re: [Resolvido]Atalho no Deskop

    Mensagem  Jr.Wano em Seg 01 Mar 2010, 13:20

    JPaulo,
    Nada a desculpar e sim muito agradecido pela ajuda.
    Funfou legal.

    Abraços,
    avatar
    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 9805
    Registrado : 04/11/2009

    Re: [Resolvido]Atalho no Deskop

    Mensagem  JPaulo em Seg 01 Mar 2010, 14:22

    Valew amigo, precisando de novo estamos aqui.


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver este link.]

    Sucesso e Bons Estudos
    Success and Good Studies

    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    avatar
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3381
    Registrado : 06/11/2009

    Re: [Resolvido]Atalho no Deskop

    Mensagem  Assis em Sab 03 Fev 2018, 19:56

    Boa noite

    Um exemplo ?

    Obrigado


    .................................................................................
    *** Só sei que nada sei ***
    avatar
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3381
    Registrado : 06/11/2009

    Re: [Resolvido]Atalho no Deskop

    Mensagem  Assis em Dom 04 Fev 2018, 10:50

    Boa tarde

    Da minha parte esta resolvido.

    Encontrei solução no exemplo do Luís no Repositório


    Bom domingo


    .................................................................................
    *** Só sei que nada sei ***

    Noobezinho
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3632
    Registrado : 29/06/2012

    Re: [Resolvido]Atalho no Deskop

    Mensagem  Noobezinho em Dom 04 Fev 2018, 11:46

    Walter


    Só falta colocar o resolvido no título do tópico.

    [ ]'s

      Data/hora atual: Qua 23 Maio 2018, 21:20