一个关于InternetExpress的问题(100分)

  • 主题发起人 主题发起人 sundayyoung
  • 开始时间 开始时间
S

sundayyoung

Unregistered / Unconfirmed
GUEST, unregistred user!
由PathInfo对应的WebActionItem的OnAction触发事件(我是用PageProducerd得到
content赋给Response.content的,在PageProducer的HtmlFile中导入的页面模板)
回传得到的页面显示不出由HtmlFile导入的页面模板中的所有插图及背景图片
请问问题出在哪里?
 
相关代码为:
procedure TWebModule1.WebModule1waJoinSeminarAction(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
var
sWSID: string;
begin
//把资料新增到资料表中
............................
............................
finally // wrap up
cdsTrainees.Active := False;
cdsregJoiners.Active := False;
Response.Content := ppReplyMessage.Content;
.............
end; // try/finally
Handled := True;
Handled := True;
end;


procedure TWebModule1.ppReplyMessageHTMLTag(Sender: TObject; Tag: TTag;
const TagString: String; TagParams: TStrings; var ReplaceText: String);
//加入回传页面内容
begin
if (Tag = tgCustom) and (CompareText(TagString, sReplyMessage) = 0) then
begin
ReplaceText := ReplaceText + '<P> 谢谢您的报名,祝您有愉快的一天</P>';
end
end;
 
后退
顶部