移动开发，如何获取当前页某控件的值？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

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

[此贴子已经被作者于2019/1/4 12:02:11编辑过]

而且即使按这段代码执行，最后也没有执行pdScanFunction() 也是post到了网页，显示我输入的内容。

.AddInput("AssetNumber","资产编号","Text").Attribute="""

[此贴子已经被作者于2019/1/4 12:05:04编辑过]

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

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

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

[此贴子已经被作者于2019/1/4 12:07:55编辑过]

我自己把事件想复杂了，我把按钮由button改为了submit 就实现和回车一样的功能了，现在的问题是，我在if 条件里面，怎么执行js的函数，如：

If e.PostValues.ContainsKey("AssetNumber") Then

' msgbox(e.PostValues("AssetNumber")) '能弹出172.16.5.1

e.AppendCookie("AssetNumber",e.PostValues("AssetNumber")) '增加cookie

Dim dr As DataRow= DataTables("盘点记录").SQLFind("资产编号 = '" & e.PostValues("AssetNumber") & "'")

If dr IsNot Nothing Then '如果存在重复盘点记录的话

'msgbox(e.PostValues("AssetNumber"))

'e.WriteString("exist")

tc() '这里怎么执行js里的tc()函数？通过该函数调用dlg4?

Else '如果不存在重复记录的话,则直接把 AssetNumber带着跳转到 CheckPd 页面

'e.WriteString(e.PostValues("AssetNumber"))

e.WriteString("<meta http-equiv='Refresh' c>") '直接用get方式跳转到指定页

' e.WriteString("http://172.18.11.193/CheckPd.htm?AssetNumber=" & e.PostValues("AssetNumber"))

End If

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

想调用其中的tc() 函数

43楼的方法，调试是通过了的，但还是想问下45楼的问题有办法解决吗？

再问：

如何在点击取消这个按钮后，清除 e.Cookies("AssetNumber") 的值？

.AddButton("btnCancel","取消").Kind = 1

主题：移动开发，如何获取当前页某控件的值？