Foxtable(狐表) → 用户栏目 → 专家坐堂 → 代码调取照片拍照，拍出来就是分辨率只有640*480的？


  共有3583人关注过本帖树形打印复制链接

主题：代码调取照片拍照，拍出来就是分辨率只有640*480的？
帅哥哟，离线，有人找我吗？
fengwenliuyan
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：902 积分：8300 威望：0 精华：0 注册：2012/10/19 13:55:00 		代码调取照片拍照，拍出来就是分辨率只有640*480的？  发帖心情 Post By：2019/7/5 11:03:00 [只看该作者]

Dim c1 As new camera
If e.Col.Name = "照片" Then
    e.Cancel = True '取消默认动作
    c1.capture() '开始照相
    If c1.image IsNot Nothing Then '照相成功
        Dim file1 As String = ProjectPath & "Attachments/" & e.Row("归类") & "." & Format(e.Row("录入时间"), "yyyyMMdd") & "." & e.Row.DataRow.Lines("照片").count+1 & ".jpg"
        c1.Save(file1) '保存文件
        Dim ls1 = e.Row.DataRow.Lines("照片")
        ls1.add(fileSys.GetName(file1))
        e.Row.DataRow.Lines("照片") = ls1
    End If
End If

以上代码调取照片拍照，拍出来就是分辨率只有640*480的？
若要拍支持1920*1080或以上的照片，应该怎么调整设置数据？
 回到顶部
帅哥哟，离线，有人找我吗？
狐狸爸爸
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：管理员 帖子：47511 积分：251479 威望：0 精华：91 注册：2008/6/17 17:14:00 		  发帖心情 Post By：2019/7/5 11:11:00 [只看该作者]

可以看看：

不过建议采用第三方专业一点的拍照软件，然后foxtable监视文件夹，自动获取拍照的文件：
http://www.foxtable.com/webhelp/topics/1963.htm
 回到顶部
帅哥哟，离线，有人找我吗？
fengwenliuyan
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：902 积分：8300 威望：0 精华：0 注册：2012/10/19 13:55:00 		回复：（狐狸爸爸）可以看看：http://www.foxtable.co...  发帖心情 Post By：2019/7/5 15:57:00 [只看该作者]

 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:cs.zip


提示错误：系统找不到指定的文件？
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：112380 积分：572162 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2019/7/5 16:13:00 [只看该作者]

应该参考的是下面别人项目的用法，和帮助的用法完全不是一回事，不要张冠李戴。请打开别人的先项目测试，看懂代码再用到自己项目中
 回到顶部
帅哥哟，离线，有人找我吗？
fengwenliuyan
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：902 积分：8300 威望：0 精华：0 注册：2012/10/19 13:55:00 		回复：（有点蓝）应该参考的是下面别人项目的用法，和...  发帖心情 Post By：2019/7/5 16:32:00 [只看该作者]

可是我需要的是，像文件监视器一样，可以将拍好的照片以“客户”作为文件名，并自动存入“入库表”的“照片”列？
而您提供的实例中，照片保存路径每次都是需要用户手动调整的？
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：112380 积分：572162 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2019/7/5 16:35:00 [只看该作者]

这个例子是可以自动拍照自动保存的呀。需要用户手动调整什么

 回到顶部
帅哥哟，离线，有人找我吗？
fengwenliuyan
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：902 积分：8300 威望：0 精华：0 注册：2012/10/19 13:55:00 		回复：（有点蓝）这个例子是可以自动拍照自动保存的呀...  发帖心情 Post By：2019/7/5 16:42:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下：2222222222.png
图片点击可在新窗口打开查看
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：112380 积分：572162 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2019/7/5 16:50:00 [只看该作者]

只是一个保存路径而已啊，都是自己设置的，可以在代码里随机给个名称呀。别人在窗口里这样用，您也只会这样用吗

比如保存的时候按保存时间随机命名：

dim str as string = "c:\cam\" & format(date.now,"yyyyMMddHHmmssfffff") & ".jpg"
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04810 秒, 5 次数据查询