With FileWatcher .Path = "c:\Data" 这里可能还有 Date1,Date2.... .Filter = "Sale.mdb" .Delay = 1000 .Enabled = TrueEnd With