一个判断 *** 作系统的VBScript脚本代码

西门子触摸屏基于不同的Windows *** 作系统，有的是标准的Windows系统，有的是嵌入式 *** 作系统Windows CE。这两种系统对于VBScript脚本的支持不同，因此在使用脚本编程之前，要判断当前屏幕是基于何种 *** 作系统。今天这篇文章，给大家介绍一个判断 *** 作系统的VBScript脚本代码。

在博途开发环境左侧项目树找到“HMI变量”，在其中新建一个文件夹，命名为“VBScript”。在VBScript中新建三个内部变量，分别命名为“WindowsCE”、“WindowsPC”和“checkWindowsOK”，数据类型均为“布尔型（Bool）”，如下图所示：

说明：

WindowsCE：true=WindowsCE *** 作系统

WindowsPC：true=标准Windows *** 作系统；

checkWindowsOK：true=检测系统成功；

在项目树“脚本”→“VB脚本”新建VB函数，命名为“checkWindowsOS”，编写代码如下：

说明：

声明一个文件对象变量objFileSys，并使用CreatObject函数生成文件对象。对于Windows CE和标准Windows系统，其语法不同（底层API不同），因此可以通过该函数来判断当前屏幕所运行的 *** 作系统。

好了，关于判断 *** 作系统的VBScript脚本就先介绍到这里。如果你有任何问题欢迎留言。

审核编辑：汤梓红