SMS Graphical IP Toolset Script

Email Print Digg This Add to del.icio.us

SMS Graphical IP Toolset Script

Here's a script from James Igoe that presents a graphical interface for performing ping, tracert, and ipx route tasks. The interface returns the information in a text box, making it easier to copy from. The script does require some additional files -- download the ZIP package below to get all the files required by the script.

Download the Gping.zip package

<< Back to SMS Scripts list.

Document Type: IPF
item: Global
  Version=6.0
  Title English=NT IP Utility
  Flags=00000100
  Languages=0 0 65 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
  LanguagesList=English
  Japanese Font Name=MS Gothic
  Japanese Font Size=10
  Start Gradient=0 0 255
  End Gradient=0 0 0
  Windows Flags=00000000000000000010110001010010
  Message Font=MS Sans Serif
  Font Size=8
  Disk Filename=SETUP
  Patch Flags=0000000000000001
  Patch Threshold=85
  Patch Memory=4000
  FTP Cluster Size=20
end
item: Check Disk Space
end
item: Get Environment Variable
  Variable=TEMPDIR
  Environment=TEMP
end
item: Remark
end
item: Get Environment Variable
  Variable=WINDIR
  Environment=WINDIR
end
item: Check Configuration
  Flags=10000000
end
item: Execute Program
  Pathname=%WINDIR%\ISMIF32.EXE
end
item: Else Statement
end
item: End Block
end
item: Remark
end
item: Set Variable
  Variable=PROGDIR
  Value=C:\PROGRAM FILES\GPING
end
item: Get Environment Variable
  Variable=USERNAME
  Environment=USERNAME
end
item: Remark
end
item: Set Variable
  Variable=CMDFILE
  Value=%PROGDIR%\gping.CMD
end
item: Set Variable
  Variable=RESPONSE
  Value=%PROGDIR%\RESPONSE.TXT
end
item: Set Variable
  Variable=SENTTO
  Value=%PROGDIR%\gping.INI
end
item: Set Variable
  Variable=RESPONSE2
  Value=%PROGDIR%\RESPONSE.CMD
end
item: Remark
end
item: Set Variable
  Variable=RECIPIENT
end
item: Set Variable
  Variable=CONTACTTYPE
end
item: Set Variable
  Variable=RUN
  Value=1
end
item: Remark
end
item: If/While Statement
  Variable=RUN
  Value=1
  Flags=00010000
end
item: Set Variable
  Variable=RECIPIENT
end
item: Set Variable
  Variable=SEND
end
item: Set Variable
  Variable=COMMAND
end
item: Set Variable
  Variable=APPEND
end
item: Set Variable
  Variable=LINENUMBER
end
item: Set Variable
  Variable=LINETEMP
end
item: Read INI Value
  Variable=CONTACTTYPE
  Pathname=%SENTTO%
  Section=SENTTO
  Item=CONTACTTYPE
end
item: Read INI Value
  Variable=SENTTOBOX
  Pathname=%SENTTO%
  Section=SENTTO
  Item=SENTTOBOX
end
item: Read INI Value
  Variable=RECIPIENT
  Pathname=%SENTTO%
  Section=SENTTO
  Item=RECIPIENT
end
item: Read INI Value
  Variable=SENTTO1
  Pathname=%SENTTO%
  Section=SENTTO
  Item=SENTTO1
end
item: Read INI Value
  Variable=SENTTO2
  Pathname=%SENTTO%
  Section=SENTTO
  Item=SENTTO2
end
item: Read INI Value
  Variable=SENTTO3
  Pathname=%SENTTO%
  Section=SENTTO
  Item=SENTTO3
end
item: Read INI Value
  Variable=SENTTO4
  Pathname=%SENTTO%
  Section=SENTTO
  Item=SENTTO4
end
item: Read INI Value
  Variable=SENTTO5
  Pathname=%SENTTO%
  Section=SENTTO
  Item=SENTTO5
