各位专家：您们好！

       最近学习了移动开发，也试着建立了登陆页面和首页，现在想在首页中增加库存查询，但我的数据源中只有入库表和出库表，库存数据要根据这两个表来重新生成，电脑版中我已参照例子设置了1个库存查询的窗口实现了查询的目的。现在使用移动开发，我找不到例子，所以请专家指教，帮我编写一下内部函数。谢谢！

入库表和出库表样式如下：

动态生成库存表

http://www.foxtable.com/webhelp/scr/2305.htm

然后查询这个生成的表格

http://www.foxtable.com/mobilehelp/scr/0115.htm

我在电脑版上已编辑动态生成库存表，但在移动版上就不知道在什么地方编写代码和改写代码了，请详细的说一下步骤。谢谢！

照着这个做

http://www.foxtable.com/mobilehelp/scr/0115.htm

如果连移动版都不知道在什么地方写代码，请把帮助文档看一遍

http://www.foxtable.com/mobilehelp/scr/0001.htm

原来代码

Dim cmd As new SQLCommand
cmd.ConnectionName = "orders"
cmd.CommandText= "select 产品,客户,数量,单价,[日期] From 订单"
If flt > "" Then
    cmd.CommandText = cmd.CommandText & " where " & flt
End If
With wb.AddTable("","Table1")
    .CreateFromDataTable(cmd.ExecuteReader)
End With

改成，比如

\'生成库存表的代码，得到 DataTables("库存表")

我写的代码如下，在手机上调用该网页时没有提示，也没有内容显示。请专家再帮忙看看。谢谢！

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:新建文本文档.txt

改成，看弹出什么，如果没有弹出，说明你没有进入执行代码

msgbox(123)

Dim e As RequestEventArgs = args(0)
Dim wb As New WeUI
Dim flt As String
If e.PostValues.ContainsKey("product") Then
    flt = "物料名称 = \'" & e.PostValues("product") & "\'"
End If
If flt > "" Then
    Tables("当前库存量").Filter = flt
End If
With wb.AddTable("","Table1")
       .CreateFromTable(Tables("当前库存量"))
End With
With wb.AddButtonGroup("","btg1",True)
    .Add("btn1", "重新筛选", "","filter.htm")
End With
e.WriteString(wb.Build)

msgbox(456)

之前的代码是什么都没有弹出，改成上面的代码后，也是什么都没有弹出。还需要如何做？谢谢！

请照抄帮助文档的代码过去测试 http://www.foxtable.com/mobilehelp/scr/0115.htm

或者贴出你写的全部代码。