Existen varias versiones de Key Wizard. ¿Cuál es gratuita y permite hacer clic con el mouse en segundo plano en el juego? Por favor vea el suplemento
Generalmente uso la versión 2014, el complemento desert tiene una versión gratuita, el número de versión es 3.1233
Cómo registrarse, te lo enseñaré
Descargar the desert plug-in 3.1233
Si necesita descomprimir, coloque los archivos dm.dll y RegDll.dll descomprimidos en el archivo adjunto Key Wizard.
Ejecute el siguiente código. Este es un complemento de desierto registrado, que también se puede utilizar como plantilla. Al escribir scripts en el futuro, el script que termina en // ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ clavado en la parte superior. // Esta es una plantilla para usar el complemento desert. Primero debe registrarse para usar el complemento desert. La plantilla aquí ya incluye el registro
//? Primer paquete dm.dll y RegDll. dll en el archivo adjunto, por supuesto, si otros recursos (fuentes, imágenes, etc.) también se pueden empaquetar juntos
//?Este need_ver porque este script necesita usar la versión del complemento. Recuerde cambiar este valor si cambia los complementos.
//↓↓↓↓↓↓↓↓↓?¿Configuraciones relacionadas con los parámetros del desierto? ↓↓↓↓↓↓↓↓↓
Const?need_ver?=?"3.1233"
Const?BasePath?=?"D:\Desert release\file"// Desierto Ruta
// ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑? ¿Configuraciones relacionadas con los parámetros del desierto? ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑
¿Llamar? RegDm()
//↓↓↓↓↓↓↓↓↓?¿Inicio del script? ↓↓↓↓↓↓↓↓↓
Si?dm.DmGuard(1,?" np") =?0?Entonces?
TracePrint?"No se pudo abrir el cubierta protectora "
ElseIf?dm.DmGuard(1,??" np")? =?1?Then
TracePrint?"La cubierta protectora se ha abierto correctamente... "
En caso contrario
TracePrint?"Error desconocido"
¿Fin? Si
// ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ?Fin del guión? ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑
////↓↓↓↓↓↓↓↓↓ ¿Funciones comunes en el desierto? ↓↓↓↓↓↓↓↓↓
Sub?RegDm()
Dim?patharr,?i,?FatherPath,?ver,?base_path
patharr?=?split(BasePath,?" \")
Para?i?=?0?A?UBound(patharr)
Si?i?=?0?Entonces ?
FatherPath?=?FatherPath?
Else
Llamar?Plugin.File.CreateFolder(FatherPath)//crear ruta
Delay?*.*"//Liberar todos los archivos adjuntos en BasePath
Set?ws?=?createobject("Wscript.Shell")
/?El complemento debe usarse la biblioteca del sistema atl Algunos sistemas XP lite desactivarán atl.dll lite.
Para evitar errores de registro, registre manualmente atl.dll aquí
ws.run?"regsvr32?atl.dll?/s"
Llame a Plugin.RegDll.Reg(BasePath ? &?"\dm.dll")//Registrarse con el complemento
Set?dm?=?createobject("dm.dmsoft")//Crear objeto del desierto
ver?= ?dm.ver()//Esperando la versión del objeto desierto
//Si el sistema no ha registrado ver como valor nulo, si se ha registrado, esperar la comparación ver
// Si el sistema no ha registrado ver como valor nulo. Si se ha registrado, esperará para comparar la versión del objeto desierto.
Si?entonces// Si coincide, regístrelo
If?"regsver32? /u?/s?"? &?base_path?&?" dm.dll"
Delay?1000
ver?=?""
Establecer ?dm?=?createobject("dm.dmsoft")
ver?=?dm.ver()//Espera hasta que la versión del objeto desert
If?ver? =?"" ?Then?
TracePrint?"La desinstalación de Desert falló, la versión actual se realizó correctamente"
Else
MessageBox?"La desinstalación de Desert falló, la versión actual de Desert es:?" ? &?ver?&?" ??El camino del desierto es:?? dm.getBasePath()
¿Salir de Script?
¿Fin?Si
Fin?Si
ws.run?"regsvr32?"? &?BasePath?&?"\ddm.dll?/s"
Retraso?1000
ver?=?"
Establecer?dm?=? createobject("dm.dmsoft")
ver?=?dm.ver ()
¿Si?ver?<>?need_ver?Entonces?
MessageBox ?"No se pudo registrar en Desert, versión actual de Desert:?" ? &?ver?&?"
MessageBox?? ¿Cuál es el camino hacia el desierto? ?dm.getBasePath()
Salir de Script
Fin?Si
Fin?Si
Establecer?ws?=?nada
TracePrint?"El registro de Desert se realizó correctamente, la versión actual de Desert es:?" ? &?ver?&?" ??La ruta de Desert es:?" &?dm.getBasePath()
//?El siguiente código establece la ruta global al directorio raíz de la unidad c
dm_ret?=?dm.SetPath(BasePath)
End?Sub
Si se ejecuta la depuración y se muestra el siguiente contenido, el registro se realizó correctamente
--------------------- ----------- ----------- Registro completado-------------------------- ------------------- ---
El paso 3 que acabamos de realizar ahora puede realizarse
Como plantilla, por supuesto, si el registro se realiza correctamente, existe una forma más sencilla de utilizar el complemento Desert.
Utilice el siguiente código para utilizar el complemento Desert directamente sin colocar el archivo DLL en el archivo adjunto.
Set?dm?=?CreateObject("dm.dmsoft")?/ /Crear Desert y obtener la versión de Desert
TracePrint?"El número de versión registrada actual de Desert:?? &?dm.ver()
Simplemente escriba el código clave en el end.
p>Por supuesto, si no está familiarizado con los comandos, puede consultar este archivo. Contiene todos los comandos de Desert
------. ----------- --------------------------------------- ----------- --------------------
El problema con los clics del mouse en segundo plano es que la ventana está dividida en la ventana principal y la ventana del cliente, y la diferencia entre estas dos ventanas Los identificadores de las dos ventanas son diferentes. Si los identificadores son incorrectos, definitivamente no se logrará el propósito. El asistente no es bueno para ejecutar la idea en segundo plano.