end
item: Custom Dialog Set
  Name=NT IP Utility
  item: Dialog
    Title English=NT IP Utility
    Width=166
    Height=248
    Font Name=Helv
    Font Size=8
    item: Radio Button
      Rectangle=4 7 91 73
      Variable=CONTACTTYPE
      Create Flags=01010000000000010000000000001001
      Text English=Ping
      Text English=Traceroute
      Text English=Get Local IPX Segment
      Text English=Get Local IP Configuration
      Text English=
    end
    item: Radio Button
      Rectangle=5 98 12 223
      Variable=SENTTOBOX
      Create Flags=01010000000000010000000000001001
      Text English= 
      Text English= 
      Text English= 
      Text English= 
      Text English= 
      Text English= 
      Text English=
    end
    item: Editbox
      Rectangle=25 102 75 117
      Variable=RECIPIENT
      Help Context=1048576
      Create Flags=01010000100000010000000000000000
      Text English=%RECIPIENT%
    end
    item: Editbox
      Rectangle=25 122 75 137
      Variable=SENTTO1
      Help Context=1048576
      Create Flags=01010000100000010000000000000000
      Text English=%SENTTO1%
    end
    item: Editbox
      Rectangle=25 142 75 157
      Variable=SENTTO2
      Help Context=1048576
      Create Flags=01010000100000010000000000000000
      Text English=%SENTTO2%
    end
    item: Editbox
      Rectangle=25 165 75 180
      Variable=SENTTO3
      Help Context=1048576
      Create Flags=01010000100000010000000000000000
      Text English=%SENTTO3%
    end
    item: Editbox
      Rectangle=25 185 75 200
      Variable=SENTTO4
      Help Context=1048576
      Create Flags=01010000100000010000000000000000
      Text English=%SENTTO4%
    end
    item: Editbox
      Rectangle=25 205 75 220
      Variable=SENTTO5
      Help Context=1048576
      Create Flags=01010000100000010000000000000000
      Text English=%SENTTO5%
    end
    item: Push Button
      Rectangle=85 101 155 121
      Variable=SEND
      Value=1
      Action=1
      Create Flags=01010000000000010000000000000001
      Text English=Execute
    end
    item: Push Button
      Rectangle=85 126 155 146
      Variable=SEND
      Value=2
      Action=1
      Create Flags=01010000000000010000000000000000
      Text English=Execute and Close
    end
    item: Push Button
      Rectangle=85 151 155 171
      Variable=SEND
      Value=0
      Action=1
      Create Flags=01010000000000010000000000000000
      Text English=Close
    end
    item: Static
      Rectangle=9 83 155 96
      Create Flags=01010000000000000000000000000000
      Text English=Define and choose hosts (DNS Name or IP address).
    end
    item: Static
      Rectangle=93 192 147 205
      Destination Dialog=2
      Create Flags=01010000000000000000000000000001
      Flags=0000000000000001
      Name=Arial
      Font Style=-16 0 0 0 700 0 0 0 0 3 2 1 34
      Text English=NT Ping 1.0
    end
  end
end
item: If/While Statement
  Variable=SEND
  Value=0
end
item: Exit Installation
end
item: End Block
end
item: Edit INI File
  Pathname=%SENTTO%
  Settings=[SENTTO]
  Settings=CONTACTTYPE=%CONTACTTYPE%
  Settings=SENTTOBOX=%SENTTOBOX%
  Settings=RECIPIENT=%RECIPIENT%
  Settings=SENTTO1=%SENTTO1%
  Settings=SENTTO2=%SENTTO2%
  Settings=SENTTO3=%SENTTO3%
  Settings=SENTTO4=%SENTTO4%
  Settings=SENTTO5=%SENTTO5%
  Settings=
  Settings=
end
item: If/While Statement
  Variable=CONTACTTYPE
  Value=C
end
item: Set Variable
  Variable=CONTACTTYPE
  Value=IPXROUTE CONFIG
end
item: Set Variable
  Variable=COMMAND
  Value=%CONTACTTYPE% > "C:\PROGRAM FILES\GPING\RESPONSE.TXT"
end
item: Insert Line into Text File
  Pathname=%CMDFILE%
  New Text=%COMMAND%
  Line Number=1
  Flags=00001000
end
item: Execute Program
  Pathname=%CMDFILE%
  Flags=00000110
end
item: Read/Update Text File
  Variable=APPEND
  Pathname=%RESPONSE%
end
item: If/While Statement
  Variable=APPEND
  Value=network number
  Flags=00000010
end
item: Parse String
  Source=%APPEND%
  Pattern=network number
  Variable1=JUNK
  Variable2=IPXNUMBER
end
item: Parse String
  Source=%IPXNUMBER%
  Pattern=,
  Variable1=IPXNUMBER
  Variable2=JUNK
  Flags=00000011
