Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - VBA

Страница: 1 |

 

  Вопрос: Поиск фаилов по маске. Добавлено: 27.12.05 10:35  

Автор вопроса:  Alexei
Есть файл, называется MM00001_SET21_02T_221205_000232308.TXT
Хвост 221205 и 000232308 каждый день меняется.
С датой все более менее понятно, а вот с последними 9-ю цифрами вышла проблема - не могу найти, как написать чтобы на этот хвост поиск не заморачивался. Через * или # у меня так и не получилось его прописать. Делал вот как:
Set fs1 = Application.FileSearch
xFile1 = Format([Forms]![MainForm]![TodayDate] - 1, "DDMMYY")
With fs1
      .LookIn = "J:\1\2\\"
      xFile = "*.txt"
        xFileOld = "MM00001_SET21_02T_" & xFile1 & "_" & xFile & ""
        xFileFullOld = .LookIn + xFileOld
End With


Что я только не пытался сделать, но никак не получается. Думаю что решение будет очень простым, посто я его не вижу.

Спасибо.

Ответить

  Ответы Всего ответов: 1  

Номер ответа: 1
Автор ответа:
 HOOLIGAN



Вопросов: 0
Ответов: 1066
 Профиль | | #1 Добавлено: 27.12.05 11:29
FindFirstFile ByVal "MM00001_SET21_02T_*"

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам