大漠免注册( 不是插件变量对象)

867427677

系统 XP GHOST版
新手求解答附源码:(网上搜集的),,只有一次可以运行程序,提示注册失败,其次运行,每次都会弹窗提示file:///C:\Users\kkxx\AppData\Roaming\Tencent\Users\2293710148\QQ\WinTemp\RichOle\04{]%ZDTX`UQ$KXY{1}8AQK.pngfile:///C:\Users\kkxx\AppData\Roaming\Tencent\Users\2293710148\QQ\WinTemp\RichOle\04{]%ZDTX`UQ$KXY{1}8AQK.png:DM 不是插件变量对象
  // ----------------------------------------------初始化--------------------------------
功能 初始化()                          
    //这里添加你要执行的代码
    大漠插件注册.大漠插件()
功能结束
//-------------------------------------------大漠插件函数----------------------------------
功能 大漠插件()
    变量 大漠版本 ="5.1412"  //DM 全局变量已经声明

    ws=com("Wscript.Shell")
    ws.run("regsvr32 atl.dll /s")

    dllcallret=dllcall(辅助.获取资源路径("rc:DmReg.dll"),"int","SetDllPathA","char *",辅助.获取资源路径("rc:dm.dll"),"int",0)
    dm=com("dm.dmsoft")
    如果(dm.ver() != 大漠版本)
        调试输出("版本注册成功")
    否则
        调试输出("版本注册失败")
    如果结束
功能结束

//------------------------------------------------------------------------------------
希望能得到大家的帮助,感谢那些帮助我的,以及想帮助但心有余力而不足的 盆友们

tan0360

谢谢楼主分享。