使用FileSystemObject获取特洛伊木马警告

Question

我写了一个小程序来检查驱动器是否可用。当我在另一台计算机上安装它时，Avira Antivirus会弹出一个特洛伊木马警告。我将有问题的代码行缩小到：

20        Set fso = CreateObject("Scripting.FileSystemObject")
30        FD = fso.driveexists("F")

为什么我会收到警告？我很确定我过去曾使用它并且没有收到警告。但是，我过去只在DLL中使用它，这是一个EXE文件。除了使用FSO之外，还有其他方法可以检查指定的驱动器吗？

谢谢。

Answer 1

您收到警告的原因是防病毒程序认为您的脚本是病毒。它可以追溯到捕获计算机病毒就像在电子邮件中发送VBScript一样简单（称为yourbill.pdf.vbs），然后单击它。 VBScript将使用FileSystemObject方法造成损害和一般混乱。

当然......你仍然可以使用FSO：

dim a as string
a = "ting.FileSyst"
Set fso = CreateObject("Scrip"+a+"emObject")