Visual Basic - UREGENTE cambiar nombre archivo

Tengo dos dudas:
1. Necesito conocer algun codigo o comando para que me diga si la carpeta o file "C:\Tem_Sum\" se encuentra o no.
2. Necesito conocer algun codigo o comando que me ayude a copiar un archivo de una carpeta (C:\fuente) a otra (C:\destino) y que su nombre ("C\fuente\prueba1.mdb") sea igual al archivo al nombre de la carpeta destino (C:\destino\prueba.mdb")

Gracias!!!!!!!!!

Si existe el Directorio:
Private Sub Command1_Click()
If Dir("C:\Miguel", vbDirectory) <> "" Then
MsgBox "Si Existe Directorio", vbInformation
Else
MsgBox "No Existe Directorio", vbInformation
End If
'Si Existe Archivo
If Dir("C:\Miguel\ADM.ini", vbArchive) <> "" Then
MsgBox "Si Existe Archivo", vbInformation
Else
MsgBox "No Existe Archivo", vbInformation
End If
End Sub
Para copiar puedes utilizar el FileCopy
Private Sub Command1_Click()
Dim Origen, Destino
Origen = "C:\TuCarpetaPredefinida\TuBaseDatos.mdb" ' Define source file name.
Destino = "C:\TuCarpetaProyecto\TuBaseDatos.mdb" ' Define target file name.
FileCopy Origen, Destino ' Copy source to target.
Name "C:\TuCarpetaProyecto\TuBaseDatos.mdb" As "C:\TuCarpetaProyecto\CopiaTuBaseDatos.mdb" 'Renombras el archivo
MsgBox "Proceso Terminado Satisfactoriamente", vbInformation, Sistema
End Sub