- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 苹果上面的日期什么设了只读，还是可以选择日期 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=170823)
-- 发布时间：2021/8/8 19:41:00
-- 苹果上面的日期什么设了只读，还是可以选择日期
此主题相关图片如下：screenshot_20210808_193910_com.huawei.browser.jpg
-- 发布时间：2021/8/8 22:19:00
--
代码？
-- 发布时间：2021/8/8 22:27:00
--
.Readonly = True
-- 发布时间：2021/8/8 22:31:00
--
苹果不支持这个属性：https://www.baidu.com/s?wd=%E8%8B%B9%E6%9E%9C%20Readonly
-- 发布时间：2021/8/8 23:21:00
--
那要什么弄，其他办法锁定呢
-- 发布时间：2021/8/9 8:29:00
--
看4楼链接
-- 发布时间：2021/8/9 9:14:00
--
解决方式：
<input type="text" />
不用设置readonly属性
什么用
-- 发布时间：2021/8/9 9:31:00
--
.AddInput("xm","户名","text").Attribute = "style=\'-webkit-user-select :none\'"
.AddInput("pw","密码","password").Attribute = "onfocus=\'this.blur();\'"
https://blog.csdn.net/weifenwang/article/details/75222544
https://www.cnblogs.com/ruishuiweixiang/p/8477785.html
[此贴子已经被作者于2021/8/9 10:23:54编辑过]
-- 发布时间：2021/8/9 10:13:00
--
Dim ddr As DataRow= DataTables("Users").SQLFind("Name=\'"& e.Cookies("username") &"\' " )
With wb.AddInputGroup("form1","ipg1","日期输入")
With .AddInput("xm","日期","date")
.Value = Format(Date.Today,"yyyy-MM-dd")
.Attribute= ""
If ddr IsNot Nothing AndAlso ddr("Group") = "员工"
.Attribute = "style=\'-webkit-user-select :none\'"
.Readonly = True
End If
End With
End With
还是可以看
-- 发布时间：2021/8/9 10:24:00
--
.Attribute = "style=\'-webkit-user-select :none\' onfocus=\'this.blur();\'"