以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]想咨询一下移动开发把页面做到内部函数中，如何调用数据  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=98477)
--  作者：188802386
--  发布时间：2017/3/30 14:16:00
--  [求助]想咨询一下移动开发把页面做到内部函数中，如何调用数据
就用http://www.foxtable.com/mobilehelp/scr/0154.htm做列子吧
登录页面的内部函数为"logon"
dim e as requesteventargs = args(0)
dim wb as new weui
 wb.AddPageTitle("","pageheader","销售系统","由湛江辉迅基于Foxtable开发")
        If e.PostValues.ContainsKey("username") AndAlso e.PostValues.ContainsKey("password")  Then \'判断是否是验证失败后的重新登录
            wb.AddTopTips("","toptip1","用户名或密码错误!").msec = 2000 \'如果用户通过登录按钮访问,则给用户一个2秒的提示.
        End If
        wb.AddForm("","form1","logon.htm")
        With wb.AddInputGroup("form1","ipg1")
            .AddInput("username","户名","text")
            .AddInput("password","密码","password")
        End With
        With wb.AddButtonGroup("form1","btg1",True)
            .Add("btn1", "登录", "submit")
        End With
调用页面
dim wb as new weui
Select Case e.path
    Case "logon.htm" \'登录页面
  functions.execute("logon",e)
End Select

通过这种方式，我想问一下，如何传递 用户名 密码 以及判断是否登录过呢
--  作者：狐狸爸爸
--  发布时间：2017/3/30 16:26:00
--  
这一节的帮助，不是有现成的例子吗，全部都是测试通过的哦。
你已经将e参数传递給了内部函数，内部函数就可以：

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

Dim e As RequestEventArgs = args(0)
Dim pwd as String = e,PostValues("password")
--  作者：有点色
--  发布时间：2017/3/30 16:52:00
--  
 用 cookies 存放是否登录的用户名和密码，获取cookies的值。
--  作者：bohe
--  发布时间：2017/3/30 17:11:00
--  
怎么两位回答的不一样啊？
--  作者：188802386
--  发布时间：2017/3/30 17:24:00
--  
Integer.TryParse(e.PostValues("year"), y) \'获取用户输入的 年
Dim pwd as String = e,PostValues("password")
这两种有什么区别呢
--  作者：有点色
--  发布时间：2017/3/30 18:36:00
--  
以下是引用188802386在2017/3/30 17:24:00的发言：
Integer.TryParse(e.PostValues("year"), y) \'获取用户输入的 年
Dim pwd as String = e,PostValues("password")
这两种有什么区别呢

 

没区别，前者只是转成整数而已。