大漠外掛幫助檔案裡面其實是有說明的
首先新建一個指令碼 把檔案RegDll和dm兩個外掛新增到附件裡面去
輸入程式碼
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 200
Set dm = createobject("dm.dmsoft")
ver = dm.Ver()
If ver "3.1233" then
Set dm = nothing
ws.run "regsvr32 .\dm.dll /s"
Delay 1000
MessageBox "外掛版本錯誤,當前使用的版本是:" & ver & ",外掛所在目錄是:" & dm.GetBasePath() & Chr(10) & "請關閉程式,重新開啟本程式再嘗試"
End if
End If
End Sub
執行一次即可
還有要把檔案RegDll和dm兩個外掛複製到按鍵精靈的plugin資料夾中哦
大漠外掛幫助檔案裡面其實是有說明的
首先新建一個指令碼 把檔案RegDll和dm兩個外掛新增到附件裡面去
輸入程式碼
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 200
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 1000
Set dm = createobject("dm.dmsoft")
Delay 200
ver = dm.Ver()
If ver "3.1233" then
MessageBox "外掛版本錯誤,當前使用的版本是:" & ver & ",外掛所在目錄是:" & dm.GetBasePath() & Chr(10) & "請關閉程式,重新開啟本程式再嘗試"
End if
End If
End Sub
執行一次即可
還有要把檔案RegDll和dm兩個外掛複製到按鍵精靈的plugin資料夾中哦