在c#中如何对数据库进行备份还原

Question

刚看了大虾们的代码 需要用sqldmo  我在sqlserver中找了半天也没有找到
 我用的是sql2008 环境是vs2010 请各位大侠赐教
想问一下 sqldmo在2008中有没有 如果没有那该应用那个程序集

Answer 1

//备份
backup   database databaseName(数据库名称)  to  disk='D:\dfg.bak'(备份文件路径)//执行还原的语句dirSavePath要还原到的物理路径//strDatabase要还原成数据库的名称string strSqlRestore="RESTORE DATABASE "+strDatabase+" FROM DISK ='"+dirPath+"\\"+strDatabase     +".bak' WITH MOVE '" +strDataName+"' TO '"+dirSavePath+"\\"+strDatabase+".mdf', MOVE '"+strLogName+"' TO '"+dirSavePath+"\\"+strDatabase+".ldf'";

Answer 2

复制表(只复制结构,源表名：a 新表名：b) 
法一：select * into b from a where 1 <>1 
法二：select top 0 * into b from a 
拷贝表(拷贝数据,源表名：a 目标表名：b) 
insert into b(a, b, c) select d,e,f from a; 
备份
BACKUP DATABASE text
to disk='c:\11.bak' with init还原
RESTORE   DATABASE   CDJTLZGIS   
        FROM   DISK   =   'c:\33.bak'   
WITH   MOVE   'CDJTLZGIS_Data'   TO   'c:\CDJTLZGIS_Data',   
MOVE   'CDJTLZGIS_Log'   TO   'c:\CDJTLZGIS_Log'   
RESTORE   DATABASE   TestDB     
FROM   DISK   =   'c:\Northwind.bak'   
WITH   MOVE   'Northwind'   TO   'c:\testdb.mdf',   
MOVE   'Northwind_log'   TO   'c:\testdb.ldf'    
数据导出excel等

Answer 3

在C#里如何动态的创建一个access数据库呢?vb 可以如：
Public Function NewDb() As Boolean
Dim Tabf As TableDef, FieldP As Field
              ComD.Filter = "ACCESS数据库|*.mdb"
              ComD.ShowSave
              Dbname = ComD.FileName
              If Dir(Dbname) <> "" Then
                 MsgBox "下面已有一个相同的名称，请输入另一个名称!", vbCritical + vbOKOnly
                 Exit Function
              End If
              Set Db = CreateDatabase(Dbname, dbLangGeneral)
              'Book
              Set Tabf = Db.CreateTableDef("Book")
              Set FieldP = Tabf.CreateField("BH", dbInteger)
              Tabf.Fields.Append FieldP
              Set FieldP = Tabf.CreateField("Name", dbText, 50)
              Tabf.Fields.Append FieldP
              Set FieldP = Tabf.CreateField("Pareid", dbInteger)
              Tabf.Fields.Append FieldP
              Db.TableDefs.Append Tabf
              'Backnodes
              Set Tabf = Db.CreateTableDef("Backnodes")
              Set FieldP = Tabf.CreateField("Key", dbText, 6)
              Tabf.Fields.Append FieldP
              Set FieldP = Tabf.CreateField("Name", dbText, 50)
              Tabf.Fields.Append FieldP
              Set FieldP = Tabf.CreateField("Tex1", dbMemo)
              Tabf.Fields.Append FieldP
              Set FieldP = Tabf.CreateField("Tex2", dbMemo)
              Tabf.Fields.Append FieldP
              Set FieldP = Tabf.CreateField("Tex4", dbMemo)
              Tabf.Fields.Append FieldP
              Set FieldP = Tabf.CreateField("KeyUp", dbText, 6)
              Tabf.Fields.Append FieldP
              Db.TableDefs.Append Tabf
              'Book_exmples
              Set Tabf = Db.CreateTableDef("Book_exmples")
              Set FieldP = Tabf.CreateField("BH", dbInteger)
              Tabf.Fields.Append FieldP
              Set FieldP = Tabf.CreateField("exmples", dbMemo)
              Tabf.Fields.Append FieldP
              Db.TableDefs.Append Tabf
              'Book_shuomi
              Set Tabf = Db.CreateTableDef("Book_shuomi")
              Set FieldP = Tabf.CreateField("BH", dbInteger)
              Tabf.Fields.Append FieldP
              Set FieldP = Tabf.CreateField("ShuoMin", dbMemo)
              Tabf.Fields.Append FieldP
              Db.TableDefs.Append Tabf
              'BooK_ls
              Set Tabf = Db.CreateTableDef("Book_LS")
              Set FieldP = Tabf.CreateField("BH", dbText, 6)
              Tabf.Fields.Append FieldP
              Db.TableDefs.Append Tabf
              'Book_zhujai
              Set Tabf = Db.CreateTableDef("Book_zhujai")
              Set FieldP = Tabf.CreateField("BH", dbInteger)
              Tabf.Fields.Append FieldP
              Set FieldP = Tabf.CreateField("Zujai", dbMemo)
              Tabf.Fields.Append FieldP
              Db.TableDefs.Append Tabf
              'Nodes
              Set Tabf = Db.CreateTableDef("Nodes")
              Set FieldP = Tabf.CreateField("id", dbInteger)
              Tabf.Fields.Append FieldP
              Set FieldP = Tabf.CreateField("Textx", dbText, 50)
              Tabf.Fields.Append FieldP
              Set FieldP = Tabf.CreateField("Pareid", dbInteger)
              Tabf.Fields.Append FieldP
              Set FieldP = Tabf.CreateField("JB", dbByte)
              Tabf.Fields.Append FieldP
              Db.TableDefs.Append Tabf
              'Extrand
              Set Tabf = Db.CreateTableDef("Extrand")
              Set FieldP = Tabf.CreateField("id", dbText, 5)
              Tabf.Fields.Append FieldP
              Db.TableDefs.Append Tabf
              
              If Dbname = "" Then Exit Function
              Ininame = App.Path & "\Sets.ini"
              Ws.Buff_Size = 100
              Ws.FileName = App.Path & "\startsets.ini"
              Ws.WriteToInI "DB", Dbname, "1"
              NewDb = True
            TitleDB = Dbname
End Function