Dir (ruta_nombre_fichero)

Devuelve una cadena vacía “” si no existe el fichero que se le pasa como parámetro, devolverá el nombre del fichero en caso de que exista.

Ejemplo:

  rutaNombreFichEAN = App.Path & "\" & codigoBarrasF & ".bmp"
  If Dir (rutaNombreFichEAN) <> "" Then
    Kill rutaNombreFichEAN
   End If
alonsojpd

alonsojpd

Presidente y fundador de Proyecto A y AjpdSoft

Deja un comentario