Вопрос снимается. Надо было удалить маршрут
10.0.0.0 255.0.0.0 10.211.60.195 10.211.60.195. В связи с чем у меня встречный вопрос, а зачем его надо удалять, ведь есть маршрут
Код:
0.0.0.0 0.0.0.0 10.9.7.254 10.9.5.52
и основной шлюз остался правильным?
Кому интересно вот vbs скрипт, запускать каждый раз после установки GPRS соединения
Код:
'используемые объекты
set fso = CreateObject("Scripting.FileSystemObject")
set sh = WScript.CreateObject("WScript.Shell")
'временный файл
r = "c:\GPRS_IP.tmp"
'запись во временный файл отчёта команды IPCONFIG
sh.Run "CMD /C IPCONFIG >"+r,8,1
'Обработка отчёта
set f = fso.OpenTextFile(r, 1)
Dim IpAdr
'поиск строки "GPRS" в именах соединений
Do While f.AtEndOfLine <> True
t = f.ReadLine
if (InStr(1, t, "GPRS", 1)) Then
'поиск строки со словом "IP"
Do While f.AtEndOfLine <> True
t = f.ReadLine
if (InStr(1, t, "IP", 1)) Then
'В самом конце строчки - IP-адрес
IpAdr = Right(t, Len(t) - InStrRev(t," "))
Exit Do
End If
Loop
Exit Do
End If
Loop
'удаление временного файла
f.Close
fso.DeleteFile(r)
'Регистрация маршрутов на адрес GPRS
sh.Run "ROUTE ADD 64.12.0.0 MASK 255.255.0.0 "+IpAdr,8,1
sh.Run "ROUTE ADD 205.188.0.0 MASK 255.255.0.0 "+IpAdr,8,1
'Удаляем маршрут 10.0.0.0
sh.Run "ROUTE DELETE 10.0.0.0"
'Это сообщение для наглядности
WScript.Echo("Выданный GPRS IP-адрес: "+IpAdr)
'Завершение сценария.
WScript.Quit(0)
