เรียนรู้จากฉัน ASP ฐานข้อมูลเซิร์ฟเวอร์ SQL สำรอง
<HTML>
<หัว>
<TITLE>การดำเนินการฐานข้อมูล_www.dushuwu.nhet</TITLE>
<meta http-equiv=เนื้อหาประเภทเนื้อหา=ข้อความ/html;
</HEAD>
<ร่างกาย>
<รูปแบบวิธีการ=ชื่อโพสต์=myform>
<%if action=restore then%><INPUT TYPE=hidden name=action value=restore>เตรียมการเรียกคืนฐานข้อมูล - -
<%elseif action=backup then%><INPUT TYPE=hidden name=action value=backup>เตรียมการสำรองฐานข้อมูล - - <%อื่น%>
เลือกการกระทำ:
<INPUT TYPE=ชื่อวิทยุ=action id=act_backup value=backup><label for=act_backup>การสำรองข้อมูล</label>
<INPUT TYPE=radio name=action id=act_restore value=restore& gt;<label for=act_restore>กู้คืน</label><%end if%>
<br>ชื่อฐานข้อมูล: <INPUT TYPE=text name=databasename value=50forum>
<br>เส้นทางของไฟล์: <INPUT TYPE=text name=bak_file value=50forum.bak> (เส้นทางของไฟล์สำรองหรือกู้คืน)<br>
<ประเภทอินพุต=ค่าส่ง=ตกลง>
</แบบฟอร์ม>
-
'การสำรองและกู้คืนฐานข้อมูล SQL Server!
'http://www.dwww.cn
เซิร์ฟเวอร์ sql สลัว, sqlname, รหัสผ่าน sql, sqlLoginTimeout, ชื่อฐานข้อมูล, bak_file, การกระทำ
sqlserver = localhost 'เซิร์ฟเวอร์ sql
sqlname = sa 'ชื่อผู้ใช้
sqlpassword = sa 'รหัสผ่าน'
sqlLoginTimeout = 15 'หมดเวลาการเข้าสู่ระบบ'
ชื่อฐานข้อมูล = ตัด (คำขอ (ชื่อฐานข้อมูล))
bak_file = ตัด (คำขอ (bak_file))
bak_file = Server.MapPath(สำรอง/&bak_file)
act = lcase (คำขอ (การกระทำ))
ถ้าชื่อฐานข้อมูล = แล้ว
ชื่อฐานข้อมูลอินพุต response.write
อื่น
ถ้า act = สำรองข้อมูลแล้ว
ตั้งค่า srv = Server.CreateObject(SQLDMO.SQLServer)
srv.LoginTimeout = sqlLoginTimeout
srv.เชื่อมต่อ sqlserver, sqlname, sqlpassword
ตั้งค่า bak = Server.CreateObject(SQLDMO.Backup)
bak.Database = ชื่อฐานข้อมูล
bak.Devices = ไฟล์
bak.Files = bak_file
บัคแอคชั่น = 0
bak.Initialize = 1
'bak.ReplaceDatabase = True'
bak.SQLBackup srv
ถ้า err.number>0 แล้ว
response.write err.number&<font color=red><br>
response.write ผิดพลาด.description&</font>
สิ้นสุดถ้า
Response.write <font color=green>สำรองข้อมูลสำเร็จ!</font>
srv. ตัดการเชื่อมต่อ
ตั้งค่า srv = ไม่มีเลย
ตั้งบาก = ไม่มีเลย
elseif act = คืนค่าแล้ว
'การคืนค่าควรทำเมื่อไม่ได้ใช้งานฐานข้อมูล!
ตั้งค่า srv=Server.CreateObject(SQLDMO.SQLServer)
srv.LoginTimeout = sqlLoginTimeout
srv.เชื่อมต่อ sqlserver, sqlname, sqlpassword
ตั้งค่าส่วนที่เหลือ = Server.CreateObject (SQLDMO.Restore)
rest.Action = 0 ' คืนค่า db เต็ม
rest.Database = ชื่อฐานข้อมูล
rest.Devices = ไฟล์
rest.Files = bak_file
rest.ReplaceDatabase = True 'บังคับให้กู้คืนผ่านฐานข้อมูลที่มีอยู่
ถ้า err.number>0 แล้ว
response.write err.number&<font color=red><br>
response.write ผิดพลาด.description&</font>
สิ้นสุดถ้า
ส่วนที่เหลือ SQLRestore srv
Response.write <font color=green>กู้คืนสำเร็จแล้ว!</font>
srv. ตัดการเชื่อมต่อ
ตั้งค่า srv = ไม่มีเลย
พักผ่อน=ไม่มีอะไร
อื่น
Response.write <font color=red>ไม่ได้เลือกการดำเนินการ</font>
สิ้นสุดถ้า
สิ้นสุดถ้า
-
</ร่างกาย>
</HTML>