AJUDA PARA REMOVER PROGRAMA USANDO VB6

ADEMIR 30/01/2010 10:23:40
#333223
Preciso do código em vb6 para remover ou apagar um .txt e .exe de uma pasta qualquer.
Alguem pode me ajudar!
FABAO 30/01/2010 12:19:02
#333226 Resposta escolhida
olá amigo


faça assim:

Kill ([Ô]c:    este.txt[Ô])
FABAO 30/01/2010 12:56:46
#333228


Só pra complementar:

Vale lembrar que se vc tentar excluir um arquivo que naum existe, ocorrerá um erro e seu programa fechará, pra evitar isso verifique antes se o arquivo existe assim:


If Dir$([Ô]c:    este.txt[Ô]) <> [Ô][Ô] Then
  [ô]O arquivo existe entaum posso excluir
   Kill ([Ô]c:    este.txt[Ô])
Else
  [ô]O arquivo não existe portanto naum posso excluir
End If


esse código serve para apagar qualquer tipo de arquivo ok...

spero ter ajudado...abraço
ADEMIR 30/01/2010 13:49:57
#333233
Amigo eu coloquei o código e só troquei o nome do arquivo (texte.txt por dados.txt) que é o arquivo q quero excluir mais não esta dando certo. Será q falta algo mais?

If Dir$([Ô]c:    este.txt[Ô]) <> [Ô][Ô] Then
[ô]O arquivo existe entaum posso excluir
Kill ([Ô]c:    este.txt[Ô])
Else
[ô]O arquivo não existe portanto naum posso excluir
End If

troquei por:

If Dir$([Ô]c:\dados.txt[Ô]) <> [Ô][Ô] Then
[ô]O arquivo existe entaum posso excluir
Kill ([Ô]c:\dados.txt[Ô])
Else
[ô]O arquivo não existe portanto naum posso excluir
End If

ELE SÓ EXCLUI SE ESTIVER NA UNIDADE C:\

Mais eu quero que ele exclua independente da paste que estiver!
MARCELO.TREZE 30/01/2010 14:12:39
#333236
vc quer localizar onde o arquivo está pois basta vc indicar o caminho do memso]

c:\Meus Documentos\Meu Programa\dados.txt


apenas um exemplo
ADEMIR 30/01/2010 14:42:25
#333237
Usei este código, dai ele apaga na pasta onde esta o projeto gravado

If Dir$([Ô]dados.txt[Ô]) <> [Ô][Ô] Then
[ô]O arquivo existe entaum posso excluir
Kill ([Ô]dados.txt[Ô])
Else
[ô]O arquivo não existe portanto naum posso excluir
End If

Obrigado amigos pela atenção vcs me ajudaram muito até...
Tópico encerrado , respostas não são mais permitidas
Voltar