Este artículo crea un archivo ActiveXDLL a través de VB5.0. Este archivo simula un proceso de lanzar un submarino de color y le presenta el tema de cómo llamar a DLL en ASP.
Dynamic Join Library (DLL) es una forma importante de acelerar la ejecución de partes clave de una aplicación, pero la mayoría de las personas probablemente no sepa una cosa, es decir, el archivo ASP también puede llamar a DLL para acelerar la ejecución del servidor. A continuación, presentaré brevemente los pasos de llamar a DLLS en un archivo ASP.
En primer lugar, debe haber un archivo DLL. Este ejemplo es crear un archivo ActiveXDLL a través de VB5.0. Este archivo simula un proceso de lanzar un submarino de color.
En el entorno VB5.0, cree un nuevo proyecto y haga doble clic en el icono ActiveXDLL en la ventana del nuevo proyecto. VB agregará automáticamente un módulo de clase al proyecto y establecerá el tipo de proyecto en ActiveXDLL. En la ventana Propiedades, cambie el atributo de nombre del módulo de clase a CLSDICE. En el menú del proyecto, seleccione Propiedades del proyecto y cambie el nombre del proyecto a MyDLL. En el menú Archivo, seleccione Guardar CLSDICE para guardar el módulo de clase como mydice.cls. Agregue el siguiente código:
OpcionExpliCit
PrivateMax, puntaSinteger
PublicPropertygetResult () Asinteger
Resultados = punto
Endpropertía
PublicPropertygetMaxPoint () Asinteger
Maxpoint = max
Endpropertía
PublicPropertyletMaxpoint (NumasInteger)
Max = num
Endpropertía
Publicsubthrow ()
Aleatorizar
Punto = int (rnd*max) +1
Endsub
Privatesubclass_initialize ()
Máx = 6
Endsub
Este módulo de clase define dos propiedades y un método del objeto CLSDICE. Estas propiedades y métodos simulan el proceso de lanzar la moneda de color. La propiedad MaxPoint representa el número de caras de la moneda de color. Agregar la instrucción PropertyLet permitirá al cliente modificar las caras de la moneda de color; La propiedad del resultado representa el número de puntos del último lanzamiento de la moneda de color; El método de lanzamiento representa la acción de lanzar la moneda de color; La instrucción privateUbClass_initialize establece el número predeterminado de caras de la moneda de color en 6 caras.
En el menú Archivo, seleccione Generar mydll.dll y guárdelo en el lugar apropiado. En este punto, creamos nuestro propio archivo DLL.
El segundo paso es consultar la clase CLSDICE en el archivo ASP.
Todo el código de ASP (ActiveServerPages) se ejecuta en el servidor, y los clientes solo pueden ver los resultados devueltos en HTML. Utiliza las etiquetas "<%" y "%>" para identificar el código de script, y no lo revela al cliente y usa etiquetas HTML para identificar contenido fuera del código. En el siguiente código DICE.ASP, la función CreateObject se usa para crear una instancia de objeto CLSDICE, que proviene del archivo ActiveX.dll-Mydll.dll creado anteriormente. El siguiente ejemplo utiliza el lenguaje de secuencias de comandos VBScript.
<!-metadatatype = "typelib" file = "path/mydll.dll"->