Call Waiting Caller ID

[TLowder]

Hello,
I'm able to get MSComm to work fine for normal caller ID with the following lines of code.

Form_Load()
  MSComm1.PortOpen = True
  MSComm1.Output = "at+VCID=1" + Chr(13)
End Sub

Private Sub MSComm1_OnComm()
If MSComm1.CommEvent Then
   Text1 = Text1 & MSComm1.Input & vbNewLine
End If
End Sub

The problem is once the line is in use, the call waiting caller id doesn't work. I'm also going to need to get this working on a line with multiple lines. I haven't begun to even test this setup but just thought it might make a difference with your suggestions. It might be I need to purchase one of these devices here -

http://www.yes-tele.com/mlm.html

Thanks for you help,

Tom