Parent Directory
|
Revision Log
|
Patch
| revision 1.4 by joko, Mon Sep 3 18:35:03 2007 UTC | revision 1.5 by joko, Wed Sep 5 11:44:50 2007 UTC | |
|---|---|---|
| # | Line 5 Option Explicit | Line 5 Option Explicit |
| 5 | ||
| 6 | Public Sub Main() | Public Sub Main() |
| 7 | ||
| ' testing | ||
| 8 | 'MsgBox Get_User_Name() | 'MsgBox Get_User_Name() |
| 9 | ||
| 10 | ' get port name from command line | ' get port name from command line |
| # | Line 41 Public Sub Main() | Line 40 Public Sub Main() |
| 40 | mailerStart | mailerStart |
| 41 | ||
| 42 | ' debugging | ' debugging |
| 43 | 'MsgBox mailer.Session.CurrentUser() | ' MsgBox _ |
| 44 | ' "Windows user name: " & Get_User_Name() & vbCrLf & _ | |
| 45 | ' "Outlook user name: " & mailer.Session.CurrentUser() | |
| 46 | ||
| 47 | Dim contactsFolder As Outlook.MAPIFolder | Dim contactsFolder As Outlook.MAPIFolder |
| 48 |
|
||||||||
| MailToCvsAdmin">MailToCvsAdmin | ViewVC Help |
| Powered by ViewVC 1.1.26 |