- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]已添加了具有相同键的项 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=106835)
-- 发布时间：2017/9/16 11:05:00
-- [求助]已添加了具有相同键的项
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目10.foxdb |
function getWkh1(){
var kh=document.getElementById("客户18").value;
setOptions("编码18",document.getElementById(kh).innerHTML);
}
在主页与项目页面之间来回多次切换，进入项目页面出现已添加了具有相同键的项，偶尔在登陆后出现
此主题相关图片如下：123.png
-- 发布时间：2017/9/16 12:19:00
--
貌似是和组合框项目有冲突，id加上一个前缀区分一下吧
For Each kh As String In DataTables("档案").GetComboListString("客户").Split("|")
Dim fdr As DataRow =DataTables("档案").Find("客户=\'" & kh & "\'")
If fdr IsNot Nothing Then
wb.InsertHTML("<p hidden id=\'p_" & kh & "\'>" & fdr("编码") & "</p>")
End If
Next
-- 发布时间：2017/9/16 14:02:00
--
还是出现一样的报错啊
-- 发布时间：2017/9/16 14:30:00
--
改一下，这样呢：
Dim sb As new StringBuilder
For Each kh As String In DataTables("档案").GetComboListString("客户").Split("|")
Dim fdr As DataRow =DataTables("档案").Find("客户=\'" & kh & "\'")
If fdr IsNot Nothing Then
sb.AppendLine("<p hidden id=\'p_" & kh & "\'>" & fdr("编码") & "</p>")
End If
Next
wb.InsertHTML(sb.ToString)
-- 发布时间：2017/9/16 14:48:00
--
这样测试暂时没问题
谢啦