以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  移动端默认输入  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=108322)

--  作者:yifan3429
--  发布时间:2017/10/20 10:27:00
--  移动端默认输入
Select Case e.Path
    Case "shpjxm.htm"
        wb.AddPageTitle("","pageheader","浦江别墅备忘录","艾迪尔国际家居")
        If e.PostValues.Count = 0 Then
            wb.AddForm("","form1","gzrb.htm")
            With wb.AddInputGroup("form1","ipg1","新的备忘录")
                .AddInput("项目","项目","Text")  
                .AddInput("订单号","订单号","Text")    
                .AddInput("日期","时间","date")
                .AddInput("姓名","记录人","Text")

黄色部分默认输入内容怎么写 不许填写者编辑
不如订单默认为 浦江别墅   订单号默认为1010
[此贴子已经被作者于2017/10/20 10:27:10编辑过]

--  作者:有点蓝
--  发布时间:2017/10/20 11:07:00
--  
With  .AddInput("项目","项目","Text") 
    .value = "浦江别墅"
    .readonly = True
End With

订单号自己参考写