分类1
大小:0.4MB
语言:简体中文系统:微软Windows平台
类别:数据库时间:2017-11-01
BACKUP DATABASE [Test] TO DISK = N'C:Test20120419001.BAK' WITH INIT,NOUNLOAD,NAME=N'dhchis backup' ,SKIP,STATS=10, FORMAT
用易语言写的 。毕竟英语不过关。而且自用。无所畏惧~~
好像是用压缩密码 1234567890
版本 2
.支持库 xplib
.支持库 eDB
.程序集 窗口程序集_启动窗口
.程序集变量 Sql语句, 文本型
.程序集变量 备份路径, 文本型
.子程序 __启动窗口_创建完毕
XP风格 (3)
编辑框1.内容 = 读配置项 (取运行目录 () + “数据库一键备份配置文件.ini”, “#数据库IP地址”, “SqlIP”, )
编辑框2.内容 = 读配置项 (取运行目录 () + “数据库一键备份配置文件.ini”, “#需备份数据库名称”, “Sqlname”, )
编辑框3.内容 = 读配置项 (取运行目录 () + “数据库一键备份配置文件.ini”, “#登录用户名”, “Username”, )
编辑框4.内容 = 读配置项 (取运行目录 () + “数据库一键备份配置文件.ini”, “#登录密码”, “Userpass”, )
备份路径 = 读配置项 (取运行目录 () + “数据库一键备份配置文件.ini”, “#备份数据库存储路径”, “SavePath”, )
.如果 (备份路径 = “”)
备份路径 = “D:/海湾数据库备份”
.判断开始 (创建目录 (备份路径) = 真)
标签5.标题 = “已创建数据库存储路径” + 备份路径
.默认
返回 ()
.判断结束
.否则
.判断开始 (创建目录 (备份路径) = 真)
标签5.标题 = “已创建数据库存储路径” + 备份路径
.默认
返回 ()
.判断结束
.如果结束
.子程序 _按钮1_被单击
.判断开始 (数据库连接1.连接SQLServer (编辑框1.内容, 编辑框2.内容, 编辑框3.内容, 编辑框4.内容) = 真)
标签5.标题 = “连接数据库成功....”
按钮2.禁止 = 假
.默认
信息框 (“连接数据库失败....”, 0 + 48, “错误”, )
.判断结束
.子程序 _按钮2_被单击
Sql语句 = #备份前 + 备份路径 + “/” + 编辑框2.内容 + 到文本 (取日期 (取现行时间 ())) + #备份后
.如果 (数据库连接1.执行SQL (Sql语句, ) = 真)
信息框 (“备份成功!”, 0, , )
.否则
信息框 (“备份失败!”, 0, , )
.如果结束
.子程序 __启动窗口_将被销毁
数据库连接1.关闭 ()
.子程序 _按钮3_被单击
写配置项 (取运行目录 () + “数据库一键备份配置文件.ini”, “#数据库IP地址”, “SqlIP”, 编辑框1.内容)
写配置项 (取运行目录 () + “数据库一键备份配置文件.ini”, “#需备份数据库名称”, “Sqlname”, 编辑框2.内容)
写配置项 (取运行目录 () + “数据库一键备份配置文件.ini”, “#登录用户名”, “Username”, 编辑框3.内容)
写配置项 (取运行目录 () + “数据库一键备份配置文件.ini”, “#登录密码”, “Userpass”, 编辑框4.内容)
写配置项 (取运行目录 () + “数据库一键备份配置文件.ini”, “#备份数据库存储路径”, “SavePath”, 备份路径)
标签5.标题 = “配置保存完成....”
.子程序 _按钮4_被单击
编辑框1.内容 = 读配置项 (取运行目录 () + “数据库一键备份配置文件.ini”, “#数据库IP地址”, “SqlIP”, )
编辑框2.内容 = 读配置项 (取运行目录 () + “数据库一键备份配置文件.ini”, “#需备份数据库名称”, “Sqlname”, )
编辑框3.内容 = 读配置项 (取运行目录 () + “数据库一键备份配置文件.ini”, “#登录用户名”, “Username”, )
编辑框4.内容 = 读配置项 (取运行目录 () + “数据库一键备份配置文件.ini”, “#登录密码”, “Userpass”, )
标签5.标题 = “配置读取完成....”
两个常量 : 备份前 BACKUP DATABASE abcnet TO DISK ='
备份后.BAK' WITH INIT,NOUNLOAD,NAME=N'dhchis backup' ,SKIP,STATS=10, FORMAT