setAjaxOptions问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

问题1：家乡市、家乡区县，无法随着家乡省选择相应的内容

问题2：当表“城市列表”没有加载时，页面上所有行无法选择内容

页面如下：

此主题相关图片如下：qq图片201703181535151.png

内部函数quyu代码：

Dim e As RequestEventArgs = args(0)

Select Case e.Path

Case "quyu.htm"

Dim wb As New weui

wb.AddTopTips("","toptip1","") '用于显示动态错误提示

wb.AddForm("","form1","quyu.htm").Attribute= "代码被屏蔽，详见下图"

With wb.AddInputGroup("form1","ipg1","区域资料")

With .AddSelect("szs","所在省","|" & DataTables("城市列表").GetComboListString("所在省"))

.Attribute = "代码被屏蔽，详见下图"

End With

With .AddSelect("szshi","所在市","")

.Attribute = "代码被屏蔽，详见下图"

End With

.AddSelect("szqx","所在区县","")

With .AddSelect("jxs","家乡省","|" & DataTables("城市列表").GetComboListString("所在省"))

.Attribute = "代码被屏蔽，详见下图"

End With

With .AddSelect("jxshi","家乡市","")

.Attribute = "代码被屏蔽，详见下图"

End With

.AddSelect("jxqx","家乡区县","")

With wb.AddButtonGroup("form1","btg1",True)

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

End With

wb.AppendHTML("<script src='./lib/ajaxform_quyu.js'></script>") '引入脚本文件

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

End Select

此主题相关图片如下：qq图片2017031817181311.png

内部函数quyu_get代码：

Dim e As RequestEventArgs = args(0)

Select Case e.Path

Case "quyu_get.htm"

Dim vals As String

If e.PostValues.Count = 1 Then

vals = "|" & DataTables("城市列表").GetComboListString("所在市","所在省='" & e.PostValues("szs") & "'")

ElseIf e.PostValues.Count = 2 Then

Dim Filter1 As String = "所在省='" & e.PostValues("szs") & "' And 所在市='" & e.PostValues("szshi") & "'"

vals = "|" & DataTables("城市列表").GetComboListString("所在区县", Filter1)

ElseIf e.PostValues.Count = 4 Then

vals = "|" & DataTables("城市列表").GetComboListString("家乡市","所在省='" & e.PostValues("jxs") & "'")

ElseIf e.PostValues.Count = 5 Then

Dim Filter2 As String = "所在省='" & e.PostValues("jxs") & "' And 所在市='" & e.PostValues("jxshi") & "'"

vals = "|" & DataTables("城市列表").GetComboListString("家乡区县", Filter2)

End If

e.WriteString(vals)

End Select

经多次检查，httprequest页面跳转代码正常，这是"城市列表"的内容

此主题相关图片如下：qq图片2017031815455812.png

[此贴子已经被作者于2017/3/18 17:20:56编辑过]

主题：setAjaxOptions问题