Deixa eu aproveitar e postar aqui os outros comandos que pretendo utilizar:
Alterar IP via SCRIPT
Via script
http://forum.clubedohardware.com.br/alt ... mpt/236495
Via netsh (Um comando do DOS)
http://technet.microsoft.com/pt-br/libr ... 68515.aspx
http://www.babooforum.com.br/forum/inde ... pic=248850
http://support.microsoft.com/kb/257748/pt-br
Cscript.exe executa script vbs
salva o script com a extensão .VBS / e chama, na linha do DOS:
cscript //NOLOGO c:\pasta\algumscript.vbs
Exemplo de Script para alterar o nome do computador
--------------------> Inicio do script (essa linha não vai)
Option Explicit
Set ws = WScript.CreateObject("WScript.Shell")
Dim ws, t, p1, p2, n, cn, vbdefaultbutton
Dim itemtype
p1 = "HKLM\SYSTEM\CurrentControlSet\Control\ComputerName\ComputerName\"
cn = "NOVONOMEDEGRUPO"
ws.RegWrite p1 & "ComputerName", cn
---------------------> final do Script (essa linha não vai)
salva como algumacoisa.vbs
Executa cscript //NOLOGO algumacoisa.vbs
para exibir o nome do grupo no computador atual
comando do DOS
Nbtstat -n
Conexão local:
Endereço-Ip nó: [10.1.1.4] Identificador de escopo: []
Tabela de nomes locais de NetBIOS
Nome Tipo Status
---------------------------------------------
NOVOMAR <00> EXCLUSIVO Registrado
MIRAMAR <00> GRUPO Registrado
NOVOMAR <20> EXCLUSIVO Registrado
MIRAMAR <1E> GRUPO Registrado
MIRAMAR <1D> EXCLUSIVO Registrado
..__MSBROWSE__.<01> GRUPO Registrado
Na linha GRUPO / é o nome do grupo
Para verificar nome do grupo de outro computador
Nbtstat -a nomecomputerremoto
C:\WINDOWS\system32>nbtstat -a nomedeumcomputador
Conexão local:
Endereço-Ip nó: [10.1.1.3] Identificador de escopo: []
Tabela de nomes de máquinas remotas de NetBIOS
Nome Tipo Status
---------------------------------------------
HP <00> EXCLUSIVO Registrado
HP <20> EXCLUSIVO Registrado
MIRAMAR <00> GRUPO Registrado
MIRAMAR <1E> GRUPO Registrado
Endereço MAC = 00-0F-EA-B4-6E-40
MIRAMAR é o nome de um GRUPO, exemplo
Para exibir o nome do computador
set userdomain > lista.txt
ou, no xHarbour função getenv('userdomain')
Para exibir o usuário atual
set username > lista.txt
ou, no xHb função getenv('username')
ou ainda função netname(1)
Exibindo o IP atual
C:\WINDOWS\system32>ipconfig
Configuração de IP do Windows
Adaptador Ethernet Conexão local:
Sufixo DNS específico de conexão . :
Endereço IP . . . . . . . . . . . . : 10.1.1.3
Máscara de sub-rede . . . . . . . . : 255.0.0.0
Gateway padrão. . . . . . . . . . . : 10.1.1.1
Para configurar / alterar / para IP estático
eu uso estático / porque se deixa no automático o XP faz coisa q ñ é prá fazer. Fica dizendo: Conectividade Nula ou Limitada e blá blá blá /
C:\WINDOWS\system32>netsh interface ip set address name="Conexão Local" static 10
.1.1.9 255.0.0.0 10.1.1.1 1
ah! / esse último 1 / tem que ter
Ok.
Para registrar o DNS Primário
C:\WINDOWS\system32>netsh interface ip set dns "Conexão Local" source=static addr
=200.204.0.10 register=PRIMARY
Ok.
O Secundário eu não consegui
C:\WINDOWS\system32>netsh interface ip set dns "Conexão Local" source=static addr
=200.204.0.138 register=SECUNDARY
SECUNDARY não é um valor aceitável para register.
Exibindo as configurações IP
C:\WINDOWS\system32>netsh interface ip show config
Configuração para a interface "Conexão local"
DHCP ativado: Não
Endereço IP: 10.1.1.9
Máscara de sub-rede: 255.0.0.0
Gateway Padrão: 10.1.1.1
Métrica do gateway: 1
InterfaceMetric: 0
Servidores DNS configurados estaticamente: 200.204.0.10
200.204.0.138
Servidores WINS configurados estaticamente: Nenhum
Registrar com o sufixo: Somente principal
Com a conexão desativada
--------------------------------
1) C:\Documents and Settings\note1>netsh interface ip show config
Não há mais dados disponíveis.
2) C:\Documents and Settings\note1>ipconfig
3) C:\Documents and Settings\note1>nbtstat -n
NetBT não está vinculado a nenhum dispositivo
testerede.bat
ping -n 10 -l 32768 servidor
e mostrar a média
a média tem que ser entre 5 a 7 ms / caso contrário / é pq a rede tá lenta /
apresenta mensagem ao operador.
digite:
prá ele mostrar os compartilhamentos existentes
-----------------------------------------------
net share <ENTER>
para compartilhar
-----------------
crie uma pasta c:\teste
digite
net share ninja=c:\teste
e então a pasta c:\teste
estará compartilhada com o nome ninja
para excluir
-------------
net share ninja /DELETE
e o compartilhamento não existirá mais
Mas, no caso do NET SHARE, como vimos acima, ainda está sendo estudado para tipo de arquivos NTFS.
Ufa!