end
item: If/While Statement
  Variable=IPXNUMBER
  Value=0
  Flags=00000110
end
item: Custom Dialog Set
  Name=IPX Segment
  item: Dialog
    Title English=IPX Segment
    Width=196
    Height=96
    Font Name=Helv
    Font Size=8
    item: Editbox
      Rectangle=10 5 182 46
      Help Context=16711681
      Create Flags=01010000100000000000000000000000
      Text English=Your IPX segment number is %IPXNUMBER%.
    end
    item: Push Button
      Rectangle=80 57 115 72
      Variable=OK
      Value=1
      Action=1
      Create Flags=01010000000000010000000000000000
      Text English=OK
    end
  end
end
item: End Block
end
item: End Block
end
item: End Block
end
item: End Block
end
item: If/While Statement
  Variable=CONTACTTYPE
  Value=D
end
item: Set Variable
  Variable=CONTACTTYPE
  Value=IPCONFIG /ALL
end
item: Set Variable
  Variable=COMMAND
  Value=%CONTACTTYPE% > "C:\PROGRAM FILES\GPING\RESPONSE.TXT"
end
item: Insert Line into Text File
  Pathname=%CMDFILE%
  New Text=%COMMAND%
  Line Number=1
  Flags=00001000
end
item: Execute Program
  Pathname=%CMDFILE%
  Flags=00000110
end
item: Set Variable
  Variable=LINENUMBER
  Value=1
end
item: Read/Update Text File
  Variable=LINETEMP
  Pathname=%RESPONSE%
end
item: If/While Statement
  Variable=LINENUMBER
  Value=1
end
item: Set Variable
  Variable=DISPLAY1
  Value=%LINETEMP%
end
item: End Block
end
item: If/While Statement
  Variable=LINENUMBER
  Value=2
end
item: Set Variable
  Variable=DISPLAY2
  Value=%LINETEMP%
end
item: End Block
end
item: If/While Statement
  Variable=LINENUMBER
  Value=3
end
item: Set Variable
  Variable=DISPLAY3
  Value=%LINETEMP%
end
item: End Block
end
item: If/While Statement
  Variable=LINENUMBER
  Value=4
end
item: Set Variable
  Variable=DISPLAY4
  Value=%LINETEMP%
end
item: End Block
end
item: If/While Statement
  Variable=LINENUMBER
  Value=5
end
item: Set Variable
  Variable=DISPLAY5
  Value=%LINETEMP%
end
item: End Block
end
item: If/While Statement
  Variable=LINENUMBER
  Value=6
end
item: Set Variable
  Variable=DISPLAY6
  Value=%LINETEMP%
end
item: End Block
end
item: If/While Statement
  Variable=LINENUMBER
  Value=7
end
item: Set Variable
  Variable=DISPLAY7
  Value=%LINETEMP%
end
item: End Block
end
item: If/While Statement
  Variable=LINENUMBER
  Value=8
end
item: Set Variable
  Variable=DISPLAY8
  Value=%LINETEMP%
end
item: End Block
end
item: If/While Statement
  Variable=LINENUMBER
  Value=9
end
item: Set Variable
  Variable=DISPLAY9
  Value=%LINETEMP%
end
item: End Block
end
item: If/While Statement
  Variable=LINENUMBER
  Value=10
end
item: Set Variable
  Variable=DISPLAY10
  Value=%LINETEMP%
end
item: End Block
end
item: If/While Statement
  Variable=LINENUMBER
  Value=11
end
item: Set Variable
  Variable=DISPLAY11
  Value=%LINETEMP%
end
item: End Block
end
item: If/While Statement
  Variable=LINENUMBER
  Value=12
end
item: Set Variable
  Variable=DISPLAY12
  Value=%LINETEMP%
end
item: End Block
end
item: If/While Statement
  Variable=LINENUMBER
  Value=13
end
item: Set Variable
  Variable=DISPLAY13
  Value=%LINETEMP%
end
item: End Block
end
item: If/While Statement
  Variable=LINENUMBER
  Value=14
end
item: Set Variable
  Variable=DISPLAY14
  Value=%LINETEMP%
end
item: End Block
end
item: If/While Statement
  Variable=LINENUMBER
  Value=15
end
item: Set Variable
  Variable=DISPLAY15
  Value=%LINETEMP%
