Como todos sabemos, la tecnología ASP es la tecnología principal para nuestros programas web basados en la plataforma Internet/Intranet. En las aplicaciones ASP, generalmente utilizamos dos lenguajes de script, vbscripts y javascripts. Sin embargo, el lenguaje de secuencias de comandos es un lenguaje no compilado y los programas web que desarrolla tienen problemas inherentes en términos de seguridad, eficiencia de ejecución y escalabilidad. Por lo tanto, cuando desarrollamos sistemas web, generalmente utilizamos lenguajes de alto nivel para escribir ASP. cuerpos de ejecución y luego usar scripts para El lenguaje sirve como código de conexión para llamar al cuerpo de ejecución ASP para realizar el acceso. En este sentido, desde que Microsoft introdujo la tecnología ASP, generalmente usamos VB o VC, entonces, ¿cómo pueden lograrlo los programadores de Delphi?
En este sentido, el autor recientemente se dio cuenta de la programación web de la tecnología ASP en el entorno Delphi a través de la información de inrpisre. La siguiente introducción es la siguiente:
1. Cree un nuevo proyecto DLL acdiveX PRoject1 en el entorno de Delphi, luego cree un objeto ASP a través del objeto Active Server de Delphi y complete el nombre del objeto creado MyAspObject en su coClassName.
2. Utilice la biblioteca de tipos para crear un método MyAspRequest para el objeto MyAspObject recién creado que será llamado por el lenguaje de secuencia de comandos.
3. Dado que el objeto ASP recién creado hereda de TASPObject, podemos usar directamente el objeto asp en la creación del método. Ahora complete el código para el objeto Asp que creamos de la siguiente manera:
producir TMyAspObject.MyAspRequest;
comenzar
repsonse.write('<p>Tu nombre es:');
repsonse.write(request.form.item['Nombre']);
repsonse.write('</p>');//Leer el nombre de usuario de la página web que se creará//
repsonse.write('<p>Tu trabajo es:');
repsonse.write(request.form.item['trabajo']);
repsonse.write('</p>');//Leer el trabajo del usuario desde la página web que se creará//
repsonse.write('<p>La herramienta de desarrollo que utiliza:');
if(solicitud.formulario.item['delphi'].count>0)
repsonse.write('delphi');
if(solicitud.formulario.item['bcb'].count>0)
repsonse.write('c++ Builder');//Determinar las herramientas de desarrollo utilizadas por el usuario//
respuesta.write('</p>');
repsonse.write('<p>Su identidad:');
repsonse.write(request.form.item['Identidad']);
repsonse.write('</p>');//Leer la identidad del usuario//
fin;
4. Compile el programa y regístrelo como archivo PMyAspObject.dll en Delphi.
5. Escriba el archivo de lenguaje de script ASP MyAsp.asp para la conexión.
<%@idioma=jscript %>
<HTML>
<CUERPO>
<title>Este es un objeto ASP creado con Delphi</title>
<center><h3>El contenido que debes completar es el siguiente</h3></center>
<%
var myasp;
myasp=servidor.createobject(PMyAspObject.MyAspObject);
//Generar objeto de conexión//
myasp.MyAspRequest();//Llame a su propio objeto ASP definido//
%>
</cuerpo>
</HTML>
6. Cree la página web Myhtm.htm para mostrarla.
<formulario acción='localHost/shd/myasp.asp' método='publicación">
<h1 align='center">Por favor seleccione</h1>
<P>Nombre: <tipo de entrada='texto' tamaño=33 nombre="nombre"></p>
<P>Trabajo: <input type='text' size=33 name="trabajo"></p>
<P>Herramientas de desarrollo: <input type='checkbox' name='delphi' value="on">delphi
<input type='checkbox'name='bcb'value="on">Constructor de c++</p>
<p>Tu identidad:</p>
<p><seleccione nombre="identidad" tamaño="1">
<opción>Estudiante</opción>
<opción>Técnico</opción>
</select></p>
<p><tipo de entrada="enviar" nombre="mienvío" valor="Enviar">
</formulario>
7. Luego coloque Myhtm.htm y myasp.asp en el directorio shd de su servidor web personal para explorar y probar.
Representaciones de páginas web
representaciones ASP
El programa anterior está implementado en pwin98 ME y delphi5.0 Enterprise.