ASP(20分)

我做了一个ASP文件显示数据模块中Table中数据的内容，可是总出错，请大家帮我看看哪里有错
我先建立了一个ActiveX Library，然后建立了一个Active Server Object，又添加了一个DataModule
在DataModule中加入一个Table（设置一个表）和一个DataSetTableProducer，将DataSet设置为Table1
在Type Library中添加了一个show方法，添加如下代码
procedure TTA.show;
begin
Response.Write(DataModule2.DataSetTableProducer1.Content);
end;
修改ASP文件
……..
<HR>
<% Set DelphiASPObj = Server.CreateObject("Project1.TA")
DelphiASPObj.show
%>
………
注册后，在测试时有IE中出现这样的错误
Microsoft VBScript 编译器错误 错误 '800a03f6'
缺少 'End'
/iisHelp/common/500-100.asp，行242 错误 '8000ffff'
灾难性故障
/TestApp/ta.asp，行9
我测试了，就是Show的事，但不知道是什么原因，如何解决