//释放“附件”中自己添加的文件到D:\dm目录中，释放Regdll.dll到plugin目录中
PutAttachment "D:\dm", "*.*"
PutAttachment ".\plugin", "Regdll.dll"

//调用regdll.dll,注册大漠插件
Call Plugin.Regdll.reg("D:\dm\dm.dll")

//创建一个大漠对象
Set dm = createobject("dm.dmsoft")

//检查是否创建成功
ver = dm.ver()
If len(ver) = 0 Then 
 MessageBox "插件注册失败,检查系统是否禁用了vbs脚本权限"
 EndScript
'Else 
' MessageBox "插件注册成功,当前使用的版本是:"&ver
End If