Hablar por telefono!!!

[Topaz_34]

Hola alguien sabe como hacer un programita en VB o que tenga y me lo pueda pasar para resalizar llamadas!

Me refiero a que tengo mi telefono conectado a la comp. y no puedo marcar desde el.  Y quisiera saber si alguien tiene un programa para poder marcar desde la computadora!!

Bueno gracias!!

[NYlOn]

Se que hay programas que hacen eso, pero no tengo idea de como hacerlo en VB.
Busca en Google.

[sch3m4]

google.es/search?hl=es&q=vb+telephon&btnG=B%C3%BAsqueda+en+Google&meta=
http://www.controlanything.com/Merchant2/merchant.mvc?Screen=CTGY&Store_Code=NCD&Category_Code=VBASIC
http://www.softcircuits.com/sw_vbsrc.htm

[Sancho.Mazorka]

si tenes la API-Guide busca esta:
tapiRequestMakeCall

este es el codigo que te abre un programa que trae Windows, no se si te anda si no tenes el programa pero te vas a dar cuenta porque te lo abre. este es el codigo por si no tenes API-Guide, tambien podes usar el OCX MSCOMM32.OCX (Microsoft Comm Control 6.0).

Código [Seleccionar] Expandir

'Example by Joacim Andersson (joacim@programmer.net)
'Author comments: I often get asked the question "How can
'I dial a phone number from VB?". Well, you can add
'the MSCOMM32.OCX control to a form but that isn't necessary
'if you just want to dial a phone number.
Private Declare Function tapiRequestMakeCall Lib "TAPI32.DLL" (ByVal Dest As String, ByVal AppName As String, ByVal CalledParty As String, ByVal Comment As String) As Long
Private Sub PhoneCall(sNumber As String, sName As String)
    Dim lRetVal As Long
    lRetVal = tapiRequestMakeCall(Trim$(sNumber), App.Title, Trim$(sName), "")
    If lRetVal <> 0 Then
        'Couldn't make the call.
        'Take appropriate action
    End If
End Sub
Private Sub Form_Load()
    PhoneCall "123456", "TheName"
End Sub


Sancho Mazorka