Discussion :

[sygale]

Bonjour je recherche tous les *.sql qui ont dans le corps du text la phrase suivante

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

CREATE PUBLIC SYNONYM

J'ai donc codé l'exemple suivant :

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
With Application.FileSearch
    .NewSearch
    .LookIn = strPath
    .SearchSubFolders = False
    .FileName = "*.sql"
    .FileType = msoFileTypeAllFiles
    .TextOrProperty = "CREATE*PUBLIC*SYNONYM"
    .MatchTextExactly = False
    If varrtn > 0 Then
        For i = 1 To .FoundFiles.Count
            strRtn = strRtn & ";" & .FoundFiles(i)
        Next
        strRtn = .FoundFiles.Count & " Trouvés ;" & strRtn
    Else
        strRtn = "Execute>0"
    End If
End With

Par contre, il trouve rien.

Cependant si je remplace

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

    .TextOrProperty = "CREATE*PUBLIC*SYNONYM"

par

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

    .TextOrProperty = "CREATE*"

Il trouve des résultats.

kk1 sait comment rechercher plusieurs mot séparé par n'importe quelle chaine de caractère ??

Merci d'avance

[Vesta]

.TextOrProperty = "CREATE*PUBLIC*SYNONYM"

Ecrit comme ca il va trouver

tout les fichier commencant par CREATE, contenant PUBLIC et finissant par SYNOMY

C'est ca que tu voudrais faire?

essaie peu etre au cas ou l'extension jouerai un role

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

.TextOrProperty = "CREATE*PUBLIC*SYNONYM*"

[sygale]

Malheureusement cela ne faonctionne pas, je vais devoir faire un ensemble de fichier pour chaque recherche et fire des union sur tous les ensemble tant pis

merci qd même