分类1

数据库

sql数据库一键备份

sql数据库一键备份

大小:0.4MB

语言:简体中文系统:微软Windows平台

类别:数据库时间:2017-11-01

应用介绍
纯粹是为了工作简便做的。其实就是执行了一下sql语句而已

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

展开
同类推荐