レガシーASP用のLog4jっぽい奴を書いてみた - babydaemons’ blog敢えて命名すると、 Log4aspですかね。安直ですが。 ソースコードを晒しておく 'ログ出力レベル設定 Private Const LEVEL_DEBUG = 0 Private Const LEVEL_INFO = 1 Private Const LEVEL_WARN = 2 Private Const LEVEL_ERROR = 3 Private Const LEVEL_FATAL = 4 'シングルトンのLoggerインスタンスを返す Dim singleton_logger__ Function Logger_getLogger If IsEmpty(singleton_logger__) Then Set singleton_logger__ = New Logger Set Logger_getLogger = singleton_logger__ End Function
