Bonjour,

Je voudrais lire un fichier xml particulier et récupérer une information contenue à l'intérieur.

Pour pouvoir choisi le fichier xml voulus, je veut faire un tri sur la date et prendre celui qui à une date en particulier :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
If oFSo.FolderExists(stRep) Then
 
 
	For Each oF1 In oFSo.GetFolder(stRep).Files
 
	If  oF1.Type = "XML Document"  then
		If  Left(oF1.Name,3)= "BEX" Then
		Dat = oF1.DateCreated
 
			If dat > MyMonth   Then '#7/28/2013 08:00:00 PM#
			fichier = oF1.Name
			MsgBox oF1.Name
			'MsgBox oF1.Name
			End If
	    End IF	
	End If	
	Next
xmlDoc.load(fichier)
Mymonth contient la date du jour mise sous la forme #JJ/MM/AAAA hh:mm:ss PM#

Je voudrait donc comparer MyMonth avec oF1.DateCreated afin de selectionner un seul fichier xml sur les nombreux contenue dans le dossier.
Le problème est que dans tout les cas, il ne trouve pas le fichier si je compare avec MyMonth. Si je met la valeur date en dur : #7/28/2013 08:00:00 PM#, ça fonctionne.
Y a t'il un moyen pour comparer les deux dates?
Je pense que le problème sont les guillemet contenue par MyMonth : "#7/28/2013 08:00:00 PM#" qui empèche la comparaison.

Merci.