Net\_Ping

VB Scripting Library > OSD Scripting Library > Network functions (OSD)

Net_Ping(sComputerNameOrIp,bMustRespond)

Pings a computer by name or IP, and returns the answer in gbValue

Arguments

ARGUMENT	DESCRIPTION	TYPE
sComputerNameOrIp	The name or IP4 address to ping	String
bMustRespond	If TRUE, the computer must respond.	Boolean

Return Type

Boolean, TRUE if function completed successfully.
If bMustRespond is set to TRUE the computer must respond to the ping, otherwise the function will return FALSE

Remarks

Example

The following example will ping a server to see if it is responding. and map a share if it replys.

Private Function IncludeScript(sScriptFile)
 '...
End Function

'Begin
  bStatus=True
  If bStatus Then bStatus=IncludeScript("customlib.cis")
  If bStatus Then bStatus=IncludeLibrary("Capalib.cin")
  If bStatus Then bStatus=IncludeLibrary("Osdlib.cin")
  If bStatus Then bStatus=Job_Start("WS","Script Name","1.0","ScriptName.log","INSTALL")
  If bStatus Then bStatus=OSD_Initialize()

  sServer="SERVER1"
  If bStatus Then bStatus=Net_Ping(sServer,False)
  If bStatus and gbValue Then bStatus=Net_MapNetworkDrive("S:", "\\" & sServer & "\MyShare", True, "", "")

  Job_End(bStatus)
'End main

See Also

Scripting Guidelines