end
item: End Block
end
item: If/While Statement
  Variable=LINENUMBER
  Value=16
end
item: Set Variable
  Variable=DISPLAY16
  Value=%LINETEMP%
end
item: End Block
end
item: If/While Statement
  Variable=LINENUMBER
  Value=17
end
item: Set Variable
  Variable=DISPLAY17
  Value=%LINETEMP%
end
item: End Block
end
item: If/While Statement
  Variable=LINENUMBER
  Value=18
end
item: Set Variable
  Variable=DISPLAY18
  Value=%LINETEMP%
end
item: End Block
end
item: If/While Statement
  Variable=LINENUMBER
  Value=19
end
item: Set Variable
  Variable=DISPLAY19
  Value=%LINETEMP%
end
item: End Block
end
item: Set Variable
  Variable=LINENUMBER
  Value=%LINENUMBER%
  Flags=00000100
end
item: End Block
end
item: Custom Dialog Set
  Name=Local Ip Settings
  item: Dialog
    Title English=Local IP Settings
    Width=237
    Height=242
    Font Name=Helv
    Font Size=8
    item: Editbox
      Rectangle=10 5 222 196
      Value=%RESPONSE%
      Help Context=16711681
      Create Flags=01010000101000000001000000000100
    end
    item: Push Button
      Rectangle=93 203 128 218
      Variable=OK
      Value=1
      Action=1
      Create Flags=01010000000000010000000000000000
      Text English=OK
    end
  end
end
item: End Block
end
item: If/While Statement
  Variable=CONTACTTYPE
  Value=IPXROUTE CONFIG
  Flags=00000001
end
item: If/While Statement
  Variable=CONTACTTYPE
  Value=IPCONFIG /ALL
  Flags=00000001
end
item: If/While Statement
  Variable=CONTACTTYPE
  Value=A
end
item: Set Variable
  Variable=CONTACTTYPE
  Value=PING
end
item: End Block
end
item: If/While Statement
  Variable=CONTACTTYPE
  Value=B
end
item: Set Variable
  Variable=CONTACTTYPE
  Value=TRACERT
end
item: End Block
end
item: If/While Statement
  Variable=SEND
  Value=0
  Flags=00000001
end
item: If/While Statement
  Variable=SENTTOBOX
  Value=A
  Flags=00000100
end
item: Set Variable
  Variable=RECIPIENT
  Value=%RECIPIENT%
end
item: Set Variable
  Variable=COMMAND
  Value=%CONTACTTYPE% %RECIPIENT% > "C:\PROGRAM FILES\GPING\RESPONSE.TXT"
end
item: Insert Line into Text File
  Pathname=%CMDFILE%
  New Text=%COMMAND%
  Line Number=1
  Flags=00001000
end
item: Execute Program
  Pathname=%CMDFILE%
  Flags=00000110
end
item: End Block
end
item: If/While Statement
  Variable=SENTTOBOX
  Value=B
  Flags=00000100
end
item: Set Variable
  Variable=RECIPIENT
  Value=%SENTTO1%
end
item: Set Variable
  Variable=COMMAND
  Value=%CONTACTTYPE% %RECIPIENT% > "C:\PROGRAM FILES\GPING\RESPONSE.TXT"
end
item: Insert Line into Text File
  Pathname=%CMDFILE%
  New Text=%COMMAND%
  Line Number=1
  Flags=00001000
end
item: Execute Program
  Pathname=%CMDFILE%
  Flags=00000110
end
item: End Block
end
item: If/While Statement
  Variable=SENTTOBOX
  Value=C
  Flags=00000100
end
item: Set Variable
  Variable=RECIPIENT
  Value=%SENTTO2%
end
item: Set Variable
  Variable=COMMAND
  Value=%CONTACTTYPE% %RECIPIENT% > "C:\PROGRAM FILES\GPING\RESPONSE.TXT"
end
item: Insert Line into Text File
  Pathname=%CMDFILE%
  New Text=%COMMAND%
  Line Number=1
  Flags=00001000
end
item: Execute Program
  Pathname=%CMDFILE%
  Flags=00000110
end
item: End Block
end
item: If/While Statement
  Variable=SENTTOBOX
  Value=D
  Flags=00000100
end
item: Set Variable
  Variable=RECIPIENT
  Value=%SENTTO3%
end
item: Set Variable
  Variable=COMMAND
  Value=%CONTACTTYPE% %RECIPIENT% > "C:\PROGRAM FILES\GPING\RESPONSE.TXT"
