Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
How to search in all documents for a word?
Message
 
 
À
19/11/2017 16:05:21
Information générale
Forum:
Microsoft Office
Catégorie:
Word
Divers
Thread ID:
01655688
Message ID:
01655698
Vues:
30
>
>*explorer is actually a good tool to search any string in folders/subfolders
>*can configure it to search only the string on files names or inside the files also.
>*it uses the shellexecute/find options to fire or manually [run/n explorer] only
>*all strings searched in a folder recursively in subfolders  found are  highlighted in yellow...
>*see the photo attached
>
>
>Declare Integer ShellExecute In SHELL32.Dll Integer nWinHandle,;
>	STRING cOperation,;
>	STRING cFileName,;
>	STRING cParameters,;
>	STRING cDirectory,;
>	INTEGER nShowWindow
>*find in folder : works launch the windows utility search for a folder
>**can input a string to search in filename or in files (configure the search  options in toolbar)
>Local m.ystr
>m.ystr="jpg"
>If ! ShellExecute(0, "find", Home(1), "", "", 1)>32    &&should be getdir() dialog instead home(1)
>	Messagebox("An error was occured!",4+4096,"Error")
>Endi
>
>Inkey(1)
>
>Local oshell
>oshell=Newobject("wscript.shell")
>oshell.sendkeys("Visual foxpro")
>oshell.sendkeys("~")
>oshell=Null
>
>note this takes always a certain time not instantaneous!
>
>there is also the msdos command findstring performing good searches.
>there is also vfp Gofish (i never tried it).
>
>can visit my blog at : http://yousfi.over-blog.com/2015/03/search-find-strings-findstr-shellexecute.html

Thank you.
"The creative process is nothing but a series of crises." Isaac Bashevis Singer
"My experience is that as soon as people are old enough to know better, they don't know anything at all." Oscar Wilde
"If a nation values anything more than freedom, it will lose its freedom; and the irony of it is that if it is comfort or money that it values more, it will lose that too." W.Somerset Maugham
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform