can someone give the me the starting point of a ca file cleaner?

[Ragehax]

i thought it was

If My.Computer.FileExists("file name") = True Then
Kill("file name")

but i get an error... anyone help?

[Iamazn1]

i thought it was

If My.Computer.FileExists("file name") = True Then
Kill("file name")

but i get an error... anyone help?

Dim BFD as new FolderBrowserDialog
BFD.ShowDialog()
Dim CAPath as String = BFD.FolderPath.ToString 'Something like that
Kill(CAPath & "*.TMP")

[ac1d_buRn]

Dim OFD as New OpenFileDialog
OFD.ShowDialog()
Dim CAFolder as String = OFD.FileName.ToString
Kill(CAFolder & "*.TMP")

[Iamazn1]

Dim OFD as New OpenFileDialog
OFD.ShowDialog()
Dim CAFolder as String = OFD.FileName.ToString
Kill(CAFolder & "*.TMP")

Thats not guna work. That will prompt for a OpenFILEDialog, not a FOLDER.

[Ian]

can some1 just give me a tutorial or source code for ca cleaner?

[XGelite]

just do this ~

its the easiest way

 
 On Error Resume Next  ' or you can do On Error GoTo 1 

        System.IO.File.SetAttributes("C:\Nexon\Combat Arms\HShield\Ahnrpt.exe", System.IO.FileAttributes.Normal) 'ahnrpt from read only to normal
        System.IO.File.SetAttributes("C:\Nexon\Combat Arms\EndingBanner.exe", System.IO.FileAttributes.Normal) 'changes ending banner from read only to normal

        Kill("C:\Nexon\Combat Arms\EndingBanner.exe")
     
        Kill("C:\Nexon\Combat Arms\HShield\Ahnrpt.exe")

1:  MsgBox "Error: " & Err.Description

[Zoom]

just do this ~

its the easiest way

 
 On Error Resume Next  ' or you can do On Error GoTo 1 

        System.IO.File.SetAttributes("C:\Nexon\Combat Arms\HShield\Ahnrpt.exe", System.IO.FileAttributes.Normal) 'ahnrpt from read only to normal
        System.IO.File.SetAttributes("C:\Nexon\Combat Arms\EndingBanner.exe", System.IO.FileAttributes.Normal) 'changes ending banner from read only to normal

        Kill("C:\Nexon\Combat Arms\EndingBanner.exe")
     
        Kill("C:\Nexon\Combat Arms\HShield\Ahnrpt.exe")

1:  MsgBox "Error: " & Err.Description

Will not work if you have combat arms in another directory

[XGelite]

Will not work if you have combat arms in another directory

then just change the file paths ( duh! )

[Zoom]

then just change the file paths ( duh! )

True........

To kill all textfile use: Kill("*.TXT")