Class TTomIsapiExt (unit isapiext)

Inherits from

TObject

Constructors


constructor Create( var AECB: TEXTENSION_CONTROL_BLOCK );



Functions

destructor destroy ;

Get Request Method

function ParamRawData:string;


procedure Write(Buffer:string);


function GetParamItemName(inpStr:string;Cnt:integer):string;

parameters: aString : the complete string SepChar : a single character used as separator between the substrings result : the number of substrings

function GetParamItemValue(inpStr:string;Cnt:integer):string;


function GetToken(aString, SepChar: String; TokenNum: integer):String;


function NumToken(aString, SepChar: String):integer;


function ParamCount:Integer;


Properties

Events

Variables

ContentLength : integer;

Public Part Declare

ContentType : string;


GatewayInterface : string;


HttpAccept : string;


HttpUserAgent : string;


Params : TStrings;


QueryString : string;


RemoteAddr : string;


RemoteHost : string;


RemoteUser : string;


RequestMethod : string;


ScriptName : string;


ServerName : string;


ServerProtocol : string;


ServerSoftware : string;


FECB : ^TEXTENSION_CONTROL_BLOCK ;


FInputRawData : String;

Private Part Declare


Constructors


constructor Create( var AECB: TEXTENSION_CONTROL_BLOCK );


Functions


destructor destroy ;

Get Request Method


function ParamRawData:string;


procedure Write(Buffer:string);


function GetParamItemName(inpStr:string;Cnt:integer):string;

parameters: aString : the complete string SepChar : a single character used as separator between the substrings result : the number of substrings


function GetParamItemValue(inpStr:string;Cnt:integer):string;


function GetToken(aString, SepChar: String; TokenNum: integer):String;


function NumToken(aString, SepChar: String):integer;


function ParamCount:Integer;


Properties


Events


Variables


ContentLength : integer;

Public Part Declare


ContentType : string;


GatewayInterface : string;


HttpAccept : string;


HttpUserAgent : string;


Params : TStrings;


QueryString : string;


RemoteAddr : string;


RemoteHost : string;


RemoteUser : string;


RequestMethod : string;


ScriptName : string;


ServerName : string;


ServerProtocol : string;


ServerSoftware : string;


FECB : ^TEXTENSION_CONTROL_BLOCK ;


FInputRawData : String;

Private Part Declare