Usuário com melhor resposta
script de rede para windows que não entra no dominio

Pergunta
-
Pessoal,
Preciso de um script que mapeie unidades de rede do servidor passando paramentros de usuário e senha.
Tenho 3 máquinas de diretores com windows vista home basic que não entra no domínio e preciso que os diretores acessem os drivers de rede e a impressora compartilhada da máquina da secretaria. Eles tem usuário e senha no domínio.
a minha idéia é colocar esse script para rodar no iniciar do windows.
Alguém sabe com fazer?
Respostas
-
Pessoal, resolvi minha questão.
Como o windows vista home basic não entra no domínio, todos acessos aos recursos da rede não funcionam sem pedir usuário e senha (lógico) pois não tinha autenticação no domínio.
Então para resolver isto e os diretores com as máquinas windows vista home basic pudessem acessar os drivers de rede e a impressora de rede fiz da seguinte forma.
1. Instalei a impressora como sendo local ná máquina na porta LPT1.
2. Criei um script .bat apontando a porta LPT1 para o caminho da impressora na rede.
net use /delete LPT1 (Esse delete é porque toda vez que liga a máquina novamente a conexão é perdida e o caminho fica preso sendo necessário matar primeiro para depois conectar novamente)
net use LPT1 \\maq01\hp /persistent:yes /user:dominiodarede.\usuario senha (apontametno da lpt1 para a impressora na máquina que está compartilhada)
rem Logon script padrao para rede.
net time \\servidor /set /yes
c:\scriptnet (chamda do script .vbs mapeando as pastas de rede)
@echo off
3. Criei um script .vbs mapeando os drivers de rede.
Option Explicit
Dim objNetwork
Dim strDriveLetter, strRemotePath, strUser, strPassword, strProfilestrDriveLetter = "H:"
strRemotePath = \\servidor\pasta1
strUser = "usuario"
strPassword = "senha"
strProfile = "false"Set objNetwork = WScript.CreateObject("WScript.Network")
objNetwork.MapNetworkDrive strDriveLetter, strRemotePath, strProfile, strUser, strPasswordobjNetwork.MapNetworkDrive "P:", "\\servidor\pasta2"
objNetwork.MapNetworkDrive "Q:", \\servidor\pasta3
objNetwork.MapNetworkDrive "R:", \\servidor\pasta4
WScript.Quit
4 . Coloquei os dois scripts em uma pasta na máquina e criei um atalho no desktop para o script.bat. Lembrem o scrpit.bat chama o .vbs.
5. Aí quando a máquina é ligada e pega o endereço ip é só o Diretor clica duas vezes no ícone do script que a IMPRESSORA e os DRIVERS de rede estão disponíveis para uso.
LOGIN automático nos recursos da rede em windows que não entra no domínio.
Se alguém tiver nessa mesma situação taí o que pode ser feito.
obrigado a todos pelas resposta e contribuição.
Att,
Leonardo Alves- Marcado como Resposta lalves quarta-feira, 8 de abril de 2009 18:58
Todas as Respostas
-
Olá,
Não é nada seguro passar usuário e senha por script, como alternativa você pode fazer o seguinte:
1 - Coloque o usuário e senha da maquina local igual ao usuário e senha que você criou no dominio.
2 - Utilize o script abaixo para mapear:
Set wshNetwork = CreateObject("WScript.Network")
Set oDrives = WshNetwork.EnumNetworkDrives
'COLOCAR AS UNIDADES QUE DESEJA MAPEAR -> AQUI ELE SO DESCONECTA
DriveMapper "G:"
wshNetwork.MapNetworkDrive "G:", "\\server01\share"
Sub DriveMapper(Drive)
For i = 0 to oDrives.Count -1 Step 2
if LCase(Drive) = LCase(oDrives.Item(i)) then
WshNetwork.RemoveNetworkDrive Drive, true, true
End if
Next
End sub
Salve com a extensão .vbs e faça os testes.
Poste os resultados.
Até mais,
Jesiel
Obs.: Se útil, classifique -
Realmente não é seguro passar usuário e senha por script, o que você pode fazer é criptografar o seu script com o Supercrypt (http://www.moernaut.com/default.aspx?item=supercrypt), ele criptografa programas e comandos juntamente com uma credencial para ser utilizada, como tanto a credencial como o comando é criptografado acaba ficando mais seguro. Agora, só por curiosidade, porque eles não se logan no domínio? Atenciosamente, Luana.
-
Posso fazer ?
DriveMapper "G:"
wshNetwork.MapNetworkDrive "G:", "\\server01\share"
DriveMapper "H:"
wshNetwork.MapNetworkDrive "H:", \\server01\share2"
e a impressora? a impressora está está compartilhada na máquina da secretária cujo nome é sec01. -
-
-
Olá,
Segue o script para impressoras:
Set objNetwork = CreateObject("WScript.Network")
strImpressora = "\\servidor\impressora"
'CONECTA A NOVA IMPRESSORA (TEM QUE TER O DRIVER INSTALADO)
ObjNetWork.AddWindowsPrinterConnection strImpressora
'DEIXA A NOVA IMPRESSORA COMO PADRAO
objNetwork.SetDefaultPrinter strImpressora
Até mais,
Jesiel
Obs.: Se útil, classifique -
O Jesiel lembrou bem, para o script mencionado acima é necessário que já exista o driver na maquina.
Segue abaixo um script que procura pelo driver e instala a impressoa:
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set WshNetwork = CreateObject("WScript.Network")
Set colInstalledPrinters = objWMIService.ExecQuery _
("Select * from Win32_Printer")
objWMIService.Security_.Privileges.AddAsString "SeLoadDriverPrivilege", True
Set objDriver = objWMIService.Get("Win32_PrinterDriver")
Set WshNetwork = CreateObject("WScript.Network")
WshNetwork.AddWindowsPrinterConnection "\\maquina\impressora"
objDriver.Name = "Nome da Impressora"
objDriverPath = "\\local\dos\Drivers" << pasta do driver
objInfname = "\\arquivo\inf\Drivers\driver.INF" << arquivo do driver (.inf)
intResult = objDriver.AddPrinterDriver(objDriver)
[]'s
Luana. -
Pessoal, resolvi minha questão.
Como o windows vista home basic não entra no domínio, todos acessos aos recursos da rede não funcionam sem pedir usuário e senha (lógico) pois não tinha autenticação no domínio.
Então para resolver isto e os diretores com as máquinas windows vista home basic pudessem acessar os drivers de rede e a impressora de rede fiz da seguinte forma.
1. Instalei a impressora como sendo local ná máquina na porta LPT1.
2. Criei um script .bat apontando a porta LPT1 para o caminho da impressora na rede.
net use /delete LPT1 (Esse delete é porque toda vez que liga a máquina novamente a conexão é perdida e o caminho fica preso sendo necessário matar primeiro para depois conectar novamente)
net use LPT1 \\maq01\hp /persistent:yes /user:dominiodarede.\usuario senha (apontametno da lpt1 para a impressora na máquina que está compartilhada)
rem Logon script padrao para rede.
net time \\servidor /set /yes
c:\scriptnet (chamda do script .vbs mapeando as pastas de rede)
@echo off
3. Criei um script .vbs mapeando os drivers de rede.
Option Explicit
Dim objNetwork
Dim strDriveLetter, strRemotePath, strUser, strPassword, strProfilestrDriveLetter = "H:"
strRemotePath = \\servidor\pasta1
strUser = "usuario"
strPassword = "senha"
strProfile = "false"Set objNetwork = WScript.CreateObject("WScript.Network")
objNetwork.MapNetworkDrive strDriveLetter, strRemotePath, strProfile, strUser, strPasswordobjNetwork.MapNetworkDrive "P:", "\\servidor\pasta2"
objNetwork.MapNetworkDrive "Q:", \\servidor\pasta3
objNetwork.MapNetworkDrive "R:", \\servidor\pasta4
WScript.Quit
4 . Coloquei os dois scripts em uma pasta na máquina e criei um atalho no desktop para o script.bat. Lembrem o scrpit.bat chama o .vbs.
5. Aí quando a máquina é ligada e pega o endereço ip é só o Diretor clica duas vezes no ícone do script que a IMPRESSORA e os DRIVERS de rede estão disponíveis para uso.
LOGIN automático nos recursos da rede em windows que não entra no domínio.
Se alguém tiver nessa mesma situação taí o que pode ser feito.
obrigado a todos pelas resposta e contribuição.
Att,
Leonardo Alves- Marcado como Resposta lalves quarta-feira, 8 de abril de 2009 18:58
-
Olá Luana,
infelizmente, criptografia também não é nada seguro... dificulta, mas qualquer usuário mais esperto consegue burlar. Senha em script não é legal mesmo...
[]s,
Vinicius Canto
MVP Admin Frameworks
http://viniciuscanto.blogspot.com
Vinicius Canto MVP Admin Frameworks Blog: http://viniciuscanto.blogspot.com