Foxtable(狐表)用户栏目专家坐堂 → 怎么关闭拍照功能?


  共有2725人关注过本帖平板打印复制链接

主题:怎么关闭拍照功能?

帅哥哟,离线,有人找我吗?
飘过的巨蟹座
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:140 积分:1084 威望:0 精华:0 注册:2021/8/6 21:17:00
怎么关闭拍照功能?  发帖心情 Post By:2021/8/8 18:51:00 [只看该作者]

Select Case e.Path
    Case "test.htm"
        Dim wb As New weui
        wb.AddForm("","form1","test.htm")
        With wb.AddInputGroup("form1","ipg1",
"
文件上传") '文件上传
            .AddUploader("up1","")
        End With
        With wb.AddInputGroup("form1","ipg22",
"
文件上传") '带图片浏览的文件上传
            With .AddUploader("up2",
"
图片",True) 'True表示允许一次上传多个文件
                .AddImage("./images/001.jpg")
                .AddImage("./images/002.jpg")
                .AddImage("./images/003.jpg")
            End With
        End With
        With wb.AddButtonGroup("form1","btg1",True)
            .Add("btn1",
"
确定", "submit")
        End With
       
e.WriteString(wb.Build) '生成网页
End Select

 回到顶部