ASM

DISK I/O

Know if a volume is a server

try this...

CLEAR LOCAL
LOCAL FN isNetworkServer (volName$)
  IF RIGHT$(volName$,1) <> ":" THEN volName$ = volName$ + ":"
  DIM pBlock.128
  pBlock.ioNamePtr& = @volName$ 'put pointer to dirName$
  pBlock.ioVRefNum% = vRefNum%
  pBlock.ioDrParID& = [_curDirStore]
  pBlock.ioFDirIndex% = -1

  err = FN HGETVINFO (@pBlock)
  IF (pBlock.ioVAtrb% AND &x0000000001000000) = _nil THEN isServer% = _true
END FN = isServer%

WINDOW 1
PRINT FN isNetworkServer ("Your Network Server Name")
STOP