TC官方合作论坛

标题: 请问专家那个语法错了 [打印本页]

作者: 很好很强大 时间: 2014-8-28 07:34
标题: 请问专家那个语法错了
本帖最后由很好很强大于 2014-8-28 07:58 编辑

空间天使插件注册
//默认空间
//开始按钮_点击操作
功能开始_点击()
功能结束
功能退出_点击()
铺助.退出（）

功能结束
功能初开始（）
变量是否成功，版本号dm,dm_zc,dm_sf
是否成功=铺助.是否注册（"ts.tssoft"）
如果(是否成功)
ts=com("ts.tssoft")
   编辑框.设置文本（"编辑框0"，"插件已注册:"&ts.ver()）
否则
      编辑框.设置文本（"编辑框0"，"没有注册"）
      dm_zc=铺助.注册插件（"rc:\\tsplug.dll",真）
      如果(dm_zc)


      ts=com("ts.tssoft")
      版本号=dm.ver()
      编辑框.设置文本（"编辑框0","大漠注册成功，版本号为:"&版本号&"\r\n"&"）
      如果(版本号！="4.019")
      dm_zc=铺助.注册插件（"rc:\\tsplug.dll",假）
      dm=null
      dm_zc铺助.注册插件（"rc:\\tsplug.dll",真）

      如果结束
如果结束
如果结束

作者: 续花丶 时间: 2014-8-28 07:45
2014年8月28日07:45:03

作者: 很好很强大 时间: 2014-8-28 07:58

续花丶发表于 2014-8-28 07:45
2014年8月28日07:45:03

空间天使插件注册
//默认空间

//开始按钮_点击操作
功能开始_点击()
功能结束
功能退出_点击()
铺助.退出（）

功能结束
功能初开始（）
变量是否成功，版本号dm,dm_zc,dm_sf
是否成功=铺助.是否注册（"ts.tssoft"）
如果(是否成功)
ts=com("ts.tssoft")
   编辑框.设置文本（"编辑框0"，"插件已注册:"&ts.ver()）
否则
      编辑框.设置文本（"编辑框0"，"没有注册"）
      dm_zc=铺助.注册插件（"rc:\\tsplug.dll",真）
      如果(dm_zc)


      ts=com("ts.tssoft")
      版本号=dm.ver()
      编辑框.设置文本（"编辑框0","大漠注册成功，版本号为:"&版本号&"\r\n"&"）
      如果(版本号！="4.019")
      dm_zc=铺助.注册插件（"rc:\\tsplug.dll",假）
      dm=null
      dm_zc铺助.注册插件（"rc:\\tsplug.dll",真）

      如果结束
如果结束
如果结束

作者: 续花丶 时间: 2014-8-28 08:00

程序DM版本="3.1233"
是否成功=辅助.是否注册("dm.dmsoft")
ts=com("dm.dmsoft")
如果(是否成功)
调试输出("插件已注册")
如果(程序DM版本!=ts.Ver())
调试输出("插件已注册,插件版本错误重新注册")
辅助.命令("cmd /c regsvr32 /u /s "&辅助.获取资源路径("rc:dm.dll"),真)
//提示重启!
辅助.退出()
否则
返回 1
如果结束
否则
调试输出("插件未注册,开始注册插件")
是否成功=辅助.注册插件("rc:\\dm.dll",真)
如果(是否成功)
调试输出("插件注册成功")
返回 1
否则
辅助.命令("cmd /c regsvr32 /s"&辅助.获取资源路径("rc:dm.dll"),真)
返回 1
如果结束
如果结束

复制代码

欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/)