www.pudn.com > proxyvb.rar > general.bas

Attribute VB_Name = "Module1" 
Option Explicit 
 
Public blnManagingData As Boolean 
Public blnNewConnection As Boolean 
 
 
 
 
Public Sub addLog(strEvent, intEventType) 
 
    'Adds event information to logfile/logwindow 
 
     
    With frmMai.txtLog 
 
    .Text = .Text & "! " & Date$ & " " & Time$ & " " & strEvent & vbCrLf 
    .SelStart = Len(.Text) 
 
    End With 
 
End Sub