PutAttachment "C:\windows\test_game","*.*"
PutAttachment ".\plugin","dmReg.dll"
Public Declare Function SetDllPathW Lib "dmreg.dll" Alias "SetDllPathW" (ByVal path As String, ByVal mode As Long) As Long
a=SetDllPathW( "C:\windows\test_game\dm.dll", 0)
MessageBox a
set dm = createobject("dm.dmsoft")
Delay 500
dm_ret =dm.Reg("xxxxxxx","")
if dm_ret <> 1 then
MessageBox dm_ret
goto 注册
end if
[复制链接]
/2 
发表于 2018-7-31 21:31:12
