Call Register_dm
Sub Register_dm
Set ws=createobject("Wscript.Shell")
ws.run "regsvr32 atl.dll /s"
Set ws=nothing
PutAttachment ".", "dm.dll"
PutAttachment ".\Plugin", "RegDll.dll"
Call Plugin.RegDll.Reg(".\dm.dll")
Delay 100
Set dm = createobject("dm.dmsoft")
ver = dm.Ver()
If ver <>"3.1233" then
Set dm = nothing
Set ws=createobject("Wscript.Shell")
ws.run "regsvr32 .\dm.dll /s"
Set ws=nothing
Delay 300
Set dm = createobject("dm.dmsoft")
Delay 100
ver = dm.Ver()
If ver <>"3.1233" then
Verify = 60
//下面这两行是一句,按键精灵里面写成一行。
MessageBox "插件版本错误,当前使用的版本是:" &ver &",插件所在目录是:" & dm.GetBasePath() &Chr(10) &"请关闭程序,重新打开本程序再尝试"
End if
End If
End Sub
创建大漠对象,就是一句话,就是这句:Set dm = createobject("dm.dmsoft")
之后就可以用大漠插件里面的函数了,如果是线程,必须每个线程创建一个大漠。这句话的意思是,在线程里面,每个线程都要在前面写一句 Set dm = createobject("dm.dmsoft")
至于后台,那就是绑定,大漠帮助文件里面有一个后台设置的内容,你看那里有详细讲,至于后台用哪种方式比较好,效果行不行,这就不确定了,这要你自己测试才知道(有时候,大漠那么多模式都不合适的),要是这样,你就想其他办法咯。
1、在电脑左下角,找到开始菜单图标,而后点击图标,d出新的选项卡
2、在新的选项卡,我们找到设置选项,而后点击,d出新的设置窗口
3、在新的窗口,我们找到隐私选项,而后点击隐私,进入隐私选项设置窗口
4、在隐私选项窗口,我们将左侧的导航窗格,向下拉到底部,而后找到后台应用选项
5、点击后台应用选项,右侧窗格d出所有系统后台应用的选项,
6、我们找到一款不需要后台开启自动的程序,而后点击,将其关闭即可,以后这个软件就不会再或者自动运行了
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)