Well - Automating Microsoft Netmeeting

[James Stanich]

I want to add a button to my application that user would select which would :

1) Invite me to strat Netmeeting

2) Auto accept my incoming call

3) Auto accept my request for control.

Any ideas on this at all? Any possible links?

[Aaron Young]

Checkout the SDK

[Mc Brain]

Originally posted by Aaron Young
Checkout the SDK

I hope it were that easy: http://www.vbforums.com/showthread.p...ght=Netmeeting

[Aaron Young]

The SDK itself doesn't appear to install such a component, but the Readme does say you should have Netmeeting 3 installed (makes sense.)

When I check the References off the Project menu I see there's a Netmeeting 1.1 Type Library ([Program Files]\Netmeeting\conf.exe)

[Mc Brain]

I had check the references and found nothing... I don't remember if Netmeeting was installed then.

[James Stanich]

So Mcbrain did you ever figure it out?

Aaron : I did at one time doenload the SDK, but if I remember right, all documentation was for C. I need something for VB...

[Mc Brain]

Originally posted by James Stanich
So Mcbrain did you ever figure it out?

Aaron : I did at one time doenload the SDK, but if I remember right, all documentation was for C. I need something for VB...

Yes... that was the main problem. I knew a few of C, and remembered almost nothing to figure it out.

Unfortunately.... I never could do anything with the SDK.

[James Stanich]

Wonder if anyone has dne this in VB...

[Aaron Young]

It's pretty basic by the looks of it, there isn't much they give you access to, basically, starting and ending a call, i.e.

Option Explicit
 
Private WithEvents NetMeetingObject As NetMeeting
 
Private Sub Command1_Click()
  Set NetMeetingObject = New NetMeeting
  NetMeetingObject.CallTo "192.168.0.136"
End Sub
 
Private Sub Command2_Click()
  If Not NetMeetingObject Is Nothing Then
    If NetMeetingObject.IsInConference Then
      NetMeetingObject.LeaveConference
    End If
  End If
  Set NetMeetingObject = Nothing
End Sub
 
Private Sub NetMeetingObject_ConferenceStarted()
  Debug.Print "Call Initiated"
End Sub
 
Private Sub NetMeetingObject_ConferenceEnded()
  Debug.Print "End of Call"
End Sub

[James Stanich]

Aaron : Do you know of any isues of the Neetmeeting verison in XP not being compatible with establishing a call with a Windows 2000 system?

[Aaron Young]

I'm not aware of any, in fact, I just recently (about 2 days ago) did that exact thing, connected to an XP Netmeeting session frm my 2000 PC.

[James Stanich]

I can't connect the other way XP to Win2k...

[James Stanich]

Aaron, don't leave me hanging now...

[Mc Brain]

I could connect through W2K to W2K.

Don't make a lot of trouble with VB. Get it connected the normal way. Once you acheive this, try to do it with VB. BTW, you should have no problem then, since VB is interacting with a NetMeeting object (as if you've opened it manually and started the call manually)

[Aaron Young]

I can't think of any reason for it not to work XP to 2K, I don't have XP myself, so I can't test it.

Maybe it's a configuration problem on one of the PCs.

[Mc Brain]

We can try it in some minutes (almost an hour) when I get home... if you want.

[James Stanich]

McBrain you have 2000 at home?

[Mc Brain]

BTW, I ahve W2K at home, as well.

[Mc Brain]

Originally posted by Mc Brain
... almost an hour...

I wanna have dinner first.

[James Stanich]

No problem. I will more than likely be up awhile....

[James Stanich]

McBrain use Messenger when you are ready please...

[Mc Brain]

I will... I'm heating my dinner now. Hang on.

[James Stanich]

Since I need your help, I'll wait...

[James Stanich]

Originally posted by Aaron Young
It's pretty basic by the looks of it, there isn't much they give you access to, basically, starting and ending a call, i.e.

Option Explicit
 
Private WithEvents NetMeetingObject As NetMeeting
 
Private Sub Command1_Click()
  Set NetMeetingObject = New NetMeeting
  NetMeetingObject.CallTo "192.168.0.136"
End Sub
 
Private Sub Command2_Click()
  If Not NetMeetingObject Is Nothing Then
    If NetMeetingObject.IsInConference Then
      NetMeetingObject.LeaveConference
    End If
  End If
  Set NetMeetingObject = Nothing
End Sub
 
Private Sub NetMeetingObject_ConferenceStarted()
  Debug.Print "Call Initiated"
End Sub
 
Private Sub NetMeetingObject_ConferenceEnded()
  Debug.Print "End of Call"
End Sub

I do not have vb here, so I will have to wait, but is there not a way to handle whiteboard a request for control?

[Mc Brain]

R U there?? Wanna try it?

[James Stanich]

Originally posted by Mc Brain
R U there?? Wanna try it?

For anyone who is interested...

I could not connect with McBrain either... If you have XP and are willing to try let me know...

[Mc Brain]

I remembered sth.... MSN Messenger is not compatible for XP. There's a different version for this OS. NetMeeting might have a similar problem.

[fllewis]

James....I've wanted to ask you this forever, but I'm just now doing it...why do all your posts and replies start with "Well"?

[Mc Brain]

Originally posted by fllewis
James....I've wanted to ask you this forever, but I'm just now doing it...why do all your posts and replies start with "Well"?

The things you've always wanted to know... and never dared to ask....

BTW, I'm in the same place, fllewis.

[James Stanich]

Originally posted by fllewis
James....I've wanted to ask you this forever, but I'm just now doing it...why do all your posts and replies start with "Well"?

Tag line - HeSaidJoe usesd <?> I just started using well. Honeybee does too...

[fllewis]

Well

I see. Just curious.

McBrain - same place? As in Arlington, VA/DC?

[James Stanich]

McBrain - same place? As in Arlington, VA/DC?

I think he meant he wanted to know why too...

[Mc Brain]

Originally posted by James Stanich
I think he meant he wanted to know why too...

Well

Why would I explain what James's already done??