Précédent   Forum des professionnels en informatique > Autres langages > Général Visual Basic 6 et VBScript > VBScript
VBScript Le forum d'entraide sur VBScript. Avant de poster -> La FAQ VBScript
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 24/01/2012, 18h33   #1
Membre à l'essai
 
Inscription : août 2010
Messages : 116
Détails du profil
Informations forums :
Inscription : août 2010
Messages : 116
Points : 22
Points : 22
Par défaut [VBS] La recherche des fichiers

Bonjour les amis,
Je cherche à faire une double requête pour la recherche des fichiers avec VBSCRIPT

Voila mon code:
Code :
1
2
3
4
5
6
Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2" )
Set colFiles = objWMIService.ExecQuery("Select * from CIM_DataFile where (Extension = 'doc' or Extension = 'docx') and CreationDate > '" & FileDate & "'")
 
For Each objFile in colFiles 
	call affichage(objfile.Name, objfile.FileName + "." + objfile.Extension)
Next
Ce code recherche tout les fichiers qui porte l'extension .DOC & .DOCX qui sont daté de FileDate ou plus

Dans cette requête je veut ajouté une autre exception:
C'est de rechercher les fichiers qui porte "ALEX" et "ARNOLD" par exemple sans qu'il soit daté de plus de FileDate (Genre trouvé tout les fichiers qui porte le NOM "ALEX" peut importe la date de sa création)

Genre ça: (Juste un exemple de ma tête qui surement ne marche pas)
Code :
Set colFiles = objWMIService.ExecQuery("Select * from CIM_DataFile where ((Extension = 'doc' or Extension = 'docx') and CreationDate > '" & FileDate & "') and Name='alex' or Name='arnold'")
Et je veut combiné les deux requête afin d'avoir qu'une seul

Merci de me montrer le chemin les experts
Stalk3R est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 24/01/2012, 19h08   #2
Rédacteur/Modérateur
 
Avatar de ProgElecT
 
Homme Francis MILLET
Inscription : décembre 2004
Messages : 2 934
Détails du profil
Informations personnelles :
Nom : Homme Francis MILLET
Âge : 56
Localisation : France, Haute Savoie (Rhône Alpes)

Informations professionnelles :
Secteur : Communication - Médias

Informations forums :
Inscription : décembre 2004
Messages : 2 934
Points : 4 147
Points : 4 147
Envoyer un message via MSN à ProgElecT
Salut
Code :
Set colFiles = objWMIService.ExecQuery("Select * from CIM_DataFile where ((Extension = 'doc' or Extension = 'docx') and CreationDate > '" & FileDate & "') and Name='alex' or Name='arnold'")
"') and Name='alex' or Name='arnold'"Pourquoi le And a se niveau? je verrai plutôt un Or
(Condition principal) ou autre condition ou autre condition ou .....
ProgElecT est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 24/01/2012, 20h03   #3
Membre à l'essai
 
Inscription : août 2010
Messages : 116
Détails du profil
Informations forums :
Inscription : août 2010
Messages : 116
Points : 22
Points : 22
Salut,
Moi je veut exécuter les deux requête ! Quand par exemple elle fini avec la première (ext:.doc or .docx) elle passe à la deuxième (Alex or Arnold)
Stalk3R est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 24/01/2012, 20h39   #4
Membre à l'essai
 
Inscription : août 2010
Messages : 116
Détails du profil
Informations forums :
Inscription : août 2010
Messages : 116
Points : 22
Points : 22
je peut faire ça?
Code :
Set colFiles = objWMIService.ExecQuery("Select * from CIM_DataFile where (Extension = 'doc' or Extension = 'docx') and (CreationDate > '" & FileDate & "' or Name Like '%alex%' or Name Like '%arnold%')")
sachant que le fichier est toujours en DOC ou DOCX ! et qu'il est possible que ALEX soit au mileu de nom de fichier genre : le_resume_alex.doc

Merci
Stalk3R est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 23h53.


 
 
 
 
Partenaires

Hébergement Web