易语言写mssql数据库连接
- 格式:docx
- 大小:40.64 KB
- 文档页数:2
易语言写mssql数据库连接
这个是程序介面。
.版本 2
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
皮肤_加载 ()
编辑框_主机.内容 = 删首尾空 (取主机名 ())
编辑框_数据库.内容 = “ ”
编辑框_用户名.内容 = “sa”
编辑框_密码.内容 = “ ”
.子程序 _按钮_确定_被单击
.局部变量 服务器, 文本型
.局部变量 数据库, 文本型
.局部变量 用户名, 文本型
.局部变量 密码, 文本型
.如果真 (编辑框_主机.内容 = “” 或 编辑框_数据库.内容 = “” 或 编辑框_用户名.内容 =
“”)
信息框 (“服务器名、数据库名、用户名不能为空。”, 0, “温馨提示”)
返回 ()
.如果真结束
服务器 = 删首尾空 (编辑框_主机.内容)
数据库 = 删首尾空 (编辑框_数据库.内容)
用户名 = 删首尾空 (编辑框_用户名.内容)
密码 = 删首尾空 (编辑框_密码.内容) .如果 (_启动窗口.外部数据库1.打开 (“DRIVER=SQL Server;SERVER=” + 服务器 + “;UID=” + 用户名 + “;PWD=” + 密码 + “;WSID=” + 取主机名 () + “;DATABASE=” + 数据库, , ))
信息框 (“连接” + 服务器 + “服务器上的” + 数据库 + “数据库成功。”, 0, “成功”)
.否则
信息框 (“连接” + 服务器 + “服务器上的” + 数据库 + “数据库失败。”, 0, “失败”)
.如果结束
子程序_主程序 ()
销毁 ()
.子程序 _按钮_取消_被单击
销毁 ()
结束 ()
.子程序 子程序_主程序
载入 (窗口_主窗口, , 真)