易语言记录集保存到XML为什么不成功呀
.版本 2.支持库 eDB.子程序 开始采集任务.局部变量 Sql语句, 文本型.局部变量 记录集句柄, 整数型1 Sql语句 ＝ “Select Top 1 * FROM DrugYPN ”2 记录集句柄 ＝ 外部数据库1.查询 (Sql语句)3 .判断开始 (记录集句柄 ≠ 0)4 信息列表.插入项目 (0, 到文本 (信息列表.取项目数 ()) ＋ 到文本 (外部数据库1.读 (记录集句柄, “ DrugName”)), )5 信息列表.插入项目 (0, 到文本 (信息列表.取项目数 ()) ＋ “ 采集成功...”, )6 .如果 (记录集1.保存到XML (取运行目录 () ＋ “\Data”))7 信息列表.插入项目 (0, 到文本 (信息列表.取项目数 ()) ＋ “ 保存成功...”, )8 .否则9 信息列表.插入项目 (0, 到文本 (信息列表.取项目数 ()) ＋ “ 保存失败...”, )10 .如果结束11 .默认12 信息列表.插入项目 (0, 到文本 (信息列表.取项目数 ()) ＋ “ 采集失败...”, )
