ISAPI的刷新问题(50分)

  • 主题发起人 主题发起人 redhat
  • 开始时间 开始时间
R

redhat

Unregistered / Unconfirmed
GUEST, unregistred user!
各位大小虾:
鉴于上一个问题ISAPI+SYbase目前情况已经脱离了原来主体
问题难点已经转移 而且问题很久每人回答,只好将问题结束,不过水能解决那个问题还可以在这里回答
我现在的问题
在写好的程序中我用得是put方法
在第一次执行DLL文件时总是 返回一个空叶
然后每次执行时都是返回的上一次查询的结果
Why????
必须要reload一下

 
问一下:你 reload 后 页面对不对?
> 在第一次执行DLL文件时总是 返回一个空叶.
>然后每次执行时都是返回的上一次查询的结果
这应该是你程序的错误.要不要发过来给你看看?
 
贴上一小段,大家给你会诊
 
reload后叶面是对的
当时 由于记错了曾经将 Form 的 Action 属性设为 Put
结果第一次能够出来
如果将Action 设为 Get那么第一次都出步来,一直说站点以连接
正在下载,然后就没有了结果,只能Reload,以后在使用ISAPI就和
put 是一样的了
 
PP1:PageProductor
Query_Master:Query;

procedure TWebModule1.WebModule1PP1Action(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
//var i :integer;
begin
Response.Content :=pp1.Content;
PP1.HTMLDoc.Clear ;
PP1.HTMLDoc.Add('***');
//删掉了一段 自己写表头
Query_master.Close;
Query_master.Active :=False;
Query_master.ParamByName('name').asstring :=
request.QueryFields.Values['name'];
Query_master.ParamByName('zzmm').AsString :=
Request.QueryFields.Values ['zzmm'];
Query_master .ParamByName ('dgree').AsString :=
Request .QueryFields.Values ['degree'];
Query_master .ParamByName ('major').AsString :=
Request .QueryFields.Values ['major'];
Query_master .ParamByName ('college').AsString :=
Request .QueryFields .Values ['college'];
Query_master .ParamByName ('sex').AsString :=
Request.QueryFields .Values ['sex'];
query_master .Open;
query_master.Active :=true;
Query_master.First ;
while not Query_master.Eof do
begin
pp1.htmldoc.Add('*****');
.....
//把表中的项加入
Query_master.Next ;
end;
Query_master.active:=false;
Query_master.Close;
// 写表尾
Html看不见
end;
 
笨蛋
先看一下是谁的用户好吗!!!!

你去吃饭的时候我发现:
Response.Content :=pp1.Content;
放到最后!
OK!

 
哎,50分呀!
给了个天天见的到的,内部流通了!
 
接受答案了.
 
后退
顶部