Foxtable(狐表) → 用户栏目 → 专家坐堂 → 网页填报问题


  共有2521人关注过本帖树形打印复制链接

主题：网页填报问题
帅哥哟，离线，有人找我吗？
ycs5801
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：940 积分：6788 威望：0 精华：0 注册：2009/6/24 9:44:00 		网页填报问题  发帖心情 Post By：2021/3/1 21:43:00 [只看该作者]

  wb.AddForm("","form1","edit.htm?key=" & PrimaryKey &  "&page=" & PageNumber)
        With wb.AddInputGroup("form1","ipg1","编辑船舶")
            .AddInput("填报人","填报人","Text").Value = dr("填报人")
            .AddInput("手机号","手机号","Text").Value = dr("手机号")
            .AddInput("英文船名","英文船名","Text").Value = dr("英文船名")

现在想实现编辑该条信息时，只允许修改手机号，其它项不允许修改，可以实现吗？谢谢
 回到顶部
帅哥，在线噢！
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：106648 积分：542423 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/3/1 21:51:00 [只看该作者]

Foxtable为输入框提供了以下属性：

Value字符型，输入框的初始值
Readonly逻辑型，输入框是否只读
Post逻辑型，提示表单数据时是否包括此输入框的值，默认为True。
Required逻辑型，是否必须输入内容，目前基于iOS的多数浏览器暂不支持这个属性。
Placeholder字符型，对输入框预期值的提示

将HttpRequest事件代码设置为：

Select Case e.Path
    Case "test.htm"
        Dim wb As New weui
        wb.AddForm("","form1","test.htm")
        With wb.AddInputGroup("form1","ipg1","登录")
            With .AddInput("xm","户名","text")
                .Value = "张三"
                .Readonly= True
            End With
            .AddInput("xm","密码","password").Placeholder = "请输入6位数密码"
        End With
        With wb.AddButtonGroup("form1","btg1",True)
            .Add("btn1", "确定", "submit")
        End With
        e.WriteString(wb.Build) '生成网页
End Select
 回到顶部
帅哥哟，离线，有人找我吗？
ycs5801
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：940 积分：6788 威望：0 精华：0 注册：2009/6/24 9:44:00 		谢谢  发帖心情 Post By：2021/3/1 22:27:00 [只看该作者]

谢谢

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04297 秒, 4 次数据查询