- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 能否在foxtable制作的软件中操作操作扫描软件？ (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=28541)
-- 发布时间：2013/2/2 9:50:00
-- 能否在foxtable制作的软件中操作操作扫描软件？
在软件中直接实现扫描保存到“多文件”夹里面。
自己能力有限，还是采取调用“外部程序”的方法简单一点。找到一款扫描软件，比较好用，跟大家一起分享。
此主题相关图片如下：未命名.jpg
打开外部程序
Dim Proc As New Process \'定义一个新的Process
Proc.File = "vuescan.exe" \'指定要打开的程序
Proc.Start()
添加扫描好的图片
Dim tx As WinForm.TextBox = e.Form.Controls("TextBox1")
Dim r As Row = Tables("表A").Current
Dim Newname As String
Newname=tx.value
FileSys.CopyFile(ApplicationPath &"scantemp\\"& "temp.jpg", ProjectPath & "\\Attachments\\照片\\" & r("身份证号码") & Newname &".jpg",True) \'照片复制到Attachments目录
r("照片") = r("身份证号码") & Newname & ".jpg"
Forms("输入名字").Close()
云盘提供下载
http://l9.yunpan.cn/lk/Q2rHRELhjXUjJ?sid=304
[此贴子已经被作者于2013-2-12 11:29:12编辑过]
-- 发布时间：2013/2/2 9:52:00
--
怎么贴不上图？
-- 发布时间：2013/2/2 9:52:00
--
此主题相关图片如下：2010122600445629.jpg
-- 发布时间：2013/2/2 9:59:00
--
如果扫描仪没有提供开发api，狐表是无法操作扫描仪的。
对于扫描仪软件，可能可以通过System.Windows.Forms.Form.ActiveForm来取巧控制。
最好的方法是，打开扫描仪软件，扫描保存以后，使用狐表的文件监视器，把那些文件拷贝过来就行了。
-- 发布时间：2013/2/2 12:42:00
--
" 对于扫描仪软件，可能可以通过System.Windows.Forms.Form.ActiveForm来取巧控制 "
这个帮助文件里没有，不会啊！林老师！
-- 发布时间：2013/2/2 12:48:00
--
以下是引用客家阿哥在2013-2-2 12:42:00的发言：
这个帮助文件里没有，不会啊！林老师！
意思是获取窗口的句柄，然后操作，较为麻烦。不建议使用。
-- 发布时间：2013/2/2 13:25:00
--
林老师，你看一下这个软件是怎么实现的，我觉得挺实用的
http://www.yatsoft.com/jizhang/index.html
-- 发布时间：2013/2/2 14:25:00
--
以下是引用客家阿哥在2013-2-2 13:25:00的发言：
林老师，你看一下这个软件是怎么实现的，我觉得挺实用的
http://www.yatsoft.com/jizhang/index.html
它应该使用WIA来控制的，很简单，不过我没有扫描仪，测试不了。你热衷的话，可以去了解一下。
http://wenku.baidu.com/view/2c3550b8f121dd36a32d821c.html
-- 发布时间：2013/2/2 16:56:00
--
林老师，给点例子提示，就假设你有扫描仪吧
我都不知道怎样在foxtable里引用WIA
-- 发布时间：2013/2/2 17:26:00
--
不明白了COM引用的wiader 而不是wia.