以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  调用摄像头时发生错误  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=50489)

--  作者:owenlyx
--  发布时间:2014/5/7 16:08:00
--  调用摄像头时发生错误
调用摄像头,发生以下错误

.NET Framework 版本:2.0.50727.5477
Foxtable 版本:2014.3.8.1
错误所在事件:窗口,商品管理,拍照,Click
详细错误信息:
GDI+ 中发生一般性错误。

代码是: 

Dim c As new camera
c.capture() \'开始照相
If c.image IsNot Nothing Then \'照相成功
    c.Save("E:\\后台操作系统\\后台操作系统") \'保存文件
End If

--  作者:Bin
--  发布时间:2014/5/7 16:13:00
--  
Dim c As new camera
c.capture() \'开始照相
If c.image IsNot Nothing Then \'照相成功
    c.image.Save("E:\\后台操作系统\\后台操作系统.jpg") \'保存文件
End If

--  作者:lsy
--  发布时间:2014/5/7 16:21:00
--  

内置拍照,反应慢,用这个看看:

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=48460&replyID=&skin=1


--  作者:owenlyx
--  发布时间:2014/5/7 16:58:00
--  
好的,那如果我想把所有的照片都保存在一个目录里面,应该如何写代码了? 
Dim c As new camera
c.capture() \'开始照相
If c.image IsNot Nothing Then \'照相成功
    c.image.Save("E:\\后台操作系统\\后台操作系统.jpg") \'保存文件
End If

--  作者:Bin
--  发布时间:2014/5/7 17:02:00
--  
 Dim c As new camera
c.capture() \'开始照相
If c.image IsNot Nothing Then \'照相成功
    c.image.Save("E:\\后台操作系统\\" & Guid.NewGuid.TOstring() & ".jpg") \'保存文件
End If