Changing Cisco VPN Client .pcf files on client computers

I have a customer that uses Cisco VPN Client. They are going to change ISP which means that they are going to change IP adresses. The VPN profiles today are set up using the IP so I found a VB script to edit the pcf file and a login script sample to execute it.

VB Script:

Const ForReading = 1
Const ForWriting = 2

strFileName = Wscript.Arguments(0)

strOldText = "Host=Old Address"
strNewText = "Host=New Address"

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.OpenTextFile(strFileName, ForReading)

strText = objFile.ReadAll
strNewText = Replace(strText, strOldText, strNewText)

Set objFile = objFSO.OpenTextFile(strFileName, ForWriting)
objFile.WriteLine strNewText

Login Script:

if NOT EXIST("\serverlogs$VPNfixed_" + @wksta + ".txt")
  AT (16,21) "Fixing VPN Files...                "
  ; Defining Logfile
  $VpnLogfile="\serverlogs$VPNfixed_" + @wksta + ".txt" 

 ; Fixing the files
  IF EXIST("C:Program FilesCisco SystemsVPN ClientProfilesFILE.pcf")
   Shell '%comspec% /c \servernetlogonfixvpn.vbs "C:Program FilesCisco SystemsVPN ClientProfilesFILE.pcf"'
  IF EXIST("C:ProgramCisco SystemsVPN ClientProfilesFILE.pcf")
   Shell '%comspec% /c \servernetlogonfixvpn.vbs "C:ProgramCisco SystemsVPN ClientProfilesFILE.pcf"'

  ; Writing loglines

  $Logline=@Date + "," + @time + "," + @Userid + "," + @wksta + @CRLF

The login script has some logic checking if the update has been done before in which case it will be skipped. It will also create a logfile for checking which computers has been updated.

Leave a Reply

%d bloggers like this: