F
felee
Unregistered / Unconfirmed
GUEST, unregistred user!
用DELPHI中建立了一个Active Lib,然后加入一个Active Server Object,自动产生以下代码:
procedure TGenerateFace.OnEndPage;
begin
inherited OnEndPage;
end;
procedure TGenerateFace.OnStartPage(const AScriptingContext: IUnknown);
begin
inherited OnStartPage(AScriptingContext);
end;
我想在onstargpage中声明有关的ASP对象,如response,request,session,application等
在VB中我是这样声明的:
Set gmyRequest = myScriptingContext.Request
Set gmyResponse = myScriptingContext.Response
Set gmyServer = myScriptingContext.Server
Set gmySession = myScriptingContext.Session
Set gmyApplication = myScriptingContext.Application
DELPHI中如何声明?
procedure TGenerateFace.OnEndPage;
begin
inherited OnEndPage;
end;
procedure TGenerateFace.OnStartPage(const AScriptingContext: IUnknown);
begin
inherited OnStartPage(AScriptingContext);
end;
我想在onstargpage中声明有关的ASP对象,如response,request,session,application等
在VB中我是这样声明的:
Set gmyRequest = myScriptingContext.Request
Set gmyResponse = myScriptingContext.Response
Set gmyServer = myScriptingContext.Server
Set gmySession = myScriptingContext.Session
Set gmyApplication = myScriptingContext.Application
DELPHI中如何声明?