Teste se existe arquivo

[Zanol]

Boa tarde,

tenho um report que chama uma function do banco que gera o endereço de determinado arquivo.

Ex: C:\pasta\imagem.gif

Quando gero este relatório ele carrega a imagem que retorna do caminho informado. O problema é que quando não tem imagem no diretório o reports mostra uma mensagem dizendo que o arquivo não existe.
Queria que o relatório fosse emitido normalmente mesmo que a imagem não exista.

Vocês sabem como realizar este teste?


Abraço

[diegolenhardt]

Como você esta´ fzendo pra carregar a imagem?

Qual comando?

[Zanol]

opa, consegui

criei uma function no banco com o seguinte script:

UTL_FILE.FGETATTR(DIRETORIO,
NOME_ARQ,
ARQ_EXISTS,
ARQ_LEN,
BLK_SIZE);

ela me retorna no terceiro parâmetro se existe ou não (BOOLEAN).


Obrigado pela ajuda.

[Zanol]

Opa, achei que tinha funcionado, porém o arquivo vai estar na máquina de um client e o UTL_FILE.FGETATTR só funciona na máquina do servidor.


Como você esta´ fzendo pra carregar a imagem?

Coloquei na tela um campo fórmula com o formato de imagem, quando clico para imprimir, chamo um .vbs que chama programas de terceiros que converte uma imagem do cad para gif.

No final, eu obtenho um caminho e o nome do arquivo na mesma string.

Selecionar tudo

CAMINHO := C:\pasta\imagem.gif;
RETURN CAMINHO;