Si desea salir del nivel de entusiastas de ASP, debe aprender a escribir componentes para ASP. Busqué en Google y descubrí que solo hay unos pocos artículos sobre Delphi escribiendo componentes ASP, así que hoy escribí este artículo básico sobre los componentes ASP de Delphi, con la esperanza de que sea útil para los novatos. Si desea aprender VB para escribir componentes ASP, se recomienda ver el artículo de Tornado Big Brother (http://blog.csdn.net/online/category/9939.aspx), que no es algo que pueda comparar con. jeje :)
Comencemos, escribamos un ejemplo de "¡Hola mundo!" Estoy usando Delphi 7 aquí.
1. File-> New-> Other-> ActiveX-> ActiveX Library, y luego guárdelo como showdll.dpr
2. Nuevamente, archivo -> nuevo -> otros -> ActiveX -> ActiveX Server Object, complete CoclassName: showhello, otros permanecen sin cambios, haga clic en Aceptar.
3. Ahora comience a escribir el programa y agregue un método primero. Seleccione ISHOWHELLO-> Haga clic con el botón derecho-> nuevo-> Método y complete el nombre del método: SayWorld.
4. Ahora comience a escribir el programa, guarde la unidad1 como show.pas y luego agregue el código del método sayworld método
El código completo de show.pas es el siguiente:
Show de unidades;
{$ Warn Symbol_platform Off}
interfaz
usos
Comobj, ActiveX, ASPTLB, showDll_tlb, stdvcl;
tipo
Tshowhello = class (taspobject, ishowhello)
protegido
Procedimiento OnendPage;
procedimiento OnStartPage (const ascriptingContext: iunknown);
Procedimiento Saysworld;
fin;
Implementación
usa comserv;
procedimiento tshowhello.onendPage;
Comenzar
OnendPage heredado;
fin;
procedimiento tshowhello.onstartPage (const ascriptingContext: iunknown);
Comenzar
heredado OnStartPage (ascriptingContext);
fin;
procedimiento tshowhello.sayworld ();
Comenzar
Response.write ('Hello World');
fin;
Inicialización
TautoObjectFactory.Create (comserver, tshowhello, class_showhello,
cimultiinstance, tmapartment);
fin.
4. Haga clic en Ejecutar, compilarlo en DLL y registrarlo automáticamente. En este momento, avisarás:
Permítelo en el servidor web para que se ejecute.
El código modificado showhello.asp es el siguiente:
<html>
<Body>
<title> Prueba de Delphi ASP </title>
<centro>
<h3> Debería ver los resultados de su método del servidor activo de Delphi a continuación </h3>
</Center>
<hr>
<% Set delphiaspobj = server.createObject ("showdll.showhello")
Delphiaspobj.sayworld
%>
<hr>
</body>
</Html>
Ejecutarlo en el sitio de IIS para ver el efecto:
5. otro:
El componente escrito por Delphi, después de registrarse con el servicio de componentes WIN2000, puede ver el método de interfaz del componente
6. También hay parámetros que pasan entre la página ASP y el componente, que en realidad es pasar los parámetros al método llamado (función). Por favor practique estos más. Esto es principalmente para aprender a encapsular el código central de ASP y desempeñar un papel en la atraer a Jade.