| 窗口程序集名 | 保 留 | 保 留 | 备 注 |
| SQL_Server处理 | | | |
| 变量名 | 类 型 | 静态 | 数组 | 备 注 |
| 服务器 | 服务器信息 | | |
| 配置文件路径 | 文本型 | | |
| 数据库处理 | 数据库连接池 | | |
配置文件路径 ＝
取运行目录 () ＋
“\db.ini”
如果真 (文件是否存在 (配置文件路径
) ＝
假)
信息框 (“配置文件不存在，请检查”, 16, ,
)返回 (假)
服务器.IP地址 ＝
读配置项 (配置文件路径,
“config”,
“db_ip”,
)服务器.端口 ＝
读配置项 (配置文件路径,
“config”,
“db_port”,
)服务器.用户名 ＝
读配置项 (配置文件路径,
“config”,
“db_user”,
)服务器.用户密码 ＝
读配置项 (配置文件路径,
“config”,
“db_pw”,
)返回 (数据库处理.
连接SQLServer数据库 (服务器.IP地址 ＋
“,” ＋ 服务器.端口,
“master”, 服务器.用户名, 服务器.用户密码, 1
))
数据库连接池.
关闭 ()返回 (真)| 窗口程序集名 | 保 留 | 保 留 | 备 注 |
| 窗口程序集_启动窗口 | | | |
| 变量名 | 类 型 | 静态 | 数组 | 备 注 |
| 数据库 | 数据库连接池 | | |
| 返回结果 | 文本型 | | |
SQL关闭 (数据库
)如果真 (SQL连接 ())
信息框 (“连接成功”, 0, ,
)数据库.
cha询SQL单个文本值 (“SELECT Message FROM PayLog.dbo.Pay_Notice WHERE ID = 10”, 返回结果
)SQL关闭 (数据库
)调试输出 (返回结果
)
|
| Server_多条 | 文本型 | |
|
| sql | 文本型 | | | |
参_zyJsonValue | zyJsonValue | | | | 数据数量 | 整数型 | | | |
| 变量名 | 类 型 | 静态 | 数组 | 备 注 |
| data_JSON | zyJsonValue | | |
| 数据库连接池 | 数据库连接池 | | |
| 结果 | 逻辑型 | | |
| data_arr | 文本型 | | 0 |
| res | 文本型 | | |
| i | 整数型 | | |
| o | 整数型 | | |
| zyJsonValue1 | zyJsonValue | | |
| 数组下标1 | 整数型 | | |
| 数组下标2 | 整数型 | | |
调试输出 (数据库连接池.
连接SQLServer数据库 (“127.0.0.1”,
“asdasd”,
“qweqwe”,
“asdasd@”, 50
))
sql ＝
“select * from temp_question_bank”数据库连接池.
cha询SQL到数组 (sql, data_arr, 真,
)数组下标1 ＝
取数组下标 (data_arr, 1
)数组下标2 ＝
取数组下标 (data_arr, 2
)参_zyJsonValue.
销毁 ()参_zyJsonValue.
创建 ()
计次循环首 (数组下标1, i
)
zyJsonValue1.
销毁 ()zyJsonValue1.
创建 ()
如果真 (i ＝ 1
)到循环尾 ()
计次循环首 (数组下标2, o
)zyJsonValue1.
置文本 (data_arr
[1
] [o
], data_arr
[i
] [o
])
计次循环尾 ()参_zyJsonValue.
添加成员 (“data”, zyJsonValue1
)计次循环尾 ()res ＝ 参_zyJsonValue.
到文本 ()调试输出 (res
)置剪辑板文本 (res
)返回 (res
)
