Red de conocimiento informático - Aprendizaje de código fuente - ¿Cómo instalar el complemento Pushbutton Smurf Desert?

¿Cómo instalar el complemento Pushbutton Smurf Desert?

En realidad, hay instrucciones en el archivo de ayuda del complemento Desert

Primero cree un nuevo script y agregue los dos archivos de complemento RegDll y dm al archivo adjunto

Ingrese el código

Llamar a Register_dm

Sub Register_dm

Establecer ws= createobject("Wscript.Shell")

ws.run "regsvr32 atl.dll / s"

Establecer ws=nada

PutAttachment "." , "dm.dll"

PutAttachment ".\Plugin", "RegDll.dll"

Llamar a Plugin.RegDll.Reg(". \dm.dll")

Retraso 200

Establecer dm = createobject("dm.dmsoft")

ver = dm.

Si ver <> "3.1233" entonces

Establecer dm = nada

Establecer ws=createobject("Wscript. Shell")

ws.run "regsvr32 .\dm.dll /s"

Establecer ws=nada

Retraso 1000

Establecer dm = createobject( "dm.dmsoft")

Retraso 200

ver = dm.Ver()

Si ver <> "3.1233" Entonces

Cuadro de mensaje "La versión del complemento es incorrecta, la versión actual es: " & ver & ", el directorio donde se encuentra el complemento es: " & dm.GetBasePath() & Chr(10) & "Cierre el programa, vuelva a abrirlo e inténtelo de nuevo"

ver = dm.Ver()

Finalizar si

Finalizar si

End If

End Sub

Ejecute el programa una vez

Y copie los archivos RegDll y dm a la carpeta del complemento en la carpeta del complemento Pushbutton Pixie

El complemento se encuentra en el siguiente directorio: " & dm.GetBasePath() & Chr(10) & "Cierre el programa, vuelva a abrirlo e inténtelo de nuevo.