response.Charset = "utf-8"
Session.Codepage = 65001
Response.Buffer=true
Response.Clear
'根据你的情况修改用户名和密码
constr="Provider=SQLOLEDB.1;Persist Security Info=True;User ID=endiva;Password=endiva;Data Source=211.160.78.6"
set conn=server.createobject("adodb.connection")
conn.open constr
bkfname=server.mappath(Format_Time(Now(),5)&"database.bak")
sqlstr="backup database fang to disk='"+bkfname+"' with init"
conn.execute sqlstr
conn.close
response.Write "database [fang] is backup success!
"
response.Write "click download"
如果想直接备份并下载,可以加上下边的这部分,就会备份后自动保存。但是弹出的文件是.asp的文件,修改下就OK。
'set fn=server.createobject("adodb.stream")
'fn.mode=3 '读写
'fn.type=1 '数据类型为:adTypeBinary
'fn.open
'fn.LoadFromFile bkfname '将bkfname指定的文件装入对像中
'Response.ContentType="application/octet-stream"
'Response.BinaryWrite fn.read
'fn.close

一沙一世界 一花一天堂 掌中握無……

网络编程技术、多媒体技术、PC应用技术

| 我爱研发网 | 中电华信 | 阿里西西 | JAVA爱好者 | 北京英才网 | 全球大学查询网 |
| 中国人的网站导航 | 中国电脑论坛 | 信息产业部 | 新浪科技 | 搜狐IT | 信息产业部电子教育与考试中心 |
| IT世界网 | 软件项目交易网 | 中国软件交易网 | 国信培训网 | 亚远景科技 | ....[更多] |