- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- AddInput 在苹果手机上输入不了任何字符 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=189705)
-- 发布时间：2023/12/19 16:25:00
-- AddInput 在苹果手机上输入不了任何字符
AddInput 在苹果手机上输入不了任何字符 请问这个如何解决？
-- 发布时间：2023/12/19 16:33:00
--
代码？
-- 发布时间：2023/12/19 16:45:00
--
晚点发出，项目在家里的电脑
-- 发布时间：2023/12/21 0:18:00
--
Dim e As RequestEventArgs = Args(0)
Dim wb As New weui
wb.AddPageTitle("","pageheader","测试","测试")
wb.AppendHTML("<link rel=\'stylesheet\' href=\'css/common.css\' Type=\'text/css\' charset=\'utf-8\'/>", True)
wb.AddToast("","t1", "正在验证中",1) \'定义提示
wb.AddForm("","form1","logon.htm").attribute= """
With wb.AddInputGroup("form1","ipg1","基本资料")
Dim yzm3 As String = Rand.NextString(4)
.AddHiddenValue("sjyzm",yzm3)
With .AddInputCell("i1",1)
.AddLabel("lmm","编号",0)
.AddInput("CompanyCode2","text",1).PlaceHolder= "请输入CNT开头的编号" \'这里的输入框苹果手机输入不了
End With
With .AddInputCell("i2")
.AddLabel("lyzm","验证码",0)
With .AddInput("yzm2","text",1) \'这里的输入框苹果手机输入不了
.Max = "4" \'这里的限制没有生效（电脑网页和安卓手机都不生效）
End With
.AddLabel("hym",yzm3,2)
End With
End With
With wb.AddButtonGroup("form1","btg1",True)
.Add("btn1", "进入", "submit")
End With
e.WriteString(wb.Build) \'生成网页
[此贴子已经被作者于2023/12/21 0:19:45编辑过]
-- 发布时间：2023/12/21 8:47:00
--
这样测试有没有问题
With .AddInputCell("i1",1)
.AddLabel("lmm","编号",0)
.AddInput("CompanyCode2","text",1) \'这里的输入框苹果手机输入不了
End With
With .AddInputCell("i2")
.AddLabel("lyzm","验证码",0)
.AddInput("yzm2","text",1) \'这里的输入框苹果手机输入不了
.AddLabel("hym",yzm3,2)
End With
-- 发布时间：2023/12/21 9:23:00
--
我先试试
[此贴子已经被作者于2023/12/21 9:23:24编辑过]
-- 发布时间：2023/12/21 9:36:00
--
刚测试又可以了……真是 奇了 怪了
-- 发布时间：2023/12/21 10:43:00
--
奇怪 现在出现 部分苹果手机 可以，部分 苹果手机 不行
-- 发布时间：2023/12/21 10:49:00
--
input控件只是最基础的网页控件，不行就只能是系统的问题了，更新到新版系统试试。