Foxtable(狐表)用户栏目专家坐堂 → [求助]扫描


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

主题:[求助]扫描

帅哥哟,离线,有人找我吗?
有点甜
  21楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/2/28 23:07:00 [只看该作者]

PictureViewer1绑定表A第一列

 

Dim str As String = projectpath & "attachments/abc.jpg"

Dim scanner As new TwainGui.MainFrame(str)
scanner.Showdialog

Tables("表A").Current("第一列") = "abc.jpg"


 回到顶部
帅哥哟,离线,有人找我吗?
江南小镇
  22楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1700 积分:11344 威望:0 精华:0 注册:2015/6/22 8:11:00
  发帖心情 Post By:2018/2/28 23:31:00 [只看该作者]

谢谢老师

 回到顶部
帅哥哟,离线,有人找我吗?
江南小镇
  23楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1700 积分:11344 威望:0 精华:0 注册:2015/6/22 8:11:00
  发帖心情 Post By:2018/3/1 9:40:00 [只看该作者]

老师,我想在窗口中直接命名图片并保持。

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:扫描仪实例1.table


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  24楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/3/1 9:43:00 [只看该作者]

Dim str As String = projectpath & "attachments/" & e.form.controls("textbox1").text
Dim scanner As new TwainGui.MainFrame(str)
scanner.Showdialog
Tables("表A").Current("第一列") = e.form.controls("textbox1").text
[此贴子已经被作者于2018/3/1 9:43:38编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
江南小镇
  25楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1700 积分:11344 威望:0 精华:0 注册:2015/6/22 8:11:00
  发帖心情 Post By:2018/3/1 10:00:00 [只看该作者]

 老师,不能命名。

 


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

[此贴子已经被作者于2018/3/1 10:00:39编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
江南小镇
  26楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1700 积分:11344 威望:0 精华:0 注册:2015/6/22 8:11:00
  发帖心情 Post By:2018/3/1 10:02:00 [只看该作者]

老师,好了,谢谢。

 回到顶部
帅哥哟,离线,有人找我吗?
江南小镇
  27楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1700 积分:11344 威望:0 精华:0 注册:2015/6/22 8:11:00
  发帖心情 Post By:2018/3/1 14:36:00 [只看该作者]

Dim str As String = projectpath & "attachments/" & e.form.controls("textbox1").text
Dim scanner As new TwainGui.MainFrame(str)
scanner.Showdialog
Tables("表A").Current("第一列") = e.form.controls("textbox1").text


老师,怎样把图片设置成通用格式和绝对路径.


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  28楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/3/1 16:21:00 [只看该作者]

Dim str As String = e.form.controls("textbox1").text  '如 d:\test.jpg
Dim scanner As new TwainGui.MainFrame(str)
scanner.Showdialog
Tables("表A").Current("第一列") = e.form.controls("textbox1").text


 回到顶部
帅哥哟,离线,有人找我吗?
江南小镇
  29楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1700 积分:11344 威望:0 精华:0 注册:2015/6/22 8:11:00
  发帖心情 Post By:2018/3/2 11:00:00 [只看该作者]

老师,代码设置路径不对

Dim str As String = e.form.controls("textbox1").text & "L:\2345下载\窗口界面\快速扫描\Attachments\图片.jpg"
Dim scanner As new TwainGui.MainFrame(str)
scanner.Showdialog
Tables("表A").Current("第一列") = e.form.controls("textbox1").text

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  30楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/3/2 11:16:00 [只看该作者]

Dim str As String = e.form.controls("textbox1").text
Dim scanner As new TwainGui.MainFrame(str)
scanner.Showdialog
Tables("表A").Current("第一列") = e.form.controls("textbox1").text

 回到顶部
总数 42 上一页 1 2 3 4 5 下一页