Set dm = createobject("dm.dmsoft")
//TracePrint dm.ver()
If dm.Ver() <> "3.1233" Then
Set dm = nothing
set ws=createobject("Wscript.Shell")
ws.run "regsvr32 E:\Downloads\大漠插件3.1233\dm.dll /s"
Set ws = nothing
Delay 1500
TracePrint "注册"
End If
If len(dm.Ver()) = 0 Then
MsgBox "注册未成功,请检查您的系统是否禁用了VBS脚本权限"
Else
MsgBox "注册成功,当前的版本号:"&dm.Ver()
End If
本文介绍了一段用于注册大漠插件3.1233版本的VBS脚本,通过检测当前版本并进行注册操作,确保插件版本为指定版本。如果注册不成功,将提示检查系统VBS脚本权限。
1万+

被折叠的 条评论
为什么被折叠?



