浏览器提示：已添加了具有相同键的项。 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 浏览器提示：已添加了具有相同键的项。

共有2500人关注过本帖树形打印复制链接主题：浏览器提示：已添加了具有相同键的项。

zhangjian222200

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：七尾狐帖子：1553 积分：11003 威望：0 精华：0 注册：2016/9/12 11:18:00

浏览器提示：已添加了具有相同键的项。 发帖心情

Post By：2017/3/5 14:16:00 [显示全部帖子]

浏览器提示：已添加了具有相同键的项。

Select Case e.Path

Case "test.htm"

Dim wb As New weui

For i As Integer = 1 To 5

With wb.AddArticle("","ar1")

.AddImage("./images/00" & i & ".jpg")

End With

wb.AddForm("","form" & i,"test.htm")

With wb.AddInputGroup("form1","ipg1")

.AddInput("xm" & i,"年龄","text")

.AddInput("pw" & i,"城市","text")

End With

With wb.AddButtonGroup("form" & i,"btg1",False)

.Add("btn1" & i, "确定", "submit")

.Add("btn12" & i, "确定", "submit")

End With

e.WriteString(wb.Build) '生成网页

End Select

zhangjian222200

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：七尾狐帖子：1553 积分：11003 威望：0 精华：0 注册：2016/9/12 11:18:00

Post By：2017/3/5 20:00:00 [显示全部帖子]

修改后，依然提示：已添加了具有相同键的项。

代码内共3组with语句，我试了下，当只留下1个（即注释其中2个），依然提示：已添加了具有相同键的项。是不是for语句的原因呢？

zhangjian222200

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：七尾狐帖子：1553 积分：11003 威望：0 精华：0 注册：2016/9/12 11:18:00

Post By：2017/3/5 21:56:00 [显示全部帖子]

再问，如果前面已经加载了一部分内容，如果需要追载，可以吗？

e.WriteString(wb.Build) '生成网页，就不行了，因为这个是重新生成网页

主题：浏览器提示：已添加了具有相同键的项。