Visual Basic215 ressources dans cette catégorie

Retrouvez ici tous les meilleurs téléchargements

Ce code envoie un signal PING sur la machine de votre choix et retourne le temps parcouru, ainsi que d'autres informations étendues.
Tutoriel associé

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

ce programme affiche 4 temps de la conjugaison pour les 2 verbes avoir et etre.

Il est possible de définir dynamiquement une plage source, en fonction du nombre de données variables d'une colonne, afin que le graphique se redimensionne automatiquement.
Consultez le classeur démo pour visualiser la mise en oeuvre et le résultat.

Il est possible d'animer l'affichage d'un UserForm.
Cet exemple affiche l'USF progressivement lors de son lancement.

Retrouvez tous les sources VBA pour les applications Microsoft Office

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.

La modification d'un fichier INI est possible sans avoir à tout réécrire et sans utilisation d'API Windows.

Pour générer vos scripts WMI !

Utilisation de la fonction API GetTickCount
En tête d'un module standard, déclarer la fonction
vb
Public Declare Function GetTickCount& Lib "kernel32" ()

puis pour l'utiliser :
vb
Sub MesureDuTempsQuiPasse()
Dim Départ As Double, arrivée As Double, Durée As Double,i As Long
Dim mn As Integer, ms As Integer, sd As Integer, tps As String
Départ = GetTickCount&
'************* ton code ********************
For i = 1 To 100000 'remplace le déroulement du code
DoEvents
Next
'*****************************************
arrivée = GetTickCount&
Durée = arrivée - Départ
mn = Int(Durée / 1000 / 60)
sd = Int((Durée ... Voir la suite

13 VbScript utiles pour réaliser la maintenance d'un PC en tâche de fond, testés sous XP SP3 et IE8.
1°) Indique la taille, le système de fichiers, l'espace libre (en Go et %), le taux de fragmentation, le modèle, le n° de série, des infos sur les clusters des disques durs, etc.
2°) Indique la température des disques durs (source VB6 modifié de vbfrance) via un exécutable incorporé dans un VBscript.
3°) Utilitaires pour lister les points de restauration.
4°) Utilitaires pour incorporer un exécutable zippé ou non dans un vbscript qui se lance et est ensuite effacé. Implémente des boîtes de dialogue d'entrée (exe) et de sortie (vbs).
5°) Utilitaires pour signer et/ou pour vérifier la signature d'un vbscript. Implément ... Voir la suite

C'est un Vbscript pour uploader un dossier avec tout son contenu (Tout les fichiers) dans votre serveur FTP.C'est un genre d'upload Multiple.
Le Script est de simple utilisation , il vous suffit juste de l'éditer et de modifier les 3 paramètres:
1- Le Nom de votre Serveur FTP
2- Le Nom d’utilisateur (Login)
3- Le Mot de passe

Vous êtes sur un autre ordinateur que vous, soit chez des amis ou dans un cybercafé ?
Vous voulez ajouter, modifier, supprimer des fichiers ou des dossiers sur votre serveur FTP ?
Pas de chance, vous n'avez pas de programmes sous la main comme des clients FTP (FileZilla, CuteFTP, FlashFXP. Etc...) pour accéder à votre serveur FTP Personnel !
Pas de problème => FTP Explorer est la solution pour transformer votre navigateur web ou bien votre windows explorer en client FTP !

Pour connaître le pourcentage de la charge de votre CPU en utilisant les couleurs suivant CPU% :

• vert si CPU% < 20%
• Orange si 20% < CPU% < 70%
• Rouge si CPU% > 70%

Ce script regarde si il y a des mises a jour applicable, les installes et peut redémarrer la machine, il intègre un module d'envoie de TRAP SNMP mais pour le faire fonctionner il faut télécharger l'outils SnmpTrapGen téléchargeable ici.

http://www.snmpsoft.com/freetools/snmptrapgen.html

Il a été écrit dans une contrainte de reboot mensuel des serveurs Windows.

Il s'agit de la recherche de dates(entre deux autres) correspondant au même jour de la semaine, un anniversaire par exemple qui tomberait le jeudi ou un autre jour de la semaine.
Il est à noter que la date de début doit être valide surtout dans le cas du 29 février.

Il s'agit de la recherche des constantes correspondant au dernier paramètre(RootFolder) de la fonction BrowseForFolder(HWnd, Title, Options, RootFolder)
Ces constantes une fois trouvées peuvent remplacer les noms explicites des dossiers.
Il y a par exemple Poste de travail et Favoris réseau qui sont indiqués respectivement par ::{20D04FE0-3AEA-1069-A2D8-08002B30309D} et ::{208D2C60-3AEA-1069-A2D7-08002B30309D} où les noms ne peuvent être utilisés car cela pointerait sur Mes documents

Ce classeur permet de sélectionner les séries à afficher depuis une boîte de dialogue.
Vous pouvez aussi choisir la plage de données source en paramétrant une date de début et de fin.

La procédure permet de personnaliser les labels qui s'affichent lorsque que le curseur de la souris passe au dessus des points du graphique. Les labels sont créés dynamiquement et vous pouvez y afficher toutes les informations que vous souhaitez. Les labels suivent le curseur de la souris.

Le graphique doit être préalablement activé.


Créé avec Excel 2007.

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 :

' PARAMETRES BOITE MAIL :

Const stUser = "bbil"

Const stPass ="MotDepasse"

Const stServeurPOP = "pop.Fournisseur.fr"

Const numPort = 110