Need help checking existance and deleting a file in VB.Net

I have the following code in my VB.Net app which copies a file from one filepath and moves it to another filepath (see code below).

I want to be able to:
1. Check to see if the file already exists in the destination filepath
2. If the file exists, I want to delete it before copying over the new file
3. Finally, I want to copy the file from the source file path to the destination file path

How do i do this?  Thanks in advance mrotor


MY CURRENT CODE USED TO COPY FILE FROM ONE FILEPATH TO ANOTHER

Dim filename As String = "MYFile.txt" '"TestFile.txt"
Dim source As String = Trim("\\TEST_DIRECTORY\ACCOUNT\")
Dim destination As String = System.IO.Path.Combine("\\FINAL_DIRECTORY\PROD\", filename)
System.IO.File.Copy(source, destination, True)

Open in new window

mainrotorAsked:
Who is Participating?

[Webinar] Streamline your web hosting managementRegister Today

x
 
Gregory MillerConnect With a Mentor General ManagerCommented:
If My.Computer.FileSystem.FileExists("\\TEST_DIRECTORY\ACCOUNT\MYFile.txt") Then
    File.Delete("\\TEST_DIRECTORY\ACCOUNT\MYFile.txt")
    File.Copy("\\OTHER_TEST_DIRECTORY\ACCOUNT\MYFile.txt","\\TEST_DIRECTORY\ACCOUNT\MYFile.txt")
Else
    MsgBox("File not found.")
End If

Open in new window

0
 
David Johnson, CD, MVPOwnerCommented:
Dim filename As String = "MYFile.txt" 
Dim source As String = Trim("\\TEST_DIRECTORY\ACCOUNT\")
Dim destination As String = System.IO.Path.Combine("\\FINAL_DIRECTORY\PROD\", filename)
dim filesys
Set filesys = CreateObject("Scripting.FileSystemObject")
If filesys.FileExists(destination) Then filesys.DeleteFile destination
End If 
filesys.CopyFile source,destination,true
set filesys = nothing

Open in new window

0
 
Bob BenderCommented:
I found a block of VB code on MSDN that copies files ( txt and jpg ) from a source folder to a destination folder, then deletes the source folder files.  

Not a big believer in writing the code for anyone.  After all, being able to modify the code to make it do what you want is the goal of all developers.  How else can you learn.


http://msdn.microsoft.com/en-us/library/system.io.file.delete(v=vs.110).aspx?cs-save-lang=1&cs-lang=vb#code-snippet-2


The Try/Catch routine is so that it can throw an exception in case of a problem.

To check that a file exists....

     File.Exists(filename) ? "File exists." : "File does not exist."

The ? in the statement is an IF condition...,  1st option is true, second one (after the :) is false.

Can follow if you have questions

bob
0
All Courses

From novice to tech pro — start learning today.