Software Deployment

I solved it with this VBS, but there must be a better way...

The HOSTIP is the propery that I uses where to set the IP-adress.

/Jonas

[hr]
Set objWMIService = GetObject("winmgmts:")
Set colNicConfig = objWMIService.ExecQuery("SELECT * FROM " & "Win32_NetworkAdapterConfiguration WHERE IPEnabled = True")
For Each objNicConfig In colNicConfig
For Each strIPAddress In objNicConfig.IPAddress
'Only get IP-adress if it starts with "10."
If left(strIPAddress,3) = "10." Then
Session.Property("HOSTIP") = strIPAddress
End If
Next
Next

strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")

Set IPConfigSet = objWMIService.ExecQuery _
("Select * from Win32_NetworkAdapterConfiguration Where IPEnabled=TRUE")

For Each IPConfig in IPConfigSet
If Not IsNull(IPConfig.IPAddress) Then
For i=LBound(IPConfig.IPAddress) to UBound(IPConfig.IPAddress)
WScript.Echo IPConfig.IPAddress(i)
Next
End If
Next

________________________________________________
That script was generated with, "The Portable Script Center" (Free download) (http://www.microsoft.com/technet/scriptcenter)

Thanks for your reply.

I maybe wasn't clear enough, but with a "better way" I ment that there maybe was a InstallShield Property or kinda to get the IP-adress without making a VBS.

/Jonas

Try a few of these:

http://community.macrovision.com/printthread.php?t=163146
http://www.installshield.com/news/newsletter/archives/0101_oragebrain.pdf
http://www.installsite.org/pages/en/isp_net.htm
http://support.installshield.com/kb/view.asp?articleid=Q105786

Hope that helps.

there is no default properties that do what you want. scripted is likely the best option.

secondlaws script could be tweaked to accomodate your session.property changes.