Sources VB6109 ressources dans cette catégorie

Téléchargez et partagez sources VB6

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

Jouer un "Avi" dans un pictureBox et en effectuer des capture d'images.

Un algorithme servant à générer les partitions d'un ensemble

Ce programme permet de construire un arbre à partir d'une expression (String). Il est possible de renvoyer la valeur de cette arbre (Vrai ou Faux).

Ce code est un analyseur/resolveur d'expressions algébriques,incorporé dans un composant OCX


Ce source est intéressant car il montre comment font les compilateurs pour évaluer des expressions algébriques

On fourni au composant une chaîne de caractères, celui-ci l'analyse en vue de la transformer en notation polonaise inversée dans fonction PostFixIt.

Cette partie fait appel massivement à la récurrence (Une fonction appelle un fonction qui elle même , a un moment ou un autre va appeler la première).

Ensuite cette chaîne est exécutée à l'aide d'une pile LIFO (Last In/First Out) dans la fonction DoCalcule

Le programme est capable d'analyser,un niveau de parenthèses quelconque

Voir la suite

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

Ce code fractionne un fichier image en plusieurs autres fichiers.

La sauvegarde des fichiers est enregistré dans le dossier du projet.
Avant de lancer le run projet, modifier cette ligne.
'******** ATTENTION ****** vous devez indiquer ici votre propre fichier *********************
ChemNomImgSource = "C:\PersoFrancis\Provis3000x2000x300xCmaxi.bmp"

Utilisation GDIplus.dll
Attention, cette dll ne permet pas de bug, si cela vous arrive, l’éditeur VB6 plantera et vous perdrez les dernières modification apportées au code.
De plus ne fermez pas le programme en cours d’exécution avec le bouton de l’éditeur VB6,
la routine dans Form_Terminate ne serait pas exécutée.

Petit logiciel qui permet des calculer les échéances mensuel, combien va vous coûter votre crédit et les intérêts. J'ai mis un code qui est le suivant : 2468 (je me fait la main)

Voila, je mets en ligne un groupe de scripts écrits en vbs pour un serveur Windows 2003 ou supérieur
Le script principal lancé vers 23h50 sur le serveur est 'ctrl-imp.vbs' .
Il va rechercher et afficher une liste de toutes les impressions faites via le spooleur d'impressions du serveur pour la journée en cours
Ensuite, il va rechercher , lister et afficher toutes les tentatives de login non abouties (avec fourniture des IP pour réagir !!!) de la journée
Enfin il s'appuie sur deux autres scripts qui listent les login et les logout effectués sur le réseau local

J'avais écrit ces scripts pour ma boite perso où j'avais une box avec adresse IP fixe la chine l'a vite attaquée..., et des salariées qui imprimaient tr ... Voir la suite

Créer un nouveau type de fichier, lui associer un programme et une icône

Il y a quelque temps, j'ai dû réaliser un programme tournant en tâche de fond . Il devait lancer, au fur et à mesure que des documents se présentaient, lancer un programme avec une chaîne de commande correspondant aux documents.(ShellExecute). Aux tests, tout était parfait. En mise en production, les documents arrivaient tellement vite que j'avais des centaines de programmes lancés quasi simultanément et la machine s'effondrait littéralement sous la charge. J'ai donc développé ce composant qui prend en charge le lancement et l'arrêt du programme lancé, ce qui permet par exemple de ne lancer un autre programme que quand un autre est fini.

En y étant, j'ai peaufiné le composant qui est maintenant capable de lancer l'exécution d'un pr ... Voir la suite

Un exemple de lecture/écriture dans la base de registre avec un petit utilitaire de gestion des projets VB6 récent :

"Gestion de la boite de dialogue 'OUVRIR UN PROJET > RECENT' adaptée à VB6.Cette source permet de supprimer, ajouter, trier et lancer VB6 pour le projet sélectionné dans une liste.

A l'ouverture tous les chemins sont vérifiés, vérification des doublons a l'ajout, enregistrement de la nouvelle liste actualisée "

Permet de faire une capture d'écran en utilisant la touche PrintScreen et de compresser l'image au format JPG

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.

Ce composant ocx sert a gérer une icône représentant une application dans le systray (Zone en bas à droite de la barre de taches de windows) le composant est fourni avec un programme de test mettant en oeuvre toutes les fonctionnalités.

Ce code vous permet d'obtenir des informations détaillées sur un nom de domaine.
Tutoriel associé

Comment modifier par le code la page de démarrage d'Internet Explorer

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

Récupérer des informations sur le processeur

Projet d'Assembleur de micro type 8051 à compléter. Bon amusement.
écrit en VB6