| |
[ 01. June 2000]
- Jany_Masaryk
Zapisovanie do Windows EventLogu pomocou ASP EventLog 2.0
Dnešný ASP Tip bude zameraný na zapisovanie do EventLogu Windows NT. Na čo
je nám to dobré ? Nuž príčin môže byť niekoľko.
Pre ilustráciu uvediem dve z
nich :
- zapisovanie chýb aplikácie (rozšírenie Error Handlingu - viac v mojom ASP
Tipe "Potlačenie a regulovanie chybových hlásení" na
http://www.developer.sk/cgi-bin/clanok.cgi?zona=tnt&cast=39)
- zapisovanie neautorizovaných prístupov
To nám umožní lepšie si odsledovať správanie našej ASP aplikácie.
Príprava komponentu ASP EventLog 2.0
Takže ako na to. V prvom rade si stiahneme daný komponent zo stránky z
adresy http://www.alphasierrapapa.com/IisDev/Downloads/AspEventLog.zip. Viac
informácii o danom komponente nájdeme na
http://www.alphasierrapapa.com/IisDev/Components/AspEventLog/. Inštalácia
komponentu je veľmi jednoduchá.
1. Rozbalíme stiahnutý súbor ASPEventLog.zip čím získame 4 súbory.
Súbor ASPEventLog.dll obstaráva samotnú funkcionalitu. Súbor Install.htm
popisuje danú komponentu, proces jej inštalácie, prípustné metódy a uvádza
príklad použitia. Súbor testlog.asp slúži na testovanie či sme nainštalovali
komponentu správne.Posledný súbor v podstate nevyužijeme.
2. Skopírujte súbor AspEventlog.dll do systémového adresára WinNT.
3. Zaregistrujte komponent pomocou príkazu regsvr32 ASPEventLog.dll
spusteného z príkazového riadku MSDOS konzoly.
Týmto máme komponentu pripravenú k práci.
Testovanie správnej funkčnosti komponenty ASP EventLog 2.0
Na to aby sme si zistili či máme danú komponentu správne pripravenú k práci
slúži súbor testlog.asp, ktorý sme získali rozbalením pôvodného súboru.
Tento súbor skopírujeme do adresára kde nám beží WWW Server (zvyčajne to je
disk:Inetpubwwwroot....) a necháme si ho zobraziť cez tento server. Mala
by sa nám zobraziť stránka s týmto textom :
Open called with return value of: True
Event was reported successfully: True
Log closed successfully: True
Ak máme na stránke tento text, komponenta bola správne nainštalovaná.
Použitie komponenty ASP EventLog 2.0
Použitie komponenty najlepšie ilustruje daný príklad. Tento skript zapíše do
EventLogu varovanie, že naša aplikácia má na stránke "ErrorPage.asp" chybu
...
<%@ Language=VBScript %>
<%Response.Expires = 0%>
<%
On error Resume Next
Err.Clear
' Event type - definujeme si aky typ udalosti sa ma zapisat do
EventLogu
Dim EVENT_TYPE 'type of event
Const EVENTLOG_SUCCESS = 0
Const EVENTLOG_ERROR_TYPE = 1
Const EVENTLOG_WARNING_TYPE = 2
Const EVENTLOG_INFORMATION_TYPE = 4
' Write to EventLog - zapisovanie do EventLogu
Dim xObj, bResult ' definovanie premennych
Set xObj = Server.CreateObject("SOFTWING.ASPEventlog") ' vytvorenie
objektu xObj
' Open the log and report the status
bResult = xObj.CreateEventSource("Nas Web") ' definovanie
zdroja "Nas Web"
bResult = xObj.OpenEx("mojePC","Nas Web") ' otvorenie zdroja
na nasom pocitaci kde "mojePC" je nazov nasho pocitaca
If bResult = True Then ' ak sa EventLog otvoril spravne
mozeme zapisovat
'To set event type - nastavime typ udalosti
EVENT_TYPE = EVENTLOG_WARNING_TYPE
' write a information type event and give feedback
bResult = xObj.ReportEvent(EVENT_TYPE, "Nas Web -
Nastala chyba v subore ErrorPage.asp")
' close the log (would be done automatically on
object destruction) - zavretie EventLogu
xObj.Close()
End If
' Delete object and free up memory - zrusenie objektu xObj a
uvolnenie pamete
Set xObj = Nothing
%>
Veľa šťastia pri používaní tejto veľmi milej komponenty ...
|
|
| |
|
"Zapisovanie do Windows EventLogu pomocou ASP EventLog 2.0" | Login / vytvor konto | 0 Komentárov |
|
Za obsah komentárov je zodpovedný užívateľ, nie prevádzkovateľ týchto stránok. |
|