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


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

主题:[求助]扫描

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


加好友 发短信
等级:七尾狐 帖子:1700 积分:11344 威望:0 精华:0 注册:2015/6/22 8:11:00
[求助]扫描  发帖心情 Post By:2020/5/28 12:06:00 [显示全部帖子]

老师,扫描总是出错。
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:扫描.rar
 

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


加好友 发短信
等级:七尾狐 帖子:1700 积分:11344 威望:0 精华:0 注册:2015/6/22 8:11:00
  发帖心情 Post By:2020/5/28 14:30:00 [显示全部帖子]

老师,那怎样在图片管理器外设置个按钮然后把获得的图片赋值给图片管理器。

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


加好友 发短信
等级:七尾狐 帖子:1700 积分:11344 威望:0 精华:0 注册:2015/6/22 8:11:00
  发帖心情 Post By:2020/5/28 18:21:00 [显示全部帖子]

老师,我想通过扫描仪获得并赋值给图片管理器,下面这段代码是扫描图片的吗?

Dim scanner As new TwainGui.MainFrame(ProjectPath & "test.bmp",False)
scanner.Showdialog
e.Form.Controls("PictureViewer1").Image = getimage(ProjectPath & "test.bmp")
[此贴子已经被作者于2020/5/28 19:09:22编辑过]

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


加好友 发短信
等级:七尾狐 帖子:1700 积分:11344 威望:0 精华:0 注册:2015/6/22 8:11:00
  发帖心情 Post By:2020/5/29 8:54:00 [显示全部帖子]

老师好,怎样定义该类型。

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

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


加好友 发短信
等级:七尾狐 帖子:1700 积分:11344 威望:0 精华:0 注册:2015/6/22 8:11:00
  发帖心情 Post By:2020/5/29 9:10:00 [显示全部帖子]

老师,是这三个吗?



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

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


加好友 发短信
等级:七尾狐 帖子:1700 积分:11344 威望:0 精华:0 注册:2015/6/22 8:11:00
  发帖心情 Post By:2020/5/29 9:53:00 [显示全部帖子]

老师
好长时间了在论坛上的,被引用的文件找不到了。

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


加好友 发短信
等级:七尾狐 帖子:1700 积分:11344 威望:0 精华:0 注册:2015/6/22 8:11:00
  发帖心情 Post By:2020/5/29 11:51:00 [显示全部帖子]

老师,怎样设置存储路径

Dim scanner As new TwainGui.MainFrame(ProjectPath & "test.bmp",False)
scanner.Showdialog
'e.Form.Controls("PictureViewer1").Image = getimage(ProjectPath & "test.bmp")
e.Form.Controls("PictureViewer1").AddFile(ProjectPath & "test.bmp")

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


加好友 发短信
等级:七尾狐 帖子:1700 积分:11344 威望:0 精华:0 注册:2015/6/22 8:11:00
  发帖心情 Post By:2020/5/29 14:04:00 [显示全部帖子]

老师好,


Dim str As String = "I:\设备管理\Attachments\商品图标\" & e.form.controls("textbox1").text & ".jpg"
Dim scanner As new TwainGui.MainFrame(str)
scanner.Showdialog
Tables("表A").Current("第一列") =  "商品图标\" & e.form.controls("textbox1").text & ".jpg"

上面代码不能在图片浏览器控件中浏览
我想把下面的代码融合到上面的代码中       老师万分感谢!
Dim scanner As new TwainGui.MainFrame(ProjectPath & "test.bmp")
scanner.Showdialog
e.Form.Controls("PictureViewer1").AddFile(ProjectPath & "test.bmp")

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


加好友 发短信
等级:七尾狐 帖子:1700 积分:11344 威望:0 精华:0 注册:2015/6/22 8:11:00
  发帖心情 Post By:2020/5/29 14:59:00 [显示全部帖子]

老师,图片浏览器还是不能正常显示。
Dim str As String = "I:\设备管理\Attachments\商品图标\" & e.form.controls("textbox1").text & ".jpg"
Dim scanner As new TwainGui.MainFrame(str)
scanner.Showdialog
e.Form.Controls("PictureViewer1").AddFile(str)
Tables("表A").Current("第一列") =  "商品图标\" & e.form.controls("textbox1").text & ".jpg"

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


加好友 发短信
等级:七尾狐 帖子:1700 积分:11344 威望:0 精华:0 注册:2015/6/22 8:11:00
  发帖心情 Post By:2020/5/29 15:51:00 [显示全部帖子]

老师,文件夹图片有点。

 回到顶部
总数 14 1 2 下一页