[ActiveLock-Development] CVS: activelock2/src ActiveLockEventNotifier.cls,1.1,1.2
Brought to you by:
ialkan
From: Thanh H. T. <th...@us...> - 2003-07-23 06:41:29
|
Update of /cvsroot/activelock/activelock2/src In directory sc8-pr-cvs1:/tmp/cvs-serv3736 Modified Files: ActiveLockEventNotifier.cls Log Message: Reduced scope of Notify() Index: ActiveLockEventNotifier.cls =================================================================== RCS file: /cvsroot/activelock/activelock2/src/ActiveLockEventNotifier.cls,v retrieving revision 1.1 retrieving revision 1.2 diff -u -d -r1.1 -r1.2 --- ActiveLockEventNotifier.cls 21 Jul 2003 08:48:27 -0000 1.1 +++ ActiveLockEventNotifier.cls 23 Jul 2003 06:41:26 -0000 1.2 @@ -85,7 +85,7 @@ ' @param Result Encrypted value. Public Event ValidateValue(ByVal Value As String, Result As String) -Public Sub Notify(EventName As String, ParamArray Args()) +Friend Sub Notify(EventName As String, ParamArray Args()) If EventName = "ValidateKey" Then RaiseEvent ValidateKey(CStr(Args(0)), CStr(Args(1)), Args(2)) ElseIf EventName = "ValidateValue" Then |