Thanks. My goal is to create just one .exe file and be able to run it on
the server. Just like the AutoAcceptConf.exe file (can be downloaded
from sourceforge.com). One can copy that file to a server and then run
it. It runs fine on my servers.

Now, if I take the source code that came with AutoAccept sink and try
compile my own .exe, it does not work. It can't register the event sink,
nor can it detect whether the event sink has already been registered.

This is how I got down to this little snippet of code. That's where my
compilation breaks.



-----Original Message-----
From: Scott Weston [mailto:[EMAIL PROTECTED] 
Sent: Tuesday, November 18, 2003 2:03 PM
To: Exchange Discussions
Subject: RE: VB Question

Basically you are missing the required libraries. Do as previous poster
suggested and use the packager wizard to include all dependencies.
Probably
the vb libraries aren't on the server.



-----Original Message-----
From: Fyodorov, Andrey [mailto:[EMAIL PROTECTED]
Sent: Tuesday, November 18, 2003 12:23 PM
To: Exchange Discussions
Subject: RE: VB Question


Just checked - yes. Under c:\winnt\system32\com



-----Original Message-----
From: Scott Weston [mailto:[EMAIL PROTECTED] 
Sent: Tuesday, November 18, 2003 11:21 AM
To: Exchange Discussions
Subject: RE: VB Question

does comadmin.dll exist on the server?


-----Original Message-----
From: Fyodorov, Andrey [mailto:[EMAIL PROTECTED]
Sent: Tuesday, November 18, 2003 9:54 AM
To: Exchange Discussions
Subject: OT: VB Question


Hi all. I am trying to understand why a piece of VB code works on my PC
but doesn't do anything on a server.
All I want it to do is to show me the names of all COM+ applications.

I compile it into an EXE and run on my PC and it works great. Then I
copy it to one of my servers and run it there - nothing.

Here is the code - 

Private Sub cmdStart_Click()
Dim oCatalog As COMAdminCatalog
Dim oApps As COMAdminCatalogCollection
Dim oApp As COMAdminCatalogObject
  
  Set oCatalog = New COMAdminCatalog
  Set oApps = oCatalog.GetCollection("Applications")
  oApps.Populate
  
  For Each oApp In oApps
  MsgBox oApp.Value("Name")
  Next
  
End Sub




Any ideas?

Thanks in advance!


_________________________________________________________________
List posting FAQ:       http://www.swinc.com/resource/exch_faq.htm
Web Interface:
http://intm-dl.sparklist.com/cgi-bin/lyris.pl?enter=exchange&text_mode=&;
lang
=english
To unsubscribe:         mailto:[EMAIL PROTECTED]
Exchange List admin:    [EMAIL PROTECTED]

_________________________________________________________________
List posting FAQ:       http://www.swinc.com/resource/exch_faq.htm
Web Interface:
http://intm-dl.sparklist.com/cgi-bin/lyris.pl?enter=exchange&text_mode=&;
lang=english
To unsubscribe:         mailto:[EMAIL PROTECTED]
Exchange List admin:    [EMAIL PROTECTED]



_________________________________________________________________
List posting FAQ:       http://www.swinc.com/resource/exch_faq.htm
Web Interface:
http://intm-dl.sparklist.com/cgi-bin/lyris.pl?enter=exchange&text_mode=&;
lang
=english
To unsubscribe:         mailto:[EMAIL PROTECTED]
Exchange List admin:    [EMAIL PROTECTED]

_________________________________________________________________
List posting FAQ:       http://www.swinc.com/resource/exch_faq.htm
Web Interface:
http://intm-dl.sparklist.com/cgi-bin/lyris.pl?enter=exchange&text_mode=&;
lang=english
To unsubscribe:         mailto:[EMAIL PROTECTED]
Exchange List admin:    [EMAIL PROTECTED]



_________________________________________________________________
List posting FAQ:       http://www.swinc.com/resource/exch_faq.htm
Web Interface: 
http://intm-dl.sparklist.com/cgi-bin/lyris.pl?enter=exchange&text_mode=&lang=english
To unsubscribe:         mailto:[EMAIL PROTECTED]
Exchange List admin:    [EMAIL PROTECTED]

Reply via email to