楼上,另外一个问题(msgbox不弹窗),原因找到了将lib文件夹下的ajaxform_city.js里面的indexb.htm改成cityb.htm,里面的msgbox都弹出来了
但是内部函数cityb,里面创建cookie:wb.AppendCookie("CHAKSHI",chakshi),同样创建失败
内部函数cityb全部代码如下:
Dim e As RequestEventArgs = args(0) '临时选择城市(供游客使用)
Dim wb As New weui
msgbox(0)
Dim chaksheng As String = e.PostValues("szs") '验证所在省
Dim chakshi As String = e.PostValues("szshi") '验证所在市
msgbox(1)
If chaksheng = "" Then
e.WriteString("所在省不能为空!")
Return ""
ElseIf chakshi = "" Then
e.WriteString("所在市不能为空!")
Return ""
End If
msgbox(2)
wb.AppendCookie("CHAKSHI",chakshi) '此cookie在临时城市页面(cityb.htm)生成,在httprequest事件删除
msgbox(3)
wb.InsertHTML("<me-ta http-equiv='Refresh' con-tent='0; ur-l=/index.htm'>") '那么直接跳转到首页
msgbox(4) ’这个页面的所有msgbox都弹出来了,页面也跳转到index.htm,但是cookie:CHAKSHI,没有创建
e.WriteString(wb.Build) '生成网页
[此贴子已经被作者于2017/4/29 15:13:26编辑过]