TC官方合作论坛

标题: dm在 win7 64位运行正常，在XP里面就出错了。帮忙看看代码 [打印本页]
作者: jokercn    时间: 2015-1-1 16:49
标题: dm在 win7 64位运行正常，在XP里面就出错了。帮忙看看代码
本帖最后由 jokercn 于 2015-1-1 16:53 编辑

[attach]18619[/attach]
在win7 64 里面 运行正常，换到XP 的系统 就出问题了。不知道问题出在哪里。。。。
代码如下
出错 显示 是
调试输出(dm.Ver())
这一句出错，因为编辑了下 所以序号错了一位   
  1. 空间 z自动登录
  2. 变量 dm
  3. 变量 窗口句柄
  4. 变量 intx,inty
  5. 功能 注册大漠插件()
  6. 是否成功=辅助.是否注册("dm.dmsoft")
  7. 如果(是否成功)
  8. 调试输出("插件已注册")
  9. 调试输出(dm.Ver())

  11. 否则
  12. 调试输出("插件正在注册")
  13. ws=com("Wscript.Shell")
  14. ws.run("regsvr32 atl.dll /s")
  15. dllcallret=dllcall(辅助.获取资源路径("rc:DmReg.dll"),"int","SetDllPathA","char *",辅助.获取资源路径("rc:dm.dll"),"int",0)
  16. dm=com("dm.dmsoft")
  17. 如果结束
  18. 辅助.等待(500)
  19. 调试输出(dm.Ver())
  20. 加载驱动=dm.Reg("jokercn80f417cc4b2b4bdd4f590eb3c6f63d9a","")
  21. 如果(加载驱动==1)
  22. 调试输出("VIP注册成功!")
  23. 加载驱动 =dm.DmGuard(1,"np")
  24. 如果(加载驱动==0)
  25. 调试输出("不支持的保护盾类型")
  26. 如果结束
  27. 如果(加载驱动==1)
  28. 调试输出("Guard加载驱动成功")
  29. 如果结束
  30. 如果(加载驱动==-2)
  31. 调试输出("驱动释放失败.(可能原因是权限不够,或者是把程序运行在了移动存储器上(移动硬盘,U盘,映射网络驱动器之类))")
  32. 如果结束
  33. 如果(加载驱动==-3)
  34. 调试输出("驱动加载失败,可能是权限不够")
  35. 如果结束
  36. 如果结束
  37. 如果(dm.SetDict(0,辅助.获取资源路径("rc:123.txt"))==1)
  38. 调试输出("字库设置成功")
  39. 如果结束
  40. 功能结束
  41. 空间结束
复制代码

作者: jokercn    时间: 2015-1-1 16:56
求助啊~~是系统少文件吗？
作者: OOOO    时间: 2015-1-1 17:28
你的第16行   DM还没有成功注册你就创建DM对象肯定出错啊
作者: OOOO    时间: 2015-1-1 17:29
然后19行你调用了DM   才出错的
作者: MrSixGod    时间: 2015-1-2 00:07
还有注册码也不删除?  分享给大家用吗?
作者: 2645572175    时间: 2015-6-24 15:16




欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/) Powered by Discuz! X3.1