如何在Delphi中实现ASP编程

在这方面笔者最近通过inrpisre的资料，实现了在delphi环境中实现asp技术的web编程，现以一个介绍如下：

1、在delphi环境中建立一个新的acdiveX DLL项目Project1，然后通过delphi的Active Server Object建立一个ASP对象，在他的coClassName中填入所建立对象的名字MyAspObject.

2、通过type Library为刚建立的MyAspObject对象建立一个将要被脚本语言调用的方法MyAspRequest.

3、由于刚才所建立的ASP对象是从TASPObject继承的，应此我们在方法建立中可以直接使用asp对象，现在为我们建立的Asp对象填写代码如下：

produce TMyAspObject.MyAspRequest;

begin

repsonse.write('<p>您的姓名是:');

repsonse.write(request.form.item['Name']）；

repsonse.write('</p>');//从所要建立的网页中读出用户名//

repsonse.write('<p>您的工作是:');

repsonse.write(request.form.item['work']）；

repsonse.write('</p>');//从所要建立的网页中读出用户工作//

repsonse.write('<p>您用的开发工具:');

if(request.form.item['delphi'].count>0)

repsonse.write('delphi');

if(request.form.item['bcb'].count>0)

repsonse.write('c++ Builder');//判断用户所用的开发工具//

repsonse.write('</p>');

repsonse.write('<p>您的身份:');

repsonse.write(request.form.item['Identity'])；