WriteRegNT

<%
Set objShell = CreateObject("WScript.Shell")
ObjShell.LogEvent val, "Errore in miapagina.asp "
Set objShell = Nothing
%>
'Dove val e' un intero che specifica il tipo di messaggio da

'aggiungere, e che puo' avere i seguenti valori:

'0 - Success

'1 - Error

'2 - Warning

'4 - Information