Войти

Показать полную графическую версию : Подскажите как через батник настроить сетевую карту хп 7


zzup
20-01-2015, 02:03
Прошу помочь с синтаксисом, да и так примеры,
Сам тут крутит вертел читал форумы,
Советуют через команду
Netsh но примеры корявые
Как скопировать делал так
netsh -c interface dump>mydump.conf
Копирует но какой то урезанный файл , и без
без днс серверов

netsh dump>mydump.conf
Тут копирует большой файл и так же днс

А при попытке установки этих настроек просто стирает все что прописано в сетевой карте
Как по уму пользоватся netsh какой синтаксис правильный?


Как должен выглядеть синтаксис и сам код в бат или смд

Маска подсети-255.255.255.224
ip адрес-83.167.17.191
шлюз-83.167.17.191
Днс предпочитаемой 8.8.8.8
Днс альтернативный 8.8.4.4



Настройки по протоколу ipv4

zzup
20-01-2015, 23:30
up пожалста

Anton04
22-01-2015, 11:09
zzup,

в win 2000/XP

netsh interface ip set address name="LAN" source=static addr=83.167.17.191 mask=255.255.255.224
netsh interface ip set address name="LAN" gateway=83.167.17.191 gwmetric=0
netsh interface ip set dns name="LAN" source=static addr=8.8.8.8 register=PRIMARY
netsh interface ip add dns name="LAN" addr=8.8.4.4 index=2

в win vista/7

netsh interface ipv4 set address "LAN" static 83.167.17.191 255.255.255.224 83.167.17.191
netsh interface ipv4 set dnsserver "LAN" static 8.8.8.8
netsh interface ipv4 add dnsserver "LAN" 8.8.4.4 index=2


где "LAN" - это имя настраиваемого сетевого адаптера.

Для переименования сетевого адаптера на нужное имя использую скрипт:


'Использование: CScript.exe RenameNetworkConnection.vbs "Старое имя интерфейса" "Новое имя"

If WScript.Arguments.Count <> 2 Then
WScript.Echo "Неверное число параметров." & vbCrLf & _
"Использование: CScript.exe " & WScript.ScriptName & _
" <Старое имя интерфейса> <Новое имя>"
WScript.Quit(1)
End If

Const NETWORK_CONNECTIONS = &H31&

Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.Namespace(NETWORK_CONNECTIONS)

Set colItems = objFolder.Items
For Each objItem in colItems
If objItem.Name = WScript.Arguments(0) Then
objItem.Name = WScript.Arguments(1)
End If
Next




© OSzone.net 2001-2012