G
Guest
I want to rename my LAN connections using a script at the end of FBA.
I'm using a FBA generic command at phase 8500
FilePath: %11%\cmd.exe
Arguments: /c "%11%\ChangeConnectionNames.vbs"
But it doesn't work. The FBAlog.txt reports:
17:03:30 PM - [FBALaunch] C:\WINDOWS\system32\cmd.exe /c
"C:\WINDOWS\system32\ChangeConnectionNames.vbs" (ExitCode: 0x1)
If I run it manually on the target system after the first boot it run fine
and renames
my LAN connections.
Any ideas to why??
Thijs
The script ChangeConnectionNames.vbs:
------------------------------------
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 = "Local Area Connection" Then
objItem.Name = "Machine"
End If
If objItem.Name = "Local Area Connection 2" Then
objItem.Name = "Network"
End If
Next
---------------------------
I'm using a FBA generic command at phase 8500
FilePath: %11%\cmd.exe
Arguments: /c "%11%\ChangeConnectionNames.vbs"
But it doesn't work. The FBAlog.txt reports:
17:03:30 PM - [FBALaunch] C:\WINDOWS\system32\cmd.exe /c
"C:\WINDOWS\system32\ChangeConnectionNames.vbs" (ExitCode: 0x1)
If I run it manually on the target system after the first boot it run fine
and renames
my LAN connections.
Any ideas to why??
Thijs
The script ChangeConnectionNames.vbs:
------------------------------------
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 = "Local Area Connection" Then
objItem.Name = "Machine"
End If
If objItem.Name = "Local Area Connection 2" Then
objItem.Name = "Network"
End If
Next
---------------------------