PANNEAU DE CONFIGURATION

Signaler
Messages postés
4030
Date d'inscription
mardi 13 mai 2003
Statut
Modérateur
Dernière intervention
23 décembre 2008
-
Messages postés
337
Date d'inscription
jeudi 19 décembre 2002
Statut
Membre
Dernière intervention
15 avril 2006
-
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/25890-panneau-de-configuration

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.