کپی کردن یک فایل

[Ship Storm]

سلام دوستان
من یک مشکل برخوردم
میخوام یک فایل رو کپی کنم حتی اگر وجود هم داشت بریزه فایل رو روی همون قبلیه ولی نمیدونم چرا همچین کاری صورت نمیگیره علت چیه ؟
این کد من :



Private Sub btnCopyFile_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCopyFile.Click
Dim text1 As String = TextBox1.Text + "\Automation.mdf"
Dim text2 As String = TextBox2.Text + "\Automation.mdf"
My.Computer.FileSystem.CopyFile(text1, text2, True)
My.Computer.FileSystem.CopyFile(text1.Replace(".mdf", "") + "_log.ldf", text2.Replace(".mdf", "") + "_log.ldf", True)
Timer2.Enabled = True
Dim src As String = TextBox1.Text
Dim dest As String = IO.Path.Combine(TextBox2.Text, IO.Path.GetFileName(src))
If Not IO.Directory.Exists(dest) Then IO.Directory.CreateDirectory(dest)
My.Computer.FileSystem.CopyDirectory(src, dest, True)
End Sub


حالا اگر بخوام کاری کنم که اگر فایل وجود داشت یک پیغام بده به کاربر از طریق vbyesno و در صورت کلیک روی yes فایل جدید رو بریزه رو قبلی اون چطور میشه کدش ؟
ممنون

اینم شکل این فرم کپی کردن فایل :
http://upload.tehran98.com/img1/yz7jlsrpt7lu1scuq5q.jpg

[shahryari]

سلام
Dim text1 As String = TextBox1.Text + "\Automation.mdf"
Dim text2 As String = TextBox2.Text + "\Automation.mdf"
If IO.File.Exists(text2) = True Then
If MsgBox("این فایل وجود دارد آیا ادامه میدهید؟", MsgBoxStyle.YesNo, "پیام") = MsgBoxResult.Yes Then
IO.File.Copy(text1, text2, True)
End If
End If