在192.168.10.88 服务器httprqquest中写下了如下代码
Dim wb As New WeUI
Select Case e.Path
Case "", "default.htm" '首页
Functions.Execute("default",e)
End Select
e.WriteString(wb.Build) '生成网页
default函数内容:
Dim e As RequestEventArgs = args(0)
webbjbz =e.GetValues("webbjbz") '接收webbjbz传过来的数据。
Dim wb As New weui
msgbox(webbjbz) ’显示数据,看一下是否已经传过来了。
e.WriteString(wb.Build)
在:192.168.10.66服务器中http服务中代码如下:
case dxt.htm
Dim wb As New weui
wb.AppendHTML("<script src='./lib/valid.js'></script>") '引入脚本文件
wb.AppendHTML("<script >fasong()</script>")
。。。
js文件也改成了:
sendAjaxText("","http: //192.168.10.88/default.htm?webbjbz=331","",false);
执行192.168.10.66 没有任何反应,webbjbz的值也没有传到192.168.10.88的default.htm中。这个问题困扰我好几天了,麻烦您给分析以下,问题出在什么地方,谢谢了。
[此贴子已经被作者于2022/8/11 17:45:53编辑过]