Question

We have an Access UI to Sql Server database. The user connects to many databases (containing the same tables with different data), can choose between them. We use this for versioning. We want to make him able to copy and delete databases right from Access UI. He should be able to copy at least to the same server, and ideally also to other server.

Answer 1

This is my final solution:

Dim conn As New ADODB.Connection

conn.ConnectionString = "Provider=SQLOLEDB;Data Source=" dbServer & ";" _
    & "User ID=" & user & ";Password=" & password
conn.Open

' backup
conn.Execute "BACKUP DATABASE [" & sourceDb & "] TO  [backup device] WITH NOFORMAT, NOINIT,  NAME = N'backup', SKIP, NOREWIND, NOUNLOAD,  STATS = 10"

' restore
conn.Execute "RESTORE DATABASE [" & targetDb & "] FROM  [abcosting temporary backup] WITH  FILE = 1,  NOUNLOAD,  REPLACE,  STATS = 10, " & mdf_move & ", " & ldf_move