0.9b (c) 1995 Peter Childs
The function retrieves information about a particular shared resource on a server.
Syntax
MyRc = NetGetInfo(NETSHARECHECK, 'checkInfo', SrvName)
Parameters
The parameters specified are:
'checkInfo' The REXX variable required and receiving the result. The variable is divided into:
o shareInfo.devicename
The device name to query
o shareInfo.type
The returned share type, if the device is shared
SrvName The server computer name
Note
The server computer name can be specified as '' for a local server.
Example
/* Net share check */ call RxFuncAdd 'LoadLsRxutFuncs', 'LSRXUT', 'LoadLsRxutFuncs' call LoadLsRxutFuncs NETSHARECHECK = 210 ComputerName = '\\KING_BALU' checkInfo.devicename = 'Q:' myRc = NetGetInfo(NETSHARECHECK, 'checkInfo', ComputerName) if myRc <> '0' then do say 'Got error from NetGetInfo() ' myRc rcCode = 9 end else do say "Share type" checkInfo.type rcCode = 0 end call DropLsRxutFuncs call RxFuncDrop 'LoadLsRxutFuncs' exit rcCode exit 0
Example Output
Share type Disk Drive
Inf-HTML End Run - Successful