OVH Cloud OVH Cloud

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 !

6 réponses

1 2 3
Avatar
LE TROLL
Ben non, "format/q" est econnu par les 2... ça marche sans problème...
---------

"ng" a écrit dans le message de news:
%
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...










Avatar
ng
Effectivement je n'avais pas vu que tu avais changé ton shell() par la
création d'un fichier bat.
D'ailleurs pourquoi ce choix ? Le shell était plus propre.

--
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:
Ben non, "format/q" est econnu par les 2... ça marche sans
problème... ---------

"ng" a écrit dans le message de news:
%
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...










Avatar
LE TROLL
Ah l'ami, pourquoi ce choix, lol, je vais te dire:
Je veux juste faire une sauvegarde de mes fichiers txt d'applie, donc
- je purge la disquette Kill
-je vois que ça ne supprime pas les répertoires, et encore moins (non vides)
- je fais une ligne de commande avec Shell
- la syntaxe est mauvaise, on me la corrige, mais ça plante encore
- après toi tu me dis qu'il faut tester l'environnement pour les commandes
DOS
- On me dit de faire une suppression récurante...
- On me dit qu'une API fait ça, sauf que c'est avec la boîte (j'veux de
l'automatique)
- Ça, ça a duré 3, 4 heures...

Alors j'en n'avais "plein les couilles", j'ai fait un bon vieux BAT et ça
marche du tonnerre (je le supprime après)...
Ce qui est bien en programmation c'est que souvent tu as 3, 4 solutions :o)
-------------


"ng" a écrit dans le message de news:
%
Effectivement je n'avais pas vu que tu avais changé ton shell() par la
création d'un fichier bat.
D'ailleurs pourquoi ce choix ? Le shell était plus propre.

--
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:
Ben non, "format/q" est econnu par les 2... ça marche sans
problème... ---------

"ng" a écrit dans le message de news:
%
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...














Avatar
ng
Salut,

Ce n'est pourtant pas compliqué, une ligne :

Call Shell(Environ$("COMSPEC") & " /c @echo o | format a: /q",
vbNormalFocus)

Je viens de tester (j'atnitcipe) sous XP/2000/98.

--
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:
Ah l'ami, pourquoi ce choix, lol, je vais te dire:
Je veux juste faire une sauvegarde de mes fichiers txt d'applie, donc
- je purge la disquette Kill
-je vois que ça ne supprime pas les répertoires, et encore moins (non
vides) - je fais une ligne de commande avec Shell
- la syntaxe est mauvaise, on me la corrige, mais ça plante encore
- après toi tu me dis qu'il faut tester l'environnement pour les
commandes DOS
- On me dit de faire une suppression récurante...
- On me dit qu'une API fait ça, sauf que c'est avec la boîte (j'veux
de l'automatique)
- Ça, ça a duré 3, 4 heures...

Alors j'en n'avais "plein les couilles", j'ai fait un bon vieux BAT
et ça marche du tonnerre (je le supprime après)...
Ce qui est bien en programmation c'est que souvent tu as 3, 4
solutions :o) -------------


"ng" a écrit dans le message de news:
%
Effectivement je n'avais pas vu que tu avais changé ton shell() par
la création d'un fichier bat.
D'ailleurs pourquoi ce choix ? Le shell était plus propre.

--
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:
Ben non, "format/q" est econnu par les 2... ça marche sans
problème... ---------

"ng" a écrit dans le message de news:
%
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...














Avatar
LE TROLL
Attends, j'ai un autre problème car j'ai modifié mon code (c'était
trop le bordel avec des goto et gosub), maintenant ça ne marche plus, à
cause je crois que c'est asynchrone, donc le formatage n'a pas le temps de
se terminer, que c'est enchaîné par la sauvegarde qui annule le formatage
(enfin, je pense), voici mon code:

Sub sauvegarde() ' sauvegarde
Dim ordre As String
Dim source As String
Dim cible As String
'
Screen.MousePointer = vbHourglass
ordre = "@echo o | format a:/q"
pf13 = FreeFile
Open "format_a.bat" For Output As pf13
Print #pf13, ordre
Close pf13
'------------------------------IL A PAS LE TEMPS DE FORMATER---
On Error GoTo erreur
Call Shell(Environ$("COMSPEC") & " /c @echo o | format a: /q", vbHide)
'Shell "format_a.bat", vbHide
'---------------------------------------------------------------------------
source = App.Path & "Noms_C.txt"
cible = "a:Noms_C.txt"
FileCopy source, cible
source = App.Path & "Libel_C.txt"
cible = "a:Libel_C.txt"
FileCopy source, cible
'
For i = 0 To List2.ListCount - 1
source = App.Path & "" & List2.List(i) & "_C.txt"
cible = "a:" & List2.List(i) & "_C.txt"
FileCopy source, cible
Next i
'
Screen.MousePointer = Default
MsgBox "SAUVEGARDE: Terminée ", vbInformation
List2.Clear
Kill "Format_A.bat"
Exit Sub
'
erreur:

T'as une idée (à part un Timer)???
----------


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

Salut,

Ce n'est pourtant pas compliqué, une ligne :

Call Shell(Environ$("COMSPEC") & " /c @echo o | format a: /q",
vbNormalFocus)

Je viens de tester (j'atnitcipe) sous XP/2000/98.

--
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:
Ah l'ami, pourquoi ce choix, lol, je vais te dire:
Je veux juste faire une sauvegarde de mes fichiers txt d'applie, donc
- je purge la disquette Kill
-je vois que ça ne supprime pas les répertoires, et encore moins (non
vides) - je fais une ligne de commande avec Shell
- la syntaxe est mauvaise, on me la corrige, mais ça plante encore
- après toi tu me dis qu'il faut tester l'environnement pour les
commandes DOS
- On me dit de faire une suppression récurante...
- On me dit qu'une API fait ça, sauf que c'est avec la boîte (j'veux
de l'automatique)
- Ça, ça a duré 3, 4 heures...

Alors j'en n'avais "plein les couilles", j'ai fait un bon vieux BAT
et ça marche du tonnerre (je le supprime après)...
Ce qui est bien en programmation c'est que souvent tu as 3, 4
solutions :o) -------------


"ng" a écrit dans le message de news:
%
Effectivement je n'avais pas vu que tu avais changé ton shell() par
la création d'un fichier bat.
D'ailleurs pourquoi ce choix ? Le shell était plus propre.

--
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:
Ben non, "format/q" est econnu par les 2... ça marche sans
problème... ---------

"ng" a écrit dans le message de news:
%
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...


















Avatar
ng
> ordre = "@echo o | format a:/q"
pf13 = FreeFile
Open "format_a.bat" For Output As pf13
Print #pf13, ordre
Close pf13


tu n'a plus besoin de cela.

IL A PAS LE TEMPS DE FORMATER


dans ce cas il faut attendre la fin de format (cf ShellAndWait() sur google,
j'en ai posté plusierus versions).


--
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:
Attends, j'ai un autre problème car j'ai modifié mon code
(c'était trop le bordel avec des goto et gosub), maintenant ça ne
marche plus, à cause je crois que c'est asynchrone, donc le formatage
n'a pas le temps de se terminer, que c'est enchaîné par la sauvegarde
qui annule le formatage (enfin, je pense), voici mon code:

Sub sauvegarde() ' sauvegarde
Dim ordre As String
Dim source As String
Dim cible As String
'
Screen.MousePointer = vbHourglass
ordre = "@echo o | format a:/q"
pf13 = FreeFile
Open "format_a.bat" For Output As pf13
Print #pf13, ordre
Close pf13
'------------------------------IL A PAS LE TEMPS DE FORMATER---
On Error GoTo erreur
Call Shell(Environ$("COMSPEC") & " /c @echo o | format a: /q",
vbHide) 'Shell "format_a.bat", vbHide

'---------------------------------------------------------------------------
source = App.Path & "Noms_C.txt"
cible = "a:Noms_C.txt"
FileCopy source, cible
source = App.Path & "Libel_C.txt"
cible = "a:Libel_C.txt"
FileCopy source, cible
'
For i = 0 To List2.ListCount - 1
source = App.Path & "" & List2.List(i) & "_C.txt"
cible = "a:" & List2.List(i) & "_C.txt"
FileCopy source, cible
Next i
'
Screen.MousePointer = Default
MsgBox "SAUVEGARDE: Terminée ", vbInformation
List2.Clear
Kill "Format_A.bat"
Exit Sub
'
erreur:

T'as une idée (à part un Timer)???
----------


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

Salut,

Ce n'est pourtant pas compliqué, une ligne :

Call Shell(Environ$("COMSPEC") & " /c @echo o | format a: /q",
vbNormalFocus)

Je viens de tester (j'atnitcipe) sous XP/2000/98.

--
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:
Ah l'ami, pourquoi ce choix, lol, je vais te dire:
Je veux juste faire une sauvegarde de mes fichiers txt d'applie,
donc - je purge la disquette Kill
-je vois que ça ne supprime pas les répertoires, et encore moins
(non vides) - je fais une ligne de commande avec Shell
- la syntaxe est mauvaise, on me la corrige, mais ça plante encore
- après toi tu me dis qu'il faut tester l'environnement pour les
commandes DOS
- On me dit de faire une suppression récurante...
- On me dit qu'une API fait ça, sauf que c'est avec la boîte (j'veux
de l'automatique)
- Ça, ça a duré 3, 4 heures...

Alors j'en n'avais "plein les couilles", j'ai fait un bon vieux BAT
et ça marche du tonnerre (je le supprime après)...
Ce qui est bien en programmation c'est que souvent tu as 3, 4
solutions :o) -------------


"ng" a écrit dans le message de news:
%
Effectivement je n'avais pas vu que tu avais changé ton shell() par
la création d'un fichier bat.
D'ailleurs pourquoi ce choix ? Le shell était plus propre.

--
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:
Ben non, "format/q" est econnu par les 2... ça marche sans
problème... ---------

"ng" a écrit dans le message de news:
%
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