您好,如果驱动器是可写的,是否有Windows API功能可以返回。有时在驱动器下可见驱动器,但是在试图编程写入它时,它会给您一个msg框错误,然后冻结应用程序,直到用户按下“确定”按钮为止。是否有内置功能可以检查驱动器是否在没有烦人错误框的情况下是可写的?

我已经尝试了Trycopy并返回相同的MSGBOX错误:(

谢谢!

有帮助吗?

解决方案

尝试打电话 SetErrorMode( SEM_FAILCRITICALERRORS) 为了防止错误消息框弹出。

http://msdn.microsoft.com/en-us/library/ms680621(vs.85).aspx

其他提示

您可以设置对Microsoft脚本运行时的引用。

然后,您可以使用以下代码:

Dim FSO as New FileSystemObject
Dim clsDrive as Scripting.Drive

Set clsDrive=FSO.GetDrive("C")

驱动器类具有FreeSpace属性,如果驱动器不可编写,则将为零。

此外,还有一个脚本。folder类,您可以使用具有属性属性的fso.getfolder(),该类别由fileattribute类型的标志组成。您可以使用像

clsFolder.Attributes And FileAttribute.Readonly 检查错误...可读性;-)

称呼 getVolumeInformation() 并检查 FILE_READ_ONLY_VOLUME 在返回的标志参数中。

许可以下: CC-BY-SA归因
不隶属于 StackOverflow
scroll top