Crie Scripts em sua rede que criam um atalho na área de trabalho do usuário (facilitando a vida do povo)



Documento: Criando Scripts de Logon (atalho na área de trabalho)
Objetivo: Criar atalhos na área de trabalho do usuário
Organização: Facilidades 


*******************************************************************************

Se gostou comente... se funcionou comente, se não ... comente também rs... sua opinião ajuda a melhorar o Blog da HTBRAZ e logicamente fornecer conteúdo de qualidade para quem esta com problemas.

Nosso conteúdo é gratuito. Somos a favor do conhecimento livre.

Sucesso!

*******************************************************
Estude para o MCSA do Windows Server 2012 R2

http://juliobattisti.com.br/loja/detalheproduto.asp?CodigoLivro=LIV0001438 

Link:
 *******************************************************


Por padrão quem utiliza uma rede com o Windows Server 2008 ou superior, pode se deliciar com a GPO que permite a criação de atalhos em uma determinada área de trabalho de um usuário, porém muitos de nós já temos alguns scripts de logons prontos, então muitas vezes adicionar uma pequena linha pode ser mais interessante em alguns momentos.



Seguem algumas formas bem criativas de fazer o mapeamento automático pela rede.

Copiar_Atalho.vbs

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set Wshs = WScript.CreateObject("WScript.Shell")
'Const OverwriteExisting = true
usrProfile = Wshs.ExpandEnvironmentStrings("%UserProfile%")
objFSO.CopyFile "\\192.168.0.1\otrs\customer.pl" , usrProfile & "\Desktop\", OverwriteExisting

Copiar_Atalho.bat

Navegue até a pasta em que o programa ou a aplicação está (lembre-se das permissões de acesso necessárias), em sua rede, ex. \\192.168.0.1\otrs\
Crie um atalho para este programa nessa mesma pasta. Verifique nas propriedades se o atalho aponta para o caminho correto.
abra o bloco de notas e adeque o código abaixo:

del "%userprofile%\desktop\NomeDoAtalho"
copy \\192.168.0.1\otrs\NomeDoAtalho.lnk "%userprofile%\desktop"

Pronto, agora basta vincular este script de longo ao usuário, ou adicionar o arquivo, porém eu particularmente gosto muito do primeiro exemplo deste post, Copiar_Atalho.vbs. É possível criar atalhos para sites Web também de forma fácil e rápida o o Script abaixo:

CriarAtalho.vbs

set WshShell = WScript.CreateObject("WScript.Shell")
strDesktop = WshShell.SpecialFolders("Desktop")
set oUrlLink = WshShell.CreateShortcut(strDesktop & "\CHAMADOS.lnk")
oUrlLink.TargetPath = "http://www.htbraz.com.br"
oUrlLink.IconLocation = "Caminho para o ícone .ico"
oUrlLink.Save


Leitura recomendada


Grande abraço e sucesso a todos.




Postar um comentário

Comente sem faltar com respeito - ;-)

Postagem Anterior Próxima Postagem