Panneau de configuration

Soyez le premier à donner votre avis sur cette source.

Vue 10 390 fois - Téléchargée 870 fois

Description

paneau de configuration

Source / Exemple :


'paneau de configuration

Conclusion :


paneau de configuration

Codes Sources

A voir également

Ajouter un commentaire Commentaires
Messages postés
337
Date d'inscription
jeudi 19 décembre 2002
Statut
Membre
Dernière intervention
15 avril 2006

Sinon code plutôt interessant

les lignes Shell "rundll32.exe shell32.dll,Control_RunDLL " + _tatatata

peuvent être remplacer par cette déclaration

Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Const SW_SHOWNORMAL = 1

....
....
puis par cette appel

ShellExecute Me.hwnd, vbNullString, _tatatata, vbNullString, "", SW_SHOWNORMAL


la difference est que ShellExecute utilise le lancement par defaut du système mais en principe le résultat ne devrait jms être different
Messages postés
337
Date d'inscription
jeudi 19 décembre 2002
Statut
Membre
Dernière intervention
15 avril 2006

econs >>

8 Go rentre sans aucun probleme dans un double !!!
Le problème vien du fait que SectorsPerCluster, BytesPerSector et NumberOfFreeClusters sont 3 Long. VB Multiplie les 2 premier Long et renvoi un Long qu'il remultiplie avec le 3eme qui renvoi un Long... plus grand que 4 giga --> Overflow avant de transformer le long en double

Remplace cette ligne par CDbl(SectorsPerCluster) * BytesPerSector * NumberOfFreeClusters
Messages postés
592
Date d'inscription
samedi 19 janvier 2002
Statut
Membre
Dernière intervention
4 décembre 2008

Ya quand meme des truc que taurais pu integrer au prog , genre changer l'heure/la date .

@++
YoMan64
Messages postés
4030
Date d'inscription
mardi 13 mai 2003
Statut
Modérateur
Dernière intervention
23 décembre 2008
22
Pareil que pour ton autre source du jour : une capture d'écran aurait pû être sympathique.

Ton appli est jolie. Fais-en profiter les autres !

Un bug détecté : Calcul de l'espace disque restant.
La valeur est calculée sur un nombre Double.
Mais voilà, j'ai 8 Go d'espace libre, et çà ne rentre pas dans un Double.

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.