dm_ret = dm.Reg("abcdefg","")

zhangningde1987

第一次使用大漠5.0 发现了很多不一样的地方  求高手给帮忙解决
dm_ret = dm.Reg("abcdefg","")  大漠的这个语句  我在5.0使用中 提示错误的表达式语句  .Reg("abcdefg","")  
大家给说说  我5.0的该怎么写   非常感谢!!!

这论坛不错

5.0的写法也是这样，但是你的dm不是大漠对象，插件没注册成功吧

z905112236

启动事件中 执行搜狗浏览器_初始化() 方法  是以线程形式开启的吧

zhangningde1987

变量 线程ID
变量 dm=com("dm.dmsoft")

功能 执行()
    //从这里开始你的代码
结束


功能 搜狗浏览器_初始化()
    变量 dm_ret
    变量 程序路径=系统获取工作路径()
    变量 配置路径=程序路径&"configs.ini"
    dm=免注册插件("4.1336")
    dm_ret = dm.Reg("zhangningde19870cf56be0869e0d34791e31f410bb814d","")
    调试输出(dm_ret)
    如果(dm_ret!=1)
        调试输出("注册不成功!!!")
    否则
        调试输出("收费插件注册成功")
    结束
结束

功能 免注册插件(版本)
    变量 DmReg路径,Dm路径,ws
    ws=com("Wscript.Shell")
    ws.run("regsvr32 atl.dll /s")
    DmReg路径=获取资源路径("rc:DmReg.dll")
    Dm路径=获取资源路径("rc:dm.dll")
    dllcall(DmReg路径,"int","SetDllPathA","char *",Dm路径,"int",0)
    等待(随机数(100,1000))
    dm=插件("dm.dmsoft")
    如果(获取变量类型(dm)=="com")
        调试输出(dm.Ver())
        如果(dm.Ver()!=版本)
            调试输出("插件注册失败,请联系作者!!")
            退出()
        否则
            调试输出("插件注册成功,返回大漠")
            返回 dm
        结束
    否则
        调试输出("插件注册失败,请联系作者!!")
        退出()
    结束
结束

现在问题是 运行到Reg这 TC就卡死了