Unit IsapiConnDB |
#######################################################################################} {# #} {# TIsapiConn is a small Unit that allows to recieve and send Data trough the #} {# ISAPI interface to IIS from Microsoft. #} {# #} {# This Unit is usefull for small ISAPI Applications with or without Database #} {# Connectivity. For bigger Projects use instead WebSbt from Steven Genusa #} {# #} {# http://rampages.onramp.net/~steveg/ #} {# #} {# Not all features are implemented yet, but you can add other features without #} {# problems, for further information read the Doc's. #} {# #} {# TIsapiConn V1.01.00 (c) 1996 Ivan Magrini (Last modification 21.2.1997) #} {# #} {# For bugs and sugestions mail me at imagrini@iag.ch #} {# #} {# This unit is released to PD, you are free to use it as you like #} {# #} {# Please do not remove this Header! #} {# #} {# #} {# This unit was built after studying the ISAPI Components from Steven Genusa #} {# (WebSbt) and Bill Chosiad (TIsapi, Acadians software), they did a real good #} {# work!!!!!! #} {# #} {# PS: If you don't need Database Support, use the ISAPIConn Unit #} {# #} {# If you like to work with Tables and Filters, no problem! #} {# You should define an descendent of TTable like this: #} {# #} {# #} {# USES Windows, SysUtils, IsapiConn, IsapiVars, DBTables, DB, BDE, StrConv; #} {# #} {# TYPE TIsapiTable = CLASS(TTable) #} {# #} {# FKategorie : STRING[40]; This are local vars that you use for #} {# FLand : STRING[40]; filtering DataSets, don't use Ranges #} {# FRegion : STRING[40]; I had a lot of troubles!!!!!!!!!! #} {# #} {# PROCEDURE FilterDataSet(DataSet : TDataSet; VAR Accept : BOOLEAN); #} {# END; #} {# . #} {# . #} {# PROCEDURE TIsapiTable.FilterDataSet(DataSet : TDataSet; VAR Accept : BOOLEAN); #} {# BEGIN #} {# Accept := (UpperCase(DataSet['Land'] = FLand) AND #} {# (UpperCase(DataSet['Region'] = FRegion); #} {# END; #} {# #} {#######################################################################################
Classes |
Functions |
ASCIIToHTML - --- Component Functions -----------------------------------------------} {-----------------------------------------------------------------------
ReplaceSpaces - Filters a String and replaces special Charackters
--- User Functions ----------------------------------------------------} {-----------------------------------------------------------------------
Types |
Constants |
GET
MaxReqBufferSize
POST
svAuthType
svContentLen
svContentType
svPathInfo
svQueryString
svRemoteAddr
svRemoteHost
svRemoteUser
svReqMethod
svScriptName
svServerName
svServerPort
tvAppName
tvDBField
tvDBQueryFld
tvLocalPath
tvScriptPath
tvServer
Variables |
Functions |
--- User Functions ----------------------------------------------------} {-----------------------------------------------------------------------
Types |
TBuffer = record
Addr : DWORD;
end;
TIsapiConnStatus = (eOk, eNoMem);
Constants |
Variables |