[AccessD] Kill Text

Yep,   that's more efficient for the specific task at hand.

I  replicated William's process of stepping through the files so that he could   
do other things with the individual files if he wanted to.

-- 
Stuart

On 23 Mar 2009 at 13:07, Steve Schapel wrote:

> Max,
> 
> If you want KISS, you want this...
> 
> Public Function KillTxt()
>    Dim strFilePath As String
>    strFilePath = "C:\Program Files\EMSReports\Imports\*.txt"
>    If Len(Dir(strFilePath)) Then
>       Kill strFilePath
>    End If
> End Function
> 
> 
> Regards
> Steve
> 
> 
> --------------------------------------------------
> From: "Max Wanadoo" <max.wanadoo at gmail.com>
> Sent: Monday, March 23, 2009 12:17 PM
> To: "Access Developers discussion and problem solving" 
> <accessd at databaseadvisors.com>
> Subject: Re: [AccessD] Kill Text
> 
> > BTW, I would change your code to Stuarts personally.  Not so "esoteric".
> > Heard of KISS.  It is very apposite.
> >
>  
> 
> -- 
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com