Visual Basic - sobre escribir archivo

hola amigos tengo el siguiente problema, estoy generando un archivo en la unidad c: de tipo archivo.dbf pero cuando quiero sobreeescribirlo no me deja y tengo que estar eliminandolo para poder tener la informacion mas reciente.

en visul me aprece un mensaje que dice archivo ya existe, per en ves de edo me gustria que me diera la opcion de sobre escribirlo.

si alguien conoce la manera se lo agradeceria saludos y gracias de antemano

Cual es el metodo q usas para guardar los archivos ??

*************************aqui creo el archivo DBF************************
cat.ActiveConnection = _
"Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=C:\temp;" & _
"Extended Properties=dBase III;"

tbl.Name = "logo"
tbl.Columns.Append "rut", adDate, 25
tbl.Columns.Append "nombre", adVarWChar, 5
tbl.Columns.Append "fecha", adVarWChar, 30
cat.Tables.Append tbl

Set Rs = New ADODB.Recordset

Rs.ActiveConnection = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\temp;Extended Properties=dBASE III;User ID=Admin;Password="
Rs.Source = " select * from logo "
Rs.CursorType = adOpenKeyset
Rs.LockType = adLockOptimistic
Rs.Open
Set cat = Nothing

********************aqui lo ingreso*******************

Rs.AddNew
Rs.Fields("rut") = Rs1!rut
Rs.Fields("nombre") = Rs1!nombre
Rs.Fields("fecha") = Rs1!fecha
Rs1.MoveNext
Loop
Rs.Update
Set Rs = Nothing

Antes de agregar la tabla verifica si ya existe, si existe la borras
==================================
If ExisteTabla("logo", cat.Tables) Then
cat.Tables.Delete "logo"
End If
cat.Tables.Append tbl
==================================

=============================================================
'&& Funcion para verificar existencia de una tabla
Function ExisteTabla(sTblNom As String, oTablas As ADOX.Tables) As Boolean
Dim oTbl As Table
For Each oTbl In oTablas
If UCase(oTbl.Name) = UCase(sTblNom) Then
ExisteTabla = True
Exit For
End If
Next oTbl
End Function

=============================================================

me manda un error me dice que elobjeto no es valido

y destaca con amarillo en el codigo que me mandaste aqui

cat.Tables.Append tb1

bueno es TBL, es tu la variable objeto Table q creas para ser agregada .......