end
item: Insert Line into Text File
  Pathname=%CMDFILE%
  New Text=%COMMAND%
  Line Number=1
  Flags=00001000
end
item: Execute Program
  Pathname=%CMDFILE%
  Flags=00000110
end
item: End Block
end
item: If/While Statement
  Variable=SENTTOBOX
  Value=E
  Flags=00000100
end
item: Set Variable
  Variable=RECIPIENT
  Value=%SENTTO4%
end
item: Set Variable
  Variable=COMMAND
  Value=%CONTACTTYPE% %RECIPIENT% > "C:\PROGRAM FILES\GPING\RESPONSE.TXT"
end
item: Insert Line into Text File
  Pathname=%CMDFILE%
  New Text=%COMMAND%
  Line Number=1
  Flags=00001000
end
item: Execute Program
  Pathname=%CMDFILE%
  Flags=00000110
end
item: End Block
end
item: If/While Statement
  Variable=SENTTOBOX
  Value=F
  Flags=00000100
end
item: Set Variable
  Variable=RECIPIENT
  Value=%SENTTO5%
end
item: Set Variable
  Variable=COMMAND
  Value=%CONTACTTYPE% %RECIPIENT% > "C:\PROGRAM FILES\GPING\RESPONSE.TXT"
end
item: Insert Line into Text File
  Pathname=%CMDFILE%
  New Text=%COMMAND%
  Line Number=1
  Flags=00001000
end
item: Execute Program
  Pathname=%CMDFILE%
  Flags=00000110
end
item: End Block
end
item: Set Variable
  Variable=LINENUMBER
  Value=1
end
item: Read/Update Text File
  Variable=LINETEMP
  Pathname=%RESPONSE%
end
item: If/While Statement
  Variable=LINENUMBER
  Value=1
end
item: Set Variable
  Variable=DISPLAY1
  Value=%LINETEMP%
end
item: End Block
end
item: If/While Statement
  Variable=LINENUMBER
  Value=2
end
item: Set Variable
  Variable=DISPLAY2
  Value=%LINETEMP%
end
item: End Block
end
item: If/While Statement
  Variable=LINENUMBER
  Value=3
end
item: Set Variable
  Variable=DISPLAY3
  Value=%LINETEMP%
end
item: End Block
end
item: If/While Statement
  Variable=LINENUMBER
  Value=4
end
item: Set Variable
  Variable=DISPLAY4
  Value=%LINETEMP%
end
item: End Block
end
item: If/While Statement
  Variable=LINENUMBER
  Value=5
end
item: Set Variable
  Variable=DISPLAY5
  Value=%LINETEMP%
end
item: End Block
end
item: If/While Statement
  Variable=LINENUMBER
  Value=6
end
item: Set Variable
  Variable=DISPLAY6
  Value=%LINETEMP%
end
item: End Block
end
item: If/While Statement
  Variable=LINENUMBER
  Value=7
end
item: Set Variable
  Variable=DISPLAY7
  Value=%LINETEMP%
end
item: End Block
end
item: If/While Statement
  Variable=LINENUMBER
  Value=8
end
item: Set Variable
  Variable=DISPLAY8
  Value=%LINETEMP%
end
item: End Block
end
item: If/While Statement
  Variable=LINENUMBER
  Value=9
end
item: Set Variable
  Variable=DISPLAY9
  Value=%LINETEMP%
end
item: End Block
end
item: Set Variable
  Variable=LINENUMBER
  Value=%LINENUMBER%
  Flags=00000100
end
item: End Block
end
item: Custom Dialog Set
  Name=IP Response
  item: Dialog
    Title English=IP Response
    Width=237
    Height=155
    Font Name=Helv
    Font Size=8
    item: Editbox
      Rectangle=10 5 222 106
      Value=%RESPONSE%
      Help Context=16711681
      Create Flags=01010000100000000001000000000100
      Text English=a4em
    end
    item: Push Button
      Rectangle=104 116 139 131
      Variable=OK
      Value=1
      Action=1
      Create Flags=01010000000000010000000000000000
      Text English=OK
    end
  end
end
item: If/While Statement
  Variable=SEND
  Value=2
end
item: Exit Installation
end
item: End Block
end
item: End Block
end
item: End Block
end
item: End Block
end
item: End Block
end