Si desea alejarse del nivel de los entusiastas de ASP, entonces debería aprender a escribir componentes para ASP. Busqué en Google y descubrí que solo hay unos pocos artículos sobre cómo escribir componentes ASP en Delphi, así que hoy escribí este artículo básico sobre cómo escribir componentes ASP en Delphi. Espero que sea útil para los principiantes.
Para empezar, escribamos un ejemplo de "¡hola mundo!". Estoy usando Delphi 7 aquí.
1.Archivo->Nuevo->Otro->ActiveX->Biblioteca ActiveX, luego guárdelo como showdll.dpr
2. Nuevamente, vaya a Archivo->Nuevo->Otros->ActiveX->Objeto de servidor ActiveX, complete CoClassName: showhello, deje todo lo demás sin cambios y haga clic en Aceptar.
3. Ahora comience a escribir el programa y agregue un método primero. Seleccione Ishowhello->clic 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. 
El código completo de show.pas es el siguiente:
unit show;
{$WARN SYMBOL_PLATFORM APAGADO}
interfaz
utiliza
ComObj, ActiveX, AspTlb, showdll_TLB, StdVcl;
escriba
Tshowhello = clase (TASPObject, Ishowhello)
procedimientoprotegido
OnEndPage
; procedimiento OnStartPage (const AScriptingContext: IUnknown procedimiento sayworld;
fin
del método sayworld
);
implementación
utiliza ComServ;
procedimiento Tshowhello.OnEndPage
comienza
el final
de OnEndPage heredado
;
procedimiento Tshowhello.OnStartPage(const AScriptingContext: IUnknown);
comenzar
heredado OnStartPage(AScriptingContext);
procedimiento
Tshowhello.sayworld() //Definir el método sayworld
comenzar
respuesta.Write('Hola mundo'); en el interior Está escrito de la misma manera, simplemente resumido aquí.
fin;
inicialización
TAutoObjectFactory.Create (ComServer, Tshowhello, Class_showhello,
ciMultiInstance, tmApartment
4
). Haga clic en Ejecutar para compilarlo en una DLL y registrarlo automáticamente. En este momento le preguntará:
Le permitimos ejecutarlo en el servidor web. Bien, ahora escriba un archivo asp y llámelo. Tenga en cuenta que Delphi ya ha generado un archivo asp. Simplemente podemos cambiar el método de llamada.
El código showhello.asp modificado es el siguiente:
<HTML>
<BODY>
<TITLE> Probando Delphi ASP </TITLE>
<CENTER>
<H3> Deberías ver los resultados de tu método Delphi Active Server a continuación </H3>
</ CENTRO >
<HR>
<% Set DelphiASPObj = Server.CreateObject("showdll.showhello")
DelphiASPObj.sayworld
%>
<HR>
</BODY>
</HTML>
Ejecútelo en el sitio iis para ver el efecto: 
5. Otros:
para componentes escritos en Delphi, después de registrarse en el servicio de componentes de win2000, puede ver el método de interfaz del componente.
6． También hay parámetros que se pasan entre páginas ASP y componentes. De hecho, los parámetros se pasan a los métodos llamados (funciones). Tenga en cuenta que cuando se definen en Delphi, deben ser coherentes con el tipo de datos de vbs. Es mejor para todos practicarlos más. El objetivo principal aquí es permitir que todos aprendan cómo encapsular el código central de ASP y servir como punto de partida.
No hay muchas palabras para escribir esto, pero tomar capturas de pantalla es un poco problemático. Mi nivel es limitado. Si cometo un error, ¡dale una palmada suave! ! ! !
Un viento y una
nube2004-10-18