Marcador de telefonos con VB

[Jason]

hola a todos,
Nesecito hacer un marcador de telefono, parecido al que utilizamos para conectarnos estilo dial-up. Me pregunto si hay algun control, yo tengo VB6 y busque pero no encontre nada.

Alguien tiene idea de como hacer esto?

Realmente lo necesito, desde ya les agradesco a todos.

[vb6]

Suponiendo que el número en cuestión lo cargaramos en Text1 desde nuestra base de datos:

Código:

’Esto va en un Modulo:
Public Declare Function tapiRequestMakeCall& Lib "TAPI32.DLL" (ByVal DestAddress$, ByVal AppName$, ByVal CalledParty$, ByVal Comment$) 

Private Sub Command1_Click() 
Dim llamar As Long 
Dim Telefono As String 
Telefono = Text1.Text 
llamar = tapiRequestMakeCall&(Telefono, "", "", "") 
End Sub

[VisualRat]

Por supuesto también se puede acceder directamente al puerto y pasarle comandos como ATDT 555555, para marcar 555555.
Esto depende de si estás dispuesto a trabajar directamente con el puerto, o si prefieres trabajar a niveles superiores, como por ejemlpo con TAPI.

[Jason]

Gracias por las respuesta,

Ya lo solucione con el control "Comm" ya que es muy sencillos de utilizar.

Saludos