Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Développement Développement Visual Basic Formater A ou Deltree A, comment ???

Formater A ou Deltree A, comment ???

26 réponses
Avatar
LE TROLL
Bonjour,

J'ai un problème, sans faire de bat, je n'arrive pas depuis le code VB à
formater rapidement ou a supprimer tous les répertoires pleins (A), où est
l'erreur ???

Shell "command.com /format a:/q"

Shell "command.com /deltree a:*.*"

Merci, au revoir et à bientôt.
--
ng75 arobase noos.fr
------------------------------------------------------------
LE TROLL, éleveur de trolls depuis César, qui disait :
Avec une hache, celui qui tient le manche a toujours raison !
Signaler un problème avec ce contenu

10 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
1 2 3
Avatar
Gilles RONSIN
"LE TROLL" <le , le mer. 29 déc. 2004 20:20:07,
écrivait ceci:

Suite...
Marche pas, mais je ne sais même pas si c'est bon car tu mets:
shell "command.com /c format a: /q"
Mais si j'écris sous dos je mettrais:

format a:/q
c: format a:/q

Alors, pas d'espace entre /q
L'unité prend : c:
Même le 1er slash, je ne sais pas s'il est dans le bon sens...

Bref, ça marche pas lol :o) ?????????



Sous DOS, l'espace est LE séparateur de commande (ou tabulation)
comme le / ou - est aussi un séparateur, l'espace est parfois optionnel
(ça dépend comment le développeur a traité la chaine de commande)
donc la syntaxe correcte est :

format c: /q

si ta commande n'est pas dans un répertoire référencé dans le path

x:dossierdossierformat c: /q



--
Embryon de site : http://gilles.ronsin.free.fr
Nouvelle astuce : Script de création de raccourcis cible
http://gilles.ronsin.free.fr/#targetlnk
Il est impossible pour un optimiste d'être agréablement surpris.
Avatar
Gilles RONSIN
"LE TROLL" <le , le mer. 29 déc. 2004 20:56:22,
écrivait ceci:

Ah, merci, mais c'est quoi cet api qui formate une
disquette /q ???



ça lance l'utilitaire de formatage en mode fenêtré mais avec
intervention humaine.
Declare Function SHFormatDrive Lib "shell32" ( _
ByVal hwndOwner As Long, _
ByVal iDrive As Long, _
ByVal iCapacity As Long, _
ByVal iFormatType As Long _
) As Long

Dim lResult As Long

lResult = SHFormatDrive(Me.hwnd, 0, 0, 0)
Select Case lResult
Case Is = -3
MsgBox "Failure, drive can't be formatted", vbCritical, "ERROR"
Exit Sub
Case Is = -2
MsgBox "Operation has been cancelled"
Exit Sub
Case Is = -1
MsgBox "Operation attempted but completed unsuccessfully"
Exit Sub
End Select


--
Embryon de site : http://gilles.ronsin.free.fr
Nouvelle astuce : Script de création de raccourcis cible
http://gilles.ronsin.free.fr/#targetlnk
Il est impossible pour un optimiste d'être agréablement surpris.
Avatar
LE TROLL
Bon, ben merci, j'ai fait autre chose, et ça marche!!!
Dim pf1 As Long
Dim ordre As String
ordre = "@echo o | format a:/q"
pf1 = FreeFile
Open "format_a.bat" For Output As pf1
Print #pf1, ordre
Close pf1
Shell "format_a.bat", vbHide

"Gilles RONSIN" a écrit dans le message de news:

"LE TROLL" <le , le mer. 29 déc. 2004 20:09:03,
écrivait ceci:

Re,

Mauvaise syntaxe, lol, idem, c'est refusé:

Shell "command.com /c format a: /q"
' 5 syntaxe



bon j'ai pas de W98 sous la main j'ai fait de mémoire et avec xp
cmd /c format a: /q
marche bien

Shell "commande.com /c deltree /y a:*.*"
' 53 fic introuvable



