Kill (Nombre_Fichero)

Elimina el fichero pasado como parámetro.

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