|
树形框.取父项目 (取循环索引 ()) ,在加密狗版 时遇顶层前面3个返回是0,后面才是返回-1,, 测试版缺一切正常,这是什么原因?
<火山程序 类型 = "通常" 版本 = 1 />
方法 树形框到ACCESS
参数 参_树形框 <类型 = 树形框>
参数 ""
{
参_树形框.取项目数 ()
变量 项目数 <类型 = 整数>
项目数 = 参_树形框.取项目数 ()
计次循环 (项目数)
{
变量 父项目文本 <类型 = 文本型>
父项目文本 = 参_树形框.取项目文本 (参_树形框.取父项目 (取循环索引 ()))
数据库1.执行SQL ("insert into 专业名称(专业,分项,索引) values ('" + 参_树形框.取项目文本 (取循环索引 ()) + "','" + 选择 (父项目文本 == "", "【k0】", 父项目文本) + "','" + 到文本 (参_树形框.取父项目 (取循环索引 ())) + "')", , )
调试输出 (到文本 (参_树形框.取父项目 (取循环索引 ())))
}
如果 (状态 == 真)
{
信息框 ("添加成功")
}
否则
{
信息框 ("添加失败")
}
// 记录集1.关闭 ()
}
|
|