功能 初始化()
变量 是否成功,版本号,dm,dm_zc,dm_sf
是否成功=辅助.是否注册("dm.dmsoft")
如果(是否成功)
编辑框.设置文本("编辑框0","插件已注册")
否则
编辑框.设置文本("编辑框0","没有注册")
dm_zc=辅助.注册插件("rc:\\dm.dll",真)
如果(dm_zc)
dm=com("dm.dmsoft")
版本号=dm.Ver()
编辑框.设置文本("编辑框0","大漠注册成功,版本号为:"&版本号 )//完全可以删除
如果(版本号!="3.1233")
dm_zc=辅助.注册插件("rc:\\dm.dll",假)
dm=null
dm_zc=辅助.注册插件("rc:\\dm.dll",真)
如果结束
如果结束
如果结束
dm=null
dm=com("dm.dmsoft")
版本号=dm.Ver()
dm_sf = dm.Reg("sfmsks902f724f062a1a9eaa7e039acfc0decc","")
调试输出(dm_sf)
如果(dm_sf!=1)
编辑框.设置文本("编辑框0","收费注册不成功")
否则
编辑框.设置文本("编辑框0","收费成功版本号为:"&版本号) //完全可以删除
如果结束功能 初始化()
变量 是否成功,版本号,dm,dm_zc,dm_sf
是否成功=辅助.是否注册("dm.dmsoft")
如果(是否成功)
编辑框.设置文本("编辑框0","插件已注册")
否则
编辑框.设置文本("编辑框0","没有注册")
dm_zc=辅助.注册插件("rc:\\dm.dll",真)
如果(dm_zc)
dm=com("dm.dmsoft")
版本号=dm.Ver()
编辑框.设置文本("编辑框0","大漠注册成功,版本号为:"&版本号 )//完全可以删除
如果(版本号!="3.1233")
dm_zc=辅助.注册插件("rc:\\dm.dll",假)
dm=null
dm_zc=辅助.注册插件("rc:\\dm.dll",真)
如果结束
如果结束
如果结束
dm=null
dm=com("dm.dmsoft")
版本号=dm.Ver()
dm_sf = dm.Reg("sfmsks902f724f062a1a9eaa7e039acfc0decc","")
调试输出(dm_sf)
如果(dm_sf!=1)
编辑框.设置文本("编辑框0","收费注册不成功")
否则
编辑框.设置文本("编辑框0","收费成功版本号为:"&版本号) //完全可以删除
如果结束 |