Histórico da Página

#---------------------------------------#
 FUNCTION LOG_fileRemove_test()
#---------------------------------------#
  DEFINE l_file   CHAR(250)

  LET l_file = "c:\\temp\\arquivo1.txt"

  IF LOG_file_remove(l_file,0) THEN
     CALL conout("Arquivo do servidor eliminado com sucesso.")
  ELSE
     CALL conout("Falha na eliminação de arquivo do servidor.")
  END IF

  LET l_file = "c:\\temp\\*.txt"

  IF LOG_file_remove(l_file,0) THEN
     CALL conout("Lista de arquivos .txt do servidor eliminados com sucesso.")
  ELSE
     CALL conout("Falha na eliminação da lista de arquivos .txt do servidor.")
  END IF
END FUNCTION