VBS 脚本调用外部程序

Sub OpenExe(ByVal file)
' 示例: OpenExe("D:\AfReport\AfReport.exe" )
' 功能: 打开外部程序
' 设计: 年纪涛 13913140677
' 修改: 2021-7-15
' 从此位置起写入代码：
 
' On Error Resume Next  
    Dim objShell
    Set objShell = CreateObject("Wscript.Shell")    
    objShell.Run  file     
 End Sub

 

可以在wincc 画面上添加按钮点击事件,

调用此脚本,传入要打开的文件地址.