以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]Uploader图片上传调用照相机问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=113553)

--  作者:智友软件工作室
--  发布时间:2018/1/18 10:35:00
--  [求助]Uploader图片上传调用照相机问题
点击+号目前是打开文件管理器找图片,我想实现点击+号后直接打开手机相机拍照上传。(要求仅可通过照相拍照上传,不可以选择相册的照片)

请问能否实现


图片点击可在新窗口打开查看此主题相关图片如下:微信图片_20180118103134.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:微信图片_20180118103141.jpg
图片点击可在新窗口打开查看


--  作者:有点甜
--  发布时间:2018/1/18 10:52: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.AddButtonGroup("form1","btg1",True)
            .Add("btn1", "确定", "submit")
        End With
        wb.AppendHTML("<script>document.getElementById(\'up1\').setAttribute(\'capture\',\'camera\');document.getElementById(\'up1\').setAttribute(\'accept\',\'image/*\')</script>")
        e.WriteString(wb.Build) \'生成网页
End Select


--  作者:智友软件工作室
--  发布时间:2018/1/18 11:19:00
--  
我测试打开的还是图片相册而不是打开手机照相机
--  作者:有点甜
--  发布时间:2018/1/18 11:21:00
--  

1、我测试没问题,你换个浏览器换个手机测试;

 

2、如果2楼不行,那就没办法了;

 

3、你可以读取图片的拍摄时间的,参考 http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=78730&skin=0

 


--  作者:xluoping
--  发布时间:2023/7/13 0:13:00
--  
这个智能调用相机,而不能选择手机相册
wb.AppendHTML("<script>document.getElementById(\'up1\').setAttribute(\'capture\',\'camera\');document.getElementById(\'up1\').setAttribute(\'accept\',\'image/*\')</script>")