как так работает WHS
Модератор: Модераторы
Сообщений: 6
• Страница 1 из 1
- Valeriy
- Активный пользователь
- Сообщения: 243
- Зарегистрирован: 30 июн 2004, 16:18
- Откуда: Кировоград (Украина)
Harry33 » 16 май 2005, 23:38
Remy
Прости не удержался
)))))
А наращивать значение "a" скрипт сам по себе будет???
Прости не удержался
)))))
А наращивать значение "a" скрипт сам по себе будет???
Знания, которые нельзя применить - бесполезны
- Remy
- Активный пользователь
-
- Сообщения: 793
- Зарегистрирован: 17 мар 2004, 19:11
- Откуда: Санкт-Петербург, Россия
Remy » 17 май 2005, 09:30
Я конечно не гений программирования:
но насколько я помню из Паскаля, там не надо наращиваний, все идет автоматом, это раз!
во вторых вот вам реальный пример из БД MS
но насколько я помню из Паскаля, там не надо наращиваний, все идет автоматом, это раз!
во вторых вот вам реальный пример из БД MS
| Код | ||||
| strComputer = "."
Set objWMIService = GetObject( _ "winmgmts:\\" & strComputer & "\root\cimv2") Set IPConfigSet = objWMIService.ExecQuery _ ("Select IPAddress from Win32_NetworkAdapterConfiguration" _ & " where IPEnabled=TRUE") For Each IPConfig in IPConfigSet If (IPConfig.IPAddress(0)<>"0.0.0.0") Then For i=LBound(IPConfig.IPAddress) _ to UBound(IPConfig.IPAddress) WScript.Echo IPConfig.IPAddress(i) Next End If Next [/code] и это работает! и пока писал ответ еще раз пересмотрел задачу изменил ее вот так:
|