pb实现数据库的备份、还原

//备份数据库

SQLCA.AutoCommit = TRUE

//将数据库备份到文件
ls_style = "USE " + as_databasename
EXECUTE IMMEDIATE : ls_style;

ls_style = "BACKUP DATABASE " + as_databasename + " TO disk = '" + as_path + "' WITH FORMAT, NAME = 'Full Backup'" 
EXECUTE IMMEDIATE : ls_style;

SQLCA.AutoCommit = false
  

============还原数据库

view plaincopy to clipboardprint?
//还原数据库   
  
//首先连接到MASTER数据库   
string ls_ServerName,ls_LogId,ls_LogPass   
Transaction SQLMASTER   
  
ls_ServerName = SQLCA.ServerName   
ls_LogId = SQLCA.LogId   
ls_LogPass = SQLCA.LogPass   
  
disconnect using sqlca;