Codes sources VB & VBS177 ressources dans cette catégorie

Retrouvez ici tous les meilleurs téléchargements

Une classe VB6 pour l'encryptage d'une chaine de caractères ou d'un fichier en MD5.
Je n'ai rien inventé, mais cette ressource manquait. Elle utilise l'algorithme développé en 1992 par Ron Rivest (RFC1321)

Cette source résulte d'un mixage de codes Delphi et Javascript. Merci à leurs auteurs.

Manipulation des touches CapsLock, Numlock et ScrollLock grâce aux APIs : keybd_event , SetKeyboardState , GetKeyState et MapVirtualKey..

Ce code fait appel aux services DNS pour résoudre un nom d'hôte en adresse IP.
Tutoriel associé

Diviser le texte à afficher sur plusieurs boites de message

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.

Sélection et affichage d'images.

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.

J'ai crée cet outil dont le but principal est de décoder quelques fichiers encodé ayant l'extension VBE (Généralement ces fichiers sont des virus qui se propage via USB) en fichiers VBS trouvé par ici et par là dans mes clés USB et les clés USB de mes collègues.

Il y a beaucoup de sources sur le web concernant les boites de dialogue d'ouverture et d'enregistrement de fichier.
Celui-ci en est un de plus.
Il se présente sous la forme d'un textbox associé avec un petit bouton, l'avantage est qu'il n'y a pas besoin de galérer pour positionner le bouton.

Le composant a trois modes de fonctionnement, un pour le open, un pour le save et un pour le folder.
La boite de dialogue open folder est prépositionnable (quand la boite s'affiche il est positionné sur un répertoire précis) et dispose d'un bouton pour créer un nouveau répertoire.

Quand l'utilisateur sélectionne le bouton annuler, pas d'événement, si il valide son choix un événement est déclenché

Un composant label tout bête mais qui peut rendre des services.
Le texte est orienté verticalement de bas en haut ou l'inverse, sur une ou plusieurs lignes, heu je devrais dire colonnes.
Attention, il ne fonctionne que si on lui met des polices vectorielles.

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.

Créer une liste de publipostage, à partir de Word et d'un fichier texte

Permet de retrouver le code ascii d'un caractères, celui-ci peut être ensuite copié/collé vers votre application, en haut de l'écran une zone RichTextBox permet le stockage temporaire de caractères.

c'est le fruit d'une question posé dans le forum vbscript !

Simulation de déplacement de vaisseaux spatiaux avec le moteur graphique TrueVision3D.

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 Mise à jour du SMTP Mail Client avec pièce jointe !
- Description de la Mise à jour :
- Installation d'un Raccourci vers le Bureau dés le premier lancement de l'application.
- Ajout de l'agent de Microsoft Merlin le Magicien pour le divertissement avec beaucoup de fonctions et de commandes et des tâches a accomplir !
Voici quelques tâches que peut faire ce Merlin le Magicien dans son Menu:
-Lire le Texte saisi et le Prononcer
-Donner l'heure
-Ouvrir le lecteur CD/DVD-Rom
-Fermer le lecteur CD/DVD-Rom
-Donner les informations sur la version de Windows
-Donner L'espace total et l'espace libre sur les lecteurs
-Afficher la Mémoire vive et la mémoire virtuelle
-Afficher l'ad ... Voir la suite

code en visual basic (excel) permettant de calculer la distance de jaro-winkler, représentative de la ressemblance de deux chaines.
la fonction est expliquée sous wikipedia.
j'ai toutefois ajouté quelques paramètres que l'on ne retrouve pas dans la formule initiale pour :
- les cas simples (chaines identiques --> distance =1)
- les recherches inutiles (caractères similaires trop loin dans des chaines longues)

bien sûr je suis preneur de toute amélioration : il s'agit de mon premier véritable algorithme en visual basic.

Voici un exemple de formulaire en HTA HTML Application pour envoyer un e-mail avec une pièce-jointe par deux méthodes:
1-Méthode: Via le serveur Gmail en utilisant l'authentification SMTP et SSL de ce dernier
2-Méthode: Via Votre Serveur SMTP sans authentification
Dans cet exemple vous pouvez utiliser du code HTML dans votre message. Par exemple moi j'ai utilisé une image comme signature a la fin du mail !
NB: Pour la 2ème méthode on peut l'utiliser sans login et sans mot de passe si on est sous le même Domaine et on peut aussi l'utiliser aussi si on est devant un Proxy , il suffit juste remplacer le contenu du champ SMTP "smtp.serveur.com"par son adresse IP par exemple si votre Proxy a comme adresse IP 172.16.0.1 ou b ... Voir la suite

Un exemple d'utilisation des API, permettant de prendre le contrôle de la souris

par le clavier.



Vous y trouverez l'emploi des APIs suivantes :



- pour placer la form dans le SYSTRAY

Function SetForegroundWindow

Function Shell_NotifyIcon




- pour lire les coordonnées, déplacer le curseur

Function GetCursorPos

Function SetCursorPos



- pour simuler l'action souris

Sub mouse_event



- pour créer un timer


Function SetTimer

Function KillTimer



- pour lire les touches du clavier
Voir la suite