1个回答
展开全部
.版本 2
.支持库 eDB
.支持库 iext
.判断开始 (数据库连接1.连接SQLServer (服务器名, 数据库名, 用户名, 密码))
记录集1.置连接 (数据库连接1)
记录集1.打开 (“select * from E_EDB.dbo.Main where username='” + username + “'”, #SQL语句, ) ' select * from 数据表名 where 条件
.默认
信息框 (“无法连接到服务器”, 0, “错误”, )
返回 ()
.判断结束
记录集1.到首记录 ()
.计次循环首 (记录集1.记录数量, )
记录集1.读文本 (“首项”, 首项)
记录集1.读文本 (“名称”, 名称)
树型框1.加入项目 (到数值 (首项), 名称, , , , , )
记录集1.到下一条 ()
.计次循环尾 ()
记录集1.关闭 ()
.支持库 eDB
.支持库 iext
.判断开始 (数据库连接1.连接SQLServer (服务器名, 数据库名, 用户名, 密码))
记录集1.置连接 (数据库连接1)
记录集1.打开 (“select * from E_EDB.dbo.Main where username='” + username + “'”, #SQL语句, ) ' select * from 数据表名 where 条件
.默认
信息框 (“无法连接到服务器”, 0, “错误”, )
返回 ()
.判断结束
记录集1.到首记录 ()
.计次循环首 (记录集1.记录数量, )
记录集1.读文本 (“首项”, 首项)
记录集1.读文本 (“名称”, 名称)
树型框1.加入项目 (到数值 (首项), 名称, , , , , )
记录集1.到下一条 ()
.计次循环尾 ()
记录集1.关闭 ()
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询