Copiar modelo do Word normal.dot em todos os computadores da rede

Se você precisa padronizar o tipo de fonte, tamanho, e outros detalhes do Word na sua emrpesa, essa dica vale para você

Se vc utiliza AD na sua rede coloque como script de Logon.

On Error Resume Next
Set objShell = WScript.CreateObject("WScript.Shell")
Set objFSO = CreateObject("Scripting.FileSystemObject")

'Retorna raiz do perfil do usuário
strUSERPROFILE = objShell.ExpandEnvironmentStrings("%USERPROFILE%")

strArqOrigem = "\\seuservidor\seushare\seuarquivo"
strPastaDestino = strUSERPROFILE & "\Application Data\Microsoft\Modelos\"

'Copia Arquivo
objFSO.CopyFile strArqOrigem , strPastaDestino, True
Anúncios

E se motoristas fossem contratados da mesma maneira que profissionais de TI?

Vi essa dica no blog do meu amigo e parcero de blog, Fabio Souza, mais na verdade ja tinha visto o texto antes no grupo MSINFRA RIO, achei sensacional! LEIAM , vale a pena!

 

E se motoristas fossem contratados da mesma maneira que profissionais de TI?
Cargo: Motorista.
Exigências do trabalho: Competência profissional em condução de veículos leves como carros e pesados como ônibus e caminhões, ônibus articulados, bondes, metrô, tratores, escavadoras e pás carregadoras, e tanques pesados atualmente em uso pelos países da OTAN.
Habilidades em Rali e de condução extremas são obrigatórios! Experiência na Fórmula-1 é um diferencial.
Conhecimento e experiência em reparação de motores de pistão e rotor, transmissões automáticas e manuais, sistemas de ignição, computador de bordo, ABS, ABD, GPS e sistemas de áudio automotivo dos fabricantes conhecidos mundialmente – obrigatória!
Experiência em tarefas de pintura e funilaria de automóveis é um diferencial.
Os candidatos devem ser certificados pela BMW, General Motors e Bosch, mas não por mais de dois anos.
Compensação: R$ 15 – R$ 20/hora, dependendo do resultado da entrevista.
Exigências da instrução: Bacharel em Engenharia Mecânica.