访问VBA-以编程方式将文件刻录到CD [英] Access VBA - Burn file to CD programatically

查看:97
本文介绍了访问VBA-以编程方式将文件刻录到CD的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧!

问题描述

我正在使用的数据库应用程序可管理扫描的文档.这些文档主要是存储在服务器驱动器上的PDF文件.文件名由数据库中的客户端ID#和其他一些标识文件类型的数字信息组成. Access db存储文件的描述性更强的名称,以及哪些文件属于哪些客户端,当您在数据库中拉出客户端时,该客户端文件的列表将显示在列表框中.现在,如果用户要将文件刻录到CD,则必须打开文件,将其以友好的名称保存到HDD中,将其关闭,然后在驱动器上找到它,然后将其拖到CD驱动器上进行刻录.我想添加一项功能,该功能允许用户从列表中选择一个文件并将其直接刻录到CD驱动器.该代码将使用描述作为文件名将文件自动保存到temp文件夹,然后将其刻录到CD.将文件保存到临时文件夹不是问题,但是我需要找到可以从VBA运行的代码或第3方工具来进行刻录.谁能指出我正确的方向?

A database app that I work on manages scanned documents. The documents are mostly PDF files stored on a drive on the server. The file names are made up of the client ID # from the database and some other numeric information that identifies the type of file. The Access db stores the more descriptive names of the files and which files belong to which clients and when you pull up a client in the database, a listing of that client''s files shows up in a listbox. Right now, if the user wants to burn a file to CD he has to open the file, save it with a friendly name to his HDD, close it, then find it on his drive and then drag it over to the CD drive for burning. I''d like to add a feature that allows the user to select a file from the list and burn it to the CD drive directly. The code would automatically save the file to a temp folder using the description as the file name and then burn it to the CD. Saving the file to a temp folder is not a problem but I need to find code or a 3rd party tool that I can run from VBA to do the burning part. Can anyone point me in the right direction?

推荐答案

ImgBurn [ ^ ]具有用于刻录光盘的命令行选项,并且100%免费(无广告),并且支持蓝光光盘和所有Windows操作系统(包括win7-64bit)!
使用Access VBA中的Shell()功能,您可以发送"命令来刻录光盘.
ImgBurn[^] has command line option to burn disc and is 100% free (no ads) and support Blue-ray disc and all windows os (including win7-64bit)!
Using Shell() function in Access VBA you can "send" command to burn disc.


这篇关于访问VBA-以编程方式将文件刻录到CD的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持IT屋!

查看全文
登录 关闭
扫码关注1秒登录
发送“验证码”获取 | 15天全站免登陆