VB comment effacer un fichier ?

VB comment effacer un fichier ? - VB/VBA/VBS - Programmation

Marsh Posté le 18-12-2005 à 15:09:02    

Merci.
quelle est la commande à taper pour effacer un fichier ?
kill "fichier.txt" ?
delete "fichier.txt ?
 
MERCI


---------------
http://www.ypikay.com
Reply

Marsh Posté le 18-12-2005 à 15:09:02   

Reply

Marsh Posté le 19-12-2005 à 09:25:48    

Salut,
 
comme ça ??
 
dim fs
Set fs = CreateObject("Scripting.FileSystemObject" )
 
fs.deletefile (chemin & "\fichier.txt" )
 
??
 
 

Reply

Marsh Posté le 19-12-2005 à 09:36:52    

erwan83 a écrit :

Merci.
quelle est la commande à taper pour effacer un fichier ?
kill "fichier.txt" ?
delete "fichier.txt ?
 
MERCI


kill [:f1key]


---------------
"I wonder if the internal negative pressure in self pumping toothpaste tubes is adjusted for different market altitudes." John Carmack
Reply

Marsh Posté le 19-12-2005 à 17:48:15    

Merci pour le kill...
effectivement...


---------------
http://www.ypikay.com
Reply

Marsh Posté le 27-06-2008 à 10:13:38    

J'ai rentré cette commande :
 
     Dim toto
     Set WrdApp = CreateObject("Word.Application" )
     Set toto = CreateObject("Scripting.FileSystemObject" )
     
     Set wrdDoc = WrdApp.Documents.Open("C:\_Work\Extraction des entités\Extraction des entités.doc" )
     WrdApp.Visible = True
     WrdApp.Selection.WholeStory
     WrdApp.Selection.Copy
     WrdApp.ActiveDocument.Close
     
Mais il bloque sur la ligne ci dessous ?
 
     toto.killfile ("C:\_Work\Extraction des entités\Extraction des entités.doc" )
     MsgBox "le fichier Word à bien été supprimé "
     WrdApp.Quit
 
une idée, merci

Reply

Marsh Posté le 27-06-2008 à 10:19:35    

Pour compléter mon message ci-dessus, une boite de dialogue apparait qui m'informe que :
 
"vous avez placé une grande quantité de texte ds le presse papier. La conserver en vue d'une éventuelle utilisation dans d'autres applications après avoir quitté word ? "
 
merci

Reply

Marsh Posté le 27-06-2008 à 13:38:03    


Application.CutCopyMode = False


 


.....
    sChemin = ThisDocument.Path & "\" & "Test.txt"
    If Dir(sChemin, vbNormal) <> "" Then Kill sChemin
.....

Reply

Marsh Posté le 27-06-2008 à 14:12:57    

Merci pour ton aide

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed