Aller au contenu
Le Web des Cheminots

Un Chercheur De Fichiers


Invité ___

Messages recommandés

La programmation sous Windows c'est pas sorcier la preuve :

un chercheur de fichiers que j'ai en partie réalisé en VbScript fonctionnant sous IE6 qui vous permettra de tout trouver avec google.

Bien sûr vous pouvez modifier le programme à votre guise puisqu'il est gratuit.

dim wsh,query,filetype,time

set wsh = WScript.CreateObject("WScript.Shell")

query=Inputbox("Entrez votre recherche." & vbCrLF & "Si ok sur rien Google Express se fermera.","Google Express")

if query<>"" then

filetype=inputbox ("Entrez le type de fichier que vous cherchez."& vbCrLF & "Si ok sur rien Google Express se fermera.","Google Express","mp3")

if filetype<>"" then

time=msgbox("Possedez vous un modem haut debit ?",vbYesNoCancel,"Google Express")

if time > 5 then

if (time=vbyes) then

   time=5000

else

   time=64000

end if

msgbox "Une fois la page de google chargée, SURTOUT ne toucher à rien."& vbCrLF & vbCrLF & "Attendre alors que le message de confirmation""Recherche effectuée"""&vbCrLF &"soit affiché pour explorer les liens trouvés par Google.",vbexclamation,"Google Express"

wsh.run "iexplore"

wsh.appactivate "iexplore"

WScript.Sleep(1000)

wsh.sendkeys "{TAB}"

wsh.sendkeys "www.google.fr"

wsh.sendkeys "{ENTER}"

WScript.Sleep(time)

wsh.sendkeys "? intitle:index.of ? "

wsh.sendkeys query

wsh.sendkeys " "

wsh.sendkeys filetype

wsh.sendkeys "{ENTER}"

msgbox "Recherche effectuée",vbInformation,"Google Express"

end if

end if

end if

Recopiez le texte ci-dessus(entre les Quotes) dans le block-notes et sauvegardez comme:

GoogleExpress.vbs

Au moment de la sauvegarde du fichier cliquer sur le menu déroulant Type et choisir "Tous Fichiers" et dans "Nom du fichier" tapez : GoogleExpress.vbs

Attention il faut que l'extention du fichier soit bien ".vbs" et non pas ".txt"

Si vous n'arrivez pas à changer l'extention .txt en .vbs je vous conseille ce graticiel qui va grandement vous aider:

Change Extension

http://home.nordnet.fr/~pmdevigne/

téléchargement:

http://home.nordnet.fr/~pmdevigne/programm...ChangeExtension

--------------------------------------------------------------------------------------------

Mode d'emploi de GoogleExpress

Double-cliquez sur le fichier GoogleExpress.vbs et suivre les instructions affichée à l'écran.

Il faut parametrer éventuellement votre Anti-virus pour qu'il accepte de lancer ce fichier VbScript.

--------------------------------------------------------------------------------------------

Si vous êtes interressé par le VbScript voici deux cours en PDF:

Introduction au langage VBScript

Site

http://www.ccim.be/ccim328/vb/index.htm

Cours(pdf)

http://www.ccim.be/ccim328/vb/download.htm

Apprendre le VB Script (cours complet)

Site

http://shiva.istia.univ-angers.fr/~tahe/re...s/vbscript.html

Cours(pdf)

http://shiva.istia.univ-angers.fr/~tahe/re...s/vbscript.html

;)

Lien vers le commentaire
Partager sur d’autres sites

Invité papic

pas trop au point ton truc j'ai tapé cheminot , lui me valide mp3.

bref je vois pas trop l'intérêt de ton fichier, sur firefox avec l'onglet google c'est plus rapide ;)

Lien vers le commentaire
Partager sur d’autres sites

pas trop au point ton truc j'ai tapé cheminot , lui me valide mp3.

bref je vois pas trop l'intérêt de ton fichier, sur firefox  avec l'onglet google c'est plus rapide :)

<{POST_SNAPBACK}>

Salut papic

L'intérêt de ce fichier et de trouver les fichiers cachés dans les répertoires index qui ne sont pas accessibles directement par google.

En général si on est malin on peut faire des découvertes interessantes.

Si il t'a mis l'extention mp3(par défaut) c'est que tu n'a pas mis l'extention du fichier que tu recherchais à la question :

"Entrez le type de fichier que vous cherchez".

Exemple :

je recherche un produit Norton:

à la question "Entrez votre recherche." je tape "Norton"

à la question "Entrez le type de fichier que vous cherchez"

au lieu du "Mp3" affiché par défaut remplace le par "rar".

Google va t'afficher alors tous les résultats qu'il aura trouvé dans les répertoires cachés à toi d'explorer ce qui t'interesse.

Bien sûr tu pourrais le faire directement sous Google en tapant dans la barre de recherche:

? intitle:index.of ? + le nom du fichier à rechercher mais il va te sortir tous les fichiers avec toutes les extentions possibles.

Mon programme limite les recherches à une seule extention de fichier.

De toutes façons c'est un exemple pour prouver que la programmation c'est facile sous Windows.

Tu peut changer l'extention par défaut en modifiant la ligne du fichier( sous bloc-note):

filetype=inputbox ("Entrez le type de fichier que vous cherchez."& vbCrLF & "Si ok sur rien Google Express se fermera.","Google Express","mp3")

Tu changes "mp3" par l'extention que tu désires avoir par défaut.

;)

Lien vers le commentaire
Partager sur d’autres sites

Créer un compte ou se connecter pour commenter

Vous devez être membre afin de pouvoir déposer un commentaire

Créer un compte

Créez un compte sur notre communauté. C’est facile !

Créer un nouveau compte

Se connecter

Vous avez déjà un compte ? Connectez-vous ici.

Connectez-vous maintenant
×
×
  • Créer...

L'extension "AdBlock" anti-pub... on en parle ?

Vous avez installé un outil pour bloquer la publicité sur internet...hors c'est la publicité qui permet à cheminots.net d'exister et de vous permettre d'avoir la meilleure expérience utilisateur possible.

Alors pourquoi ne pas désactiver votre bloqueur de pub pour ce site et ainsi participer à sa pérennité ?

Si vous ne souhaitez pas désactiver Adblock, vous pouvez quand même accéder au site,
et on vous souhaite une bonne visite !

 

Comment désactiver Adblock pour cheminots.net ?

Repérez l'icône Adblock sur votre navigateur internet (Mozilla Firefox, Google Chrome etc.). 
Généralement elle se situe à droite de la barre d'adresse, ou tout en bas à droite de la fenêtre.
adblock.png.b5362a440eebda16ea382664cb9b629f.png

Cliquez sur l'icône puis.. (en fonction du navigateur) :

Mozilla Firefox 
Cliquez sur « Désactiver partout ».

Google Chrome et autres 
Cliquez sur « Ne rien bloquer sur les pages de ce domaine » ou décochez « Activé pour ce site ».

 

Si je n'arrive pas à désactiver Adblock...

Si vous ne trouvez pas le bouton Adblock ou si vous n'arrivez pas à désactiver Adblock, vous pouvez essayer de désinstaller complètement le logiciel dans les options de votre navigateur web:

Mozilla Firefox 
Cliquez sur Firefox, puis Modules complémentaires. Dans Extensions, désactivez/désinstallez Adblock.

Google Chrome 
Cliquez sur la clé à outil en haut à droite, puis Outils et enfin Extensions. Désactivez/désinstallez Adblock.

Apple Safari 
Cliquez Safari, puis Préférences et enfin Extensions. Désactivez/désinstallez Adblock.

 

FREEBOX
Se connecter à l’interface de gestion mafreebox.freebox.fr puis « Connexion Internet > Configuration > Blocage de la publicité »
Désactiver l’option et cliquer sur Modifier.

Antivirus
Certains antivirus bloquent les bannières, essayez en le désactivant. Si c'est lui qui bloque les pubs, vous pouvez désactiver cette fonctionnalité, ou mettre le site cheminots.net en liste blanche.