- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 扫描仪 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=137835)
-- 发布时间：2019/7/16 23:18:00
-- 扫描仪
这个扫描仪的界面很好，但是一直报错，不知道什么原因？
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:摄像头拍照.zip |
-- 发布时间：2019/7/16 23:20:00
--
我希望能够扫描后自动修改扫描文件的名称，并把文件上传到ftp中指定的文件中。该怎么做？
-- 发布时间：2019/7/17 8:33:00
--
报什么错？dll复制到Foxtable安装目录了吗？全局代码照抄了吗？
-- 发布时间：2019/7/18 18:50:00
--
有没有可以推荐的拍摄仪实现能够提供DLL文件，通过使用Foxtable设计的程序能够实现拍摄、改名、上传，不用拍照片再一个一个改名上传
-- 发布时间：2019/7/19 5:45:00
--
我买了一款方正Q320C高拍，里面有很多DLL文件，怎么知道引用那个文件的？
-- 发布时间：2019/7/19 6:21:00
--
例子中是我做了一个简易的拍照项目，有两个问题需要解决，一是拍一张照片后必须先把扫描仪关掉才能形成文件，我希望是鼠标在第一行拍完后、可以在第二行继续拍，以此类推; 二是能够把拍摄的文件名也更改了。该怎么办
-- 发布时间：2019/7/19 6:23:00
--
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:管理项目11.zip |
-- 发布时间：2019/7/19 6:39:00
--
6楼中第一个问题解决了，我希望在拍摄后，根据不同人姓名存在不同人的照片，以下代码应该怎么修改？
在例子BeforeAttachFile事件中写了以下代码，
Select Case e.DataCol.Name
Case "照片" \'如果在图片列插入文件
e.Subfolder = e.DataRow("姓名") \'将此文件存放在目录名为部门名称的子目录中.
End Select
-- 发布时间：2019/7/19 7:43:00
--
以下代码中无论是否存在T:\\高拍文件\\" & r("姓名")，点拍摄时都会
.NET Framework 版本：4.0.30319.42000
Foxtable 版本：2019.6.18.1
错误所在事件：文件监视器,FileCreated
详细错误信息：
未能完成操作，因为在此路径“T:\\高拍文件\\王五”中已经存在一个目录。不知道原因是什么？该怎么修改？
Dim r As Row = Tables("员工").Current
r("照片") = r("姓名") & r("工号") & ".jpg"
FileSys.CopyFile(e.FullPath, ProjectPath & "Attachments\\" & r("照片"),True)
If FileSys.DirectoryExists("T:\\高拍文件\\" & r("姓名")) = True Then
msgbox(1)
FileSys.MoveFile(e.FullPath,"T:\\高拍文件\\" & r("姓名"))
FileSys.RenameFile(e.FullPath,r("照片"))
Else
msgbox(2)
FileSys.CreateDirectory("T:\\高拍文件\\" & r("姓名"))
FileSys.MoveFile(e.FullPath,"T:\\高拍文件\\" & r("姓名"))
FileSys.RenameFile(e.FullPath,r("照片"))
End If
-- 发布时间：2019/7/19 9:07:00
--
T盘改为D盘试试保存到本地硬盘