задался целью написать скрипт для выдачи ip. нашёл вот такой вот код:

Set WNetwork = CreateObject("WScript.Network")
Set WMIService = GetObject("winmgmts:\\" + WNetwork.ComputerName + "\root\cimv2")
Set IPConfigSet = WMIService.ExecQuery("Select IPAddress from Win32_NetworkAdapterConfiguration where IPEnabled=TRUE")

Forall IPConfig In IPConfigSet
   If Not IsNull(IPConfig.IPAddress) Then
       ip=IPConfig.IPAddress
       MsgBox ip
   End If
End Forall

при запуске ругается на строку с Forall: предполагается наличие окончания инструкции. синтаксис вроде верный, копипастом вставленный. отладить нечем. вопрос: что тут не так? быть может, есть иной способ?

Может Next?

строка 5, символ 17 - in
next, next ipconfig вместо end forall ситуацию не изменило

Для Каждого...

Forall IPConfig In IPConfigSet do - аналогично ни черта. кто знает, какая буква есть в правильном ответе? и, главное ведь, на форуме, откуда взял, за код спасибо сказано...

(3) это vbs

так.. а vbs ли это? становится всё интересней ;)

For Each
Next

(7) а, ну да

For Each IPConfig In IPConfigSet
  If Not IsNull(IPConfig.IPAddress) Then
      ip=IPConfig.IPAddress
      MsgBox ip
  End If
Next

плин, как теперь ip в строку превратить?

оказывается, это массив.
MsgBox ip(0)

спасибо, всё работает

http://screencast.com/t/7FWKnTyO4G scriptomatic

(11) класс! надо себе такую завести, пасиб

(11) зачетная вещь