la je comprend pas, deltree.exe est normalement dans le répertoire
windowscommand peut être as tu perdus le path correspondant.


Si t'as une autre syntaxe ???


il faudrait que je retrouve un 98 pour tester...

--
Embryon de site : http://gilles.ronsin.free.fr
Nouvelle astuce : Script de création de raccourcis cible
http://gilles.ronsin.free.fr/#targetlnk
Il est impossible pour un optimiste d'être agréablement surpris.


Avatar
LE TROLL
Bon, ben merci, j'ai fait autre chose, et ça marche!!!
Dim pf1 As Long
Dim ordre As String
ordre = "@echo o | format a:/q"
pf1 = FreeFile
Open "format_a.bat" For Output As pf1
Print #pf1, ordre
Close pf1
Shell "format_a.bat", vbHide

"ng" a écrit dans le message de news:
%
PS: il y a un article sur la fac pour ca :
http://faq.vb.free.fr/index.php?question3

--
Nicolas G.
FAQ VB : http://faq.vb.free.fr
API Guide : http://www.allapi.net
Google Groups : http://groups.google.fr/
MZ-Tools : http://www.mztools.com/

ng wrote:
Salut,

Il y a une API pour faire un formatage et une pour faire de la
suppression récursive.

De plus qui te dit que l'interpreteur de commande est command.com ?
c'est vrai sous win9x mais sous xp/2000... c'est cmd.exe.
Il exitse donc une variables d'environnement pour ca : COMSPEC
On la recupère donc avec Environ$("COMSPEC").


LE TROLL wrote:
Bonjour,

J'ai un problème, sans faire de bat, je n'arrive pas depuis le
code VB à formater rapidement ou a supprimer tous les répertoires
pleins (A), où est l'erreur ???

Shell "command.com /format a:/q"

Shell "command.com /deltree a:*.*"

Merci, au revoir et à bientôt.








Avatar
LE TROLL
Bon, ben merci, j'ai fait autre chose, et ça marche!!!
Dim pf1 As Long
Dim ordre As String
ordre = "@echo o | format a:/q"
pf1 = FreeFile
Open "format_a.bat" For Output As pf1
Print #pf1, ordre
Close pf1
Shell "format_a.bat", vbHide

"Zoury" <yanick_lefebvre at hotmail dot com> a écrit dans le message de
news:
fait une recherche sur vbnet.mvps.org tu trouveras un exemple.


http://vbnet.mvps.org/code/shell/undocformatdlg.htm

j'avais le lien ouvert... :OP




Avatar
Lorex
Salut, (petit ajout d'explication...)

le "/c" te permet d'executer la ligne de commande qui est fournie en
paramètre au fichier de commande....

a+

Laurent

"Gilles RONSIN" a écrit dans le message de
news:
"LE TROLL" <le , le mer. 29 déc. 2004 18:55:50,
écrivait ceci:

> Bonjour,
Salut

> J'ai un problème, sans faire de bat, je n'arrive pas depuis le
> code VB à
> formater rapidement ou a supprimer tous les répertoires pleins
> (A), où est l'erreur ???
mauvaise syntaxe

> Shell "command.com /format a:/q"
shell "command.com /c format a: /q"

> Shell "command.com /deltree a:*.*"
shell "commande.com /c deltree /y a:*.*"

--
Embryon de site : http://gilles.ronsin.free.fr
Nouvelle astuce : Script de création de raccourcis cible
http://gilles.ronsin.free.fr/#targetlnk
Il est impossible pour un optimiste d'être agréablement surpris.


Avatar
ng
Attention, deltree n'est pas fournis avec tous les windows !


--
Nicolas G.
FAQ VB : http://faq.vb.free.fr
API Guide : http://www.allapi.net
Google Groups : http://groups.google.fr/
MZ-Tools : http://www.mztools.com/

Gilles RONSIN wrote:
"LE TROLL" <le , le mer. 29 déc. 2004 20:09:03,
écrivait ceci:

Re,

Mauvaise syntaxe, lol, idem, c'est refusé:

Shell "command.com /c format a: /q"
' 5 syntaxe



bon j'ai pas de W98 sous la main j'ai fait de mémoire et avec xp
cmd /c format a: /q
marche bien

Shell "commande.com /c deltree /y a:*.*"
' 53 fic introuvable



la je comprend pas, deltree.exe est normalement dans le répertoire
windowscommand peut être as tu perdus le path correspondant.


Si t'as une autre syntaxe ???


il faudrait que je retrouve un 98 pour tester...


Avatar
ng
Ca marche mais ce n'est pas très élégant :/
Si tu veux juste faire un formatage rapide, fait simplement une suppression
recursive.

--
Nicolas G.
FAQ VB : http://faq.vb.free.fr
API Guide : http://www.allapi.net
Google Groups : http://groups.google.fr/
MZ-Tools : http://www.mztools.com/

LE TROLL wrote:
Bon, ben merci, j'ai fait autre chose, et ça marche!!!
Dim pf1 As Long
Dim ordre As String
ordre = "@echo o | format a:/q"
pf1 = FreeFile
Open "format_a.bat" For Output As pf1
Print #pf1, ordre
Close pf1
Shell "format_a.bat", vbHide

"Zoury" <yanick_lefebvre at hotmail dot com> a écrit dans le message
de news:
fait une recherche sur vbnet.mvps.org tu trouveras un exemple.


http://vbnet.mvps.org/code/shell/undocformatdlg.htm

j'avais le lien ouvert... :OP




Avatar
LE TROLL
Mauvaise vue... j'utilise "format/q"
--

"ng" a écrit dans le message de news:

Attention, deltree n'est pas fournis avec tous les windows !


--
Nicolas G.
FAQ VB : http://faq.vb.free.fr
API Guide : http://www.allapi.net
Google Groups : http://groups.google.fr/
MZ-Tools : http://www.mztools.com/

Gilles RONSIN wrote:
"LE TROLL" <le , le mer. 29 déc. 2004 20:09:03,
écrivait ceci:

Re,

Mauvaise syntaxe, lol, idem, c'est refusé:

Shell "command.com /c format a: /q"
' 5 syntaxe



bon j'ai pas de W98 sous la main j'ai fait de mémoire et avec xp
cmd /c format a: /q
marche bien

Shell "commande.com /c deltree /y a:*.*"
' 53 fic introuvable



la je comprend pas, deltree.exe est normalement dans le répertoire
windowscommand peut être as tu perdus le path correspondant.


Si t'as une autre syntaxe ???


il faudrait que je retrouve un 98 pour tester...






Avatar
ng
fait aussi attention au comspec.

--
Nicolas G.
FAQ VB : http://faq.vb.free.fr
API Guide : http://www.allapi.net
Google Groups : http://groups.google.fr/
MZ-Tools : http://www.mztools.com/

LE TROLL wrote:
Mauvaise vue... j'utilise "format/q"

"ng" a écrit dans le message de news:

Attention, deltree n'est pas fournis avec tous les windows !


--
Nicolas G.
FAQ VB : http://faq.vb.free.fr
API Guide : http://www.allapi.net
Google Groups : http://groups.google.fr/
MZ-Tools : http://www.mztools.com/

Gilles RONSIN wrote:
"LE TROLL" <le , le mer. 29 déc. 2004 20:09:03,
écrivait ceci:

Re,

Mauvaise syntaxe, lol, idem, c'est refusé:

Shell "command.com /c format a: /q"
' 5 syntaxe



bon j'ai pas de W98 sous la main j'ai fait de mémoire et avec xp
cmd /c format a: /q
marche bien

Shell "commande.com /c deltree /y a:*.*"
' 53 fic introuvable



la je comprend pas, deltree.exe est normalement dans le répertoire
windowscommand peut être as tu perdus le path correspondant.


Si t'as une autre syntaxe ???


il faudrait que je retrouve un 98 pour tester...






1 2 3