سلام
من سعی کردم به ساده ترین حالت بنویسم
Dim sqlStr = "RESTORE DATABASE YourDB FROM DISK ='E:\YourDbBack' WITH REPLACE"
Dim conn AsNew System.Data.SqlClient.SqlConnection("Data Source=.;Initial Catalog=master;User ID=sa")
Dim cmd AsNew System.Data.SqlClient.SqlCommand(sqlStr, conn)
conn.Open()
cmd.ExecuteNonQuery()
conn.Close()
توجه داشته باشید که برای این کار باید به یک بانک دیگر در sqlserver باید متصل شوید چرا که هنگامی که به یک بانک متصل هستید اجازه restore داده نمی شود و پیام خطایی نمایش داده می شود به این معنی که
بانک اطلاعاتی در حال استفاده است !
موفق باشید
http://galestian.org