Need some help and explaination. Thks.
Thks dave for your advice. I have kinda solve the problem using primitive solution as below: .LookIn = "z:\GsmOmc\TrafRept\in-bound-roamer\" '.FileName = "in_*.txt" .FileName = ".txt" = solution If .Execute 0 Then Year = "" For i = 1 To .FoundFiles.Count Filenames = .FoundFiles(i) = solution Filetype = Right(.FoundFiles(i), 4) = solution If InStr(1, Filenames, "in_", vbTextCompare) = 36 An StrComp(".txt", Filetype) = 0 Then = solution This is just case someone like me who is desperate for a quic solution. How about checking your filenames before you do anything with them? Dave I have check the filenames by inserting the msgbox command an have confirm they are correct. BTW do you still have the links for that articles you mention? M window XP platform has been giving me lots of headache ever since i has been setup. Now I have faced with another problem which I hav posted separately to avoid confusion. : -- stevetan201 ----------------------------------------------------------------------- stevetan2010's Profile: http://www.excelforum.com/member.php...fo&userid=1624 View this thread: http://www.excelforum.com/showthread.php?threadid=27647 |
All times are GMT +1. The time now is 12:11 AM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com