Tous les téléchargements de SfJ5Rpw8
- ' PARAMETRES BOITE MAIL :
- Const stUser = "bbil"
- Const stPass ="MotDepasse"
- Const stServeurPOP = "pop.Fournisseur.fr"
- Const numPort = 110
|
|
|
|
Un code permettant, grâce à l'utilisation de WinSock d'afficher le nombre de mails présents dans une boîte "POP" ainsi que dans lister les sujets.
Avant son utilisation commencez par renseigner les constantes définissants la boîte mail à consulter : |
|
|
|
|
|
|
|
|
Le source suivant fourni une introduction a l'utilisation de FileSystemObject dans un HTA.
En prenant pour exemple un "mini-éditeur de texte" sans prétentions. |
|
|
|
|
|
|
|
|
Source, sur les bases d'une calculatrice en VB6
|
|
|
|
|
|
|
|
|
Faites patienter les utilisateurs de votre script grâce a un bargraph.
|
|
|
|
|
|
|
|
|
Voici un code, permettant d'utiliser la fonction API ShellExecute, pour ouvrir un dossier (dans explorateur windows) , ou un fichier dans l'application associée (le bloc note pour un .txt, Word pour un .doc...) .. et tout cela en gérant l'erreur sur la non disponibilité du fichier .. (inexistant, pas d'association.....)
|
|
|
|
|
|
|
|
|
Un exemple d'utilisations de contrôles d'édition en VBS/HTA
|
|
|
|
|
|
|
|
|
Le source (VBS + HTA) suivant permet de bloquer l'accès au gestionnaire de tâches de windows, en modifiant/ajoutant une clef de la base de registre .
|
|
|
|
|
|
|
|
Cet exemple rend le Frame d'un UserForm transparent afin de voir l'image située en arrière plan.
|
|
|
|
|
|
|
|
Un source s'appuyant sur l'article : Appeler les API Win32 avec VBScript : DynamicWrapperX
pour faire l'appel à WindowSetPos et modifier la taille d'une fenêtre. Ce source modifie la taille de la fenêtre "Sans titre - Bloc-notes", ouvrez donc une instance du bloc note avant de lancer ce script. |
|
|
|
|
|
|
|
|
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... |
|
|
|
|
|
|
|
|
L'ajout de clef dans l'éditeur de base de registre de windows
permet de rajouter une entrée au menu contextuel pour cela il faut rajouter (si elle n'existe pas ) la clef shell: HKEY_CLASSES_ROOT\AllFilesystemObjects\shell une clef pour définir le message associé a la commande HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\ChaineCommande avec pour valeur par défaut le texte a afficher dans le menu contextuel ici : "Ajoute fichier liste commande" et sous cette clef une autre nommé command et dont la valeur par défaut reprend le nom de l'exécutable a associer au menu contextuel ( %1) permettant de passer en paramètre a cet exécutable le nom du ... Voir la suite |
|
|
|
|
|
|
|
|
Un code VBSCript, qui pourra vous servir de base pour créer vos fonctions récursives de gestions des fichiers d'un répertoire ( et de ses sous-répertoires)
adaptez la fonction TraiteFichier à votre traitement. |
|
|
|
|
|
|
|
DynamicWrapperX permet de faire appel à une API :
voir : Appeler les API Win32 avec VBScript : DynamicWrapperX L'API qui permet de récupérer les paramétres régionaux est GetLocaleInfo voir : Comment récupérer les paramètres régionaux, comme le séparateur décimal ou celui des milliers ? |
|
|
|
|