VBS脚本通过部分文件名在网络驱动器上运行，而不是本地。

以下是一个示例代码，演示如何使用VBS脚本在网络驱动器上运行指定文件名的文件：

Dim objFSO, objFolder, objFile, objShell
Dim strNetworkPath, strFileName, strFilePath

' 设置网络驱动器的路径
strNetworkPath = "\\server\share\folder\"

' 设置要运行的文件名
strFileName = "example.txt"

' 构建完整的文件路径
strFilePath = strNetworkPath & strFileName

' 创建文件系统对象
Set objFSO = CreateObject("Scripting.FileSystemObject")

' 检查文件是否存在
If objFSO.FileExists(strFilePath) Then
    ' 创建Shell对象
    Set objShell = CreateObject("WScript.Shell")
    ' 运行文件
    objShell.Run strFilePath
Else
    WScript.Echo "文件不存在。"
End If

' 清理对象
Set objFSO = Nothing
Set objFolder = Nothing
Set objFile = Nothing
Set objShell = Nothing

在以上示例中，我们首先设置网络驱动器的路径（strNetworkPath）和要运行的文件名（strFileName）。然后，我们使用Scripting.FileSystemObject对象来检查文件是否存在。如果文件存在，我们创建WScript.Shell对象并使用其Run方法来运行文件。如果文件不存在，我们输出一条消息。最后，我们清理并释放对象。

请注意，为了使此脚本能够运行，您的计算机必须能够访问指定的网络驱动器和文件。