Trouver un format(date) dans un string et le remplacer par la valeur
Bonjour,
Je fais une application qui crée des fichiers, le nom de ceux-ci doit doivent pouvoir intégrer la date sous divers format.
Par exemple :
basefilename = "myfilenametest1_ddMMyyyy.txt"
-> realname = "myfilenametest1_19022008.txt"
basefilename = "myfilenametest2_yyyyMMdd-HHmmss.txt"
-> realname = "myfilenametest2_20080219-101500.txt"
Il y a-t-il une fonction qui permettre de me donner le realname ou dois-je crée ma propre fonction qui fait des replace de chaque format?
Code:
1
2
3
4
5
6
7
8
|
Public Function ReplaceSpecialTag(str as String) As String
str=str.Replace("yyyy",Format(Now,"yyyy")
str=str.Replace("yy",Format(Now,"yy")
....
....
return str
End Function |
