用Asp備份與恢複SQL Server 資料庫

來源:互聯網
上載者:User

一個用asp備份與恢複SQL Server資料庫的例子代碼,希望對一些朋友有用。(注意:資料庫使用中可能無法恢複)

複製代碼 代碼如下:<HTML>
<HEAD>
<TITLE>SQL Server 資料庫的備份與恢複</TITLE>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</HEAD>
<BODY>
<form method="post" name=myform>
選擇操作:<INPUT TYPE="radio" NAME="act" id="act_backup" value="backup"><label for=act_backup>備份</label> 

<INPUT TYPE="radio" NAME="act" id="act_restore" value="restore"><label for=act_restore>恢複</label>

<br>資料庫名:<INPUT TYPE="text" NAME="databasename" value="<%=request("databasename")%>">

<br>檔案路徑:<INPUT TYPE="text" NAME="bak_file" value="c:\$1.bak">(備份或恢複的檔案路徑)<br>

<input type="submit" value="確定">

</form>

<%

'SQL Server 資料庫的備份與恢複!

'海娃

'http://www.51windows.Net

dim sqlserver,sqlname,sqlpassword,sqlLoginTimeout,databasename,bak_file,act

sqlserver = "localhost" 'sql伺服器

sqlname = "sa" '使用者名稱

sqlpassword = "sa" '密碼

sqlLoginTimeout = 15 '登陸逾時

databasename = trim(request("databasename"))

bak_file = trim(request("bak_file"))

bak_file = replace(bak_file,"$1",databasename)

act = lcase(request("act"))

if databasename = "" then

response.write "input database name"

else

if act = "backup" then

Set srv=Server.CreateObject("SQLDMO.SQLServer")

srv.LoginTimeout = sqlLoginTimeout

srv.Connect sqlserver,sqlname, sqlpassword

Set bak = Server.CreateObject("SQLDMO.Backup")

bak.Database=databasename

bak.Devices=Files

bak.Files=bak_file

bak.SQLBackup srv

if err.number>0 then

response.write err.number&"<font color=red><br>"

response.write err.description&"</font>"

end if

Response.write "<font color=green>備份成功!</font>"

elseif act = "restore" then

'恢複時要在沒有使用資料庫時進行!

Set srv=Server.CreateObject("SQLDMO.SQLServer")

srv.LoginTimeout = sqlLoginTimeout

srv.Connect sqlserver,sqlname, sqlpassword

Set rest=Server.CreateObject("SQLDMO.Restore")

rest.Action=0 ' full db restore

rest.Database=databasename

rest.Devices=Files

rest.Files=bak_file

rest.ReplaceDatabase=True 'Force restore over existing database

if err.number>0 then

response.write err.number&"<font color=red><br>"

response.write err.description&"</font>"

end if

rest.SQLRestore srv

Response.write "<font color=green>恢複成功!</font>"

else

Response.write "<font color=red>沒有選擇操作</font>"

end if

end if

%>

</BODY>

</HTML>

相關文章

聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

  • Sales Support

    1 on 1 presale consultation

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.