Formatage disques durs/disquettes

Soyez le premier à donner votre avis sur cette source.

Snippet vu 5 930 fois - Téléchargée 61 fois

Contenu du snippet

quelques infos sur l'API SHFormatDrive qui n'est pas très documenté ni sur MSDN ni sur le support online de microsoft.

Source / Exemple :


'
'constantes de type de formatage
Public Const SHFD_FORMATE_RAPIDE = 0        ' formatage rapide
Public Const SHFD_FORMATE_COMPLET = 1          'formatage complet
Public Const SHFD_FORMATE_SYS = 2       'formatage système seulement

'constantes de type de formatage
Public Const SHFD_CAPACITE_DEFAUT = 0  'capacité par défaut

'API
Declare Function SHFormatDrive Lib "shell32" (ByVal hwnd As Long, ByVal disque As Long, ByVal Capacite As Long, ByVal TypeFormatage As Long) As Long

'exemple d'appel
Select Case SHFormatDrive(Me.hwnd, 2, SHFD_CAPACITE_DEFAUT, SHFD_FORMAT_COMPLET)
Case -2: MsgBox "Formatage annulée", vbInformation, "Formatage"
Case -3: MsgBox "Le disque est actuellement utilisé par Windows", vbInformation, "Formatage"
Case -1: MsgBox "Une erreur est survenue durant le processus de formatage", vbCritical, "Formatage"
Case Else: MsgBox "Formatage terminé"
End Select

'2 correspond au numéro du disque à formater.

A voir également

Ajouter un commentaire

Commentaires

Messages postés
5
Date d'inscription
lundi 2 août 2004
Statut
Membre
Dernière intervention
11 février 2006

merçi Pas mal (^_^)
Messages postés
137
Date d'inscription
samedi 11 septembre 2004
Statut
Membre
Dernière intervention
10 septembre 2006

Ok ça marche pour le reste....
Messages postés
137
Date d'inscription
samedi 11 septembre 2004
Statut
Membre
Dernière intervention
10 septembre 2006

Messieur! Vous êtes sur d'avoir essaiyé ce code pour dire qu'il est super???? il manque un "e" à un endroit...
pour qu'il fonctionne... j'en suis là et ça ne fonctionne toujours pas... c'est à ce demandé si certains ne mettent pas de commentaire pour faire beau dans le paysage.@+ Sator
Messages postés
137
Date d'inscription
samedi 11 septembre 2004
Statut
Membre
Dernière intervention
10 septembre 2006

A acidtoxik, chez moi ça ne fonctionne pas... WinXPPro avec service pack 2... est-ce que tu sais pourquoi?
où le drive est un chiffre... pourrais-tu donner un exemple concret... ce qui me permet de faire une transition....
sub-zero ayant peu de connaissance en ce qui concerne les apis pourrais-tu faire un prog pour voir comment il fonctionne... stp
Messages postés
98
Date d'inscription
mercredi 22 novembre 2000
Statut
Membre
Dernière intervention
12 juillet 2005

tsssssss /q c pour quick (formatage rapide) mais bon ca appelle un fichier de commande (format.com) et c tout sauf de la programmation propre et je ne gère pas les sections bidouilles plus les apis :)
Afficher les 9 commentaires

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.