Visual Basic - Copia de seguridad

Hola, he hecho un programa en Visual Basic que controla una base de datos sql... me gustaría saber como puedo realizar una copia de seguridad de dicha base desde mi programa en visual. No puedo simplemente copiar los archivos ya que me da una excepcion de que el archivo esta en uso.

Muchas gracias por vuestra ayuda.

Un saludo.

esto te deja copiar filas en uso
saludos

pegalo en un modulo

Option Explicit
Private Type SHFILEOPSTRUCT
hWnd As Long
wFunc As Long
pFrom As String
pTo As String
fFlags As Integer
fAnyOperationsAborted As Boolean
hNameMappings As Long
lpszProgressTitle As String
End Type

Declare Function SHFileOperation Lib "shell32.dll" Alias "SHFileOperationA" _
(lpFileOp As SHFILEOPSTRUCT) As Long

Private Const FO_COPY = &H2
Private Const FOF_ALLOWUNDO = &H40

Public Sub SHCopyFile(ByVal from_file As String, ByVal to_file As String)
Dim sh_op As SHFILEOPSTRUCT

With sh_op
.hWnd = 0
.wFunc = FO_COPY
.pFrom = from_file & vbNullChar & vbNullChar
.pTo = to_file & vbNullChar & vbNullChar
.fFlags = FOF_ALLOWUNDO
End With

SHFileOperation sh_op
End Sub

creo k lo k buscas es como realizar un backup de tu db bueno prueva esto

Public Function BAKUBI()
conex
RST_SECCION.Source = "backup database mi_base to disk='F:\ivs\ " & SEM & " .txt'WITH NOINIT, NOSKIP, STATS = 10"
RST_SECCION.ActiveConnection = ADOCONN
RST_SECCION.Open
desconectar
End Function