home *** CD-ROM | disk | FTP | other *** search
/ FCE Gold Plus / GOLD.iso / pc / fscommand / Xtras / FileXtra4_test.dir / 00003_Script_test_FileExists() < prev    next >
Text File  |  2002-12-20  |  914b  |  21 lines
  1. on test_FileExists
  2.   fxObj = xtra("FileXtra4").new()
  3.   thePath = "Macintosh HD:Test Folder Name Really Long1:Test Folder Name Really Long2:Test Folder Name Really Long3:"
  4.   thePath = thePath & "Test Folder Name Really Long4:Test Folder Name Really Long5:Test Folder Name Really Long6:"
  5.   thePath = thePath & "Test Folder Name Really Long7:Test Folder Name Really Long8:Test Folder Name Really Long9:"
  6.   thePath = thePath & "Test Folder Name Really Long10:Test Folder Name Really Long11:Test Folder Name Really Long12:"
  7.   thePath = thePath & "certificate.doc"
  8.   
  9.   put "test_FileExists(): length of path == " & string(thePath.length)
  10.   
  11.   put "fx_FileExists() returns " & string(fxObj.fx_FileExists(thePath))
  12.   
  13.   errCode = fxObj.fx_ErrorNumber()
  14.   put "FX3 error code: " & string(errCode)
  15.   if errCode <> 0 then
  16.     put "    error string: " & fxObj.fx_ErrorString()
  17.   end if
  18.   
  19.   fxObj = 0
  20. end
  21.