VBS48 ressources dans cette catégorie

Vos codes VBSCript, en mode console (interpréteur cscript ou wscript)

Mon premier gros programme écrit en VBScript avec interface HTA, merci de votre indulgence.

Le but, plutôt que de lancer un gros projet, ce programme ne nécessitant aucune installation peut
s'avérer utile pour aider à la rédaction de requête SQL.

Programme utilisant ADO pour la partie dialogue avec la BDs (ACCESS exclusivement)
Nom du fichier à lancer, OutilBDsAccess.HTA
Sous fichiers, Fond.jpg, DBSHTA.ico, TBLHTA.ico, MultiTBLHTA.ico et StructGenTbl.hta.
Pour l'affichage les fichiers GenTblSpl.hta et GenTblMlt.HTA seront générés par le fichier
OutilBDsAccess.HTA, à l'endroit du dossier de celui ci.

Que permet ce programme
Ouverture BDs :
Choix DSN (noms de sour ... Voir la suite

Pas mal de questions posées dans ce forum sur la manière de trouver le plus
ancien/récent des fichiers d'un répertoire que ce soit la date de modification, de création, d'accès ....
Je vous propose une alternative que vous pouvez consulter, modifier .... pour obtenir le résultat souhaité.

Sous VB, il possible, en utilisant des APIs Windows(telles que "lOpen" et "lClose") de tester si un fichier est utilisé ou non.
En Vbscript, cette possibilité n'est pas offerte sauf si on utilise un Wrapper qui s'avère un peu compliqué pour les non-initiés.
Ce code permet, d'une manière simple, de contourner ce problème.

Voila comme le titre l'indique "AUTHENTIFICATION PAR VOTRE CLE USB PERSONNELLE" :
c'est comme Trouver la clé à sa serrure !

Après des décennies, des siècles d’existence et d’évolution, avec quoi ouvrez-vous votre porte d’entrée ? Une clé, évidemment. Alors pourquoi ne pas en faire de même pour votre ordinateur ?

Cela tombe bien, il existe un homonyme informatique qui est également un petit objet, transportable dans une poche toujours avec soi, muni d’un identifiant unique et très difficilement falsifiable, qui en plus permet de stocker des données:c'est votre clé USB !



Le principe est simple: le script vérifie le numéro d’identification qui est le N° de série de votre clé USB (SerialNumber) e ... Voir la suite

application pour faire des devis
enregistrement misa ajour des index devis automatique
possibilité de memoriser listing client

Un Splash Screen ou bien un écran d’accueil écrit en Vbscript tout en utilisant la puissance du HTML Application [HTA] ,donc c'est un Splash Screen avec du texte et image animé avec une musique de fond
L'avantage de ce code est qu'il est utilisable dans n'importe quelle Application écrite en Vbscript et il est facilement modifiable et personnalisable !
Donc il suffit d’appeler la procédure SplashScreen avant tout programme Principal et le tour est joué !

Suite à une question sur le forum VBScript,

un code permettant la lecture d'une feuille excel, organisée en table ( 1° ligne = entête, et les autre lignes données)

ce code utilise Microsoft.Jet, et permet d'afficher le contenu d'une feuille d'un classeur Excel version 2000...

vous pourrez vous inspirer de l'article :
Lire et écrire dans les classeurs fermés
pour par exemple l'adapter à d'autre versions d'excel...

Il y a pas mal de Virus et ses variants qui ont été répandu beaucoup ces jours-ci. et qui ont ces symptômes : ces derniers cachent les dossiers et ils les transforment en raccourcis qui ont pour cibles bien sûr leurs Virus.exe
Moi aussi j'étais victime de ce type de virus depuis une semaine. J'ai un virus qui transforme les dossiers en raccourcis. En fait dès qu'on branche une clé USB le virus s'active. Il met les dossiers en attribut caché et crée des raccourcis portant le nom du dossier qui si on clique dessus lance une application crée par le virus qui sature le CPU.
Donc j'ai pensé à faire ce vbscript pour supprimer automatiquement les raccourcis infectés et le Virus lui-même.

Ce Vbscript est en "version beta" et je veux le partager avec vous pour des tests sur vos machines, et bien sûr, vous devriez me donner vos commentaires et vos suggestions pour améliorer ce dernier.

Alors ce script vous montre comment créer un dossier et le protéger par mot de passe Crypté et stocké dans la base des registres, il crée un dossier nommé "C:\Protection" puis il lui attribue une permission d'accès refusée, donc vous ne pouvez pas ni renommer ni ouvrir, ni écrire, ni lire ni supprimer ce dossier.

Ce script modifie les attributs du dossier pour "+ r + s + h" et révoque les autorisations pour %COMPUTERNAME% et le groupe d'administrateurs après avoir invité à saisir un mot de passe. Et ces changements revient ap ... Voir la suite

Ce script vous permettra de :
- Envoyer un mail ;
- Avoir un ou plusieurs destinataires (Cf : to, cc) ;
- Avoir une ou plusieurs phrases (Concaténation de chaîne) ;
- Avoir une ou plusieurs pièces jointes.

Le titre et les commentaires dans le fichier source décrivent amplement le but du code.

Ce VBScript vous montre comment générer une liste des fichiers et dossiers en HTML avec arborescence

Permet de compresser des fichiers et/ou fichiers et dossiers selon
le dernier paramètre de la Sub "ProcessAllFiles".
- 1er paramètre : chemin du dossier où se trouvent les fichiers/dossiers à compresser
- 2ème paramètre : Chemin complet du fichier .zip à créer, si on met "\Test.zip", le
fichier sera créé à la racine du lecteur en cours (si le système le permet !).
- 3ème paramètre : si True, inclut les sous-dossiers dans la limite de 99 fichiers au total non sinon.

Diviser le texte à afficher sur plusieurs boites de message

Description du script VBS : Rechercher dans le contenu des fichiers de type texte

En balayant les fichiers de type "fichiers texte" (fichiers ".txt",".htm",".asp",".php",".rtf",".html",".htm",".hta",".xml",".csv",".vbs" etc...),
de les ouvrir les uns après les autres pour en extraire la portion de texte contenant le mot recherché.
Le petit moteur peut toutefois rendre service pour explorer (en local) de petits sites Intranet (sans indexation préalable des pages).
Code Original ==> http://jacxl.free.fr/cours_xl/vbs/moteur_rech.vbs

- Mise à jour par Hackoo en 19/12/2013
- Ajout d'une fonction pour parcourir le dossier à traiter par la fonction BrowseForFolder afin de rendre le script plus convivial et ... Voir la suite

C'est un outil pour faciliter la recherche des fichiers de type VBS afin d'aider les gens qui se sentent infectés par certains virus de ce type.
Ce script génère un fichier rapport qui contient tous les processus en cours d'exécution et les éléments à démarrage automatique.
Il crée une archive protégé par un mot de passe de type RAR destiné pour l'analyse ultérieurement s'il y a une infection.

C'est un Vbscript pour rechercher des fichiers par leurs extensions et de les organiser en les copiant dans des dossiers différents qui portent des noms relatif à leurs extensions choisi dés le début de la recherche,et générer le Résultat de recherche dans un Tableau en HTML en citant les informations,sur ces fichiers tels que leurs Chemins ,la date de création,la date de modification,la Taille et leurs attributs,et affichage des miniatures de différents types d'images lors de la recherche,Càd si la Recherche comporte des fichiers images elles seront affichées en miniatures.

Détermination de l'itinéraire vers les URL(s) avec la commande DOS "Tracert" saisi par l'utilisateur dans l'InputBox animé par une barre de progression.

C'est une solution plus simpliste que celles proposées dans ce forum, plus compréhensible dirai-je.

Le principe repose sur FileSystemObject, un fichier hta et le registre Windows. L'entrée créée dans le registre est ensuite supprimée, le fichier HTA aussi.
L'inconvénient est qu'on ne peut pas spécifier les filtres, le chemin de recherche et le titre de la boite de dialogue.
Le filtre par défaut est *.* et le titre de la boite est Choisir un fichier à télécharger

Pour le filtre, il suffit d'écrire dans la zone "Nom du fichier" l'extension voulue puis le bouton Ouvrir

Naviguer jusqu'au dossier voulu puis choisir un fichier.

La procédure doit être appeler à partir d'une page HTA lors de l'exécution d'un window_onload.
Il faut prévoir une div (ici id="lestableaux") où va se générer le tableau.
Les paramètres de la procédure (datascr,lasql,Nbcol) doivent évidement être déterminés dans le script du window_onload.
Au-delà de la simple implémentation des données, il y a donc moyen de paramétrer la requête comme on le souhaite.
Par exemple, cette page HTA peut être une sous-vue d'une autre page où les paramètres de la requête seront définis.