USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Dicas

  Visual Basic    (Internet)

Título da Dica:  Discar com o modem via API
Postada em 14/8/2000 por Webmaster      Clique aqui para enviar email para o autor  webmaster@vbweb.com.br
Public Declare Function tapiRequestMakeCall _
       Lib "TAPI32.DLL" (ByVal Dest As String, _
       ByVal AppName As String, ByVal _
       CalledParty As String, ByVal Comment _
       As String) As Long

Public Sub PhoneCall(sNumber As String, sName As String)
  Dim lRetVal As Long
  lRetVal = tapiRequestMakeCall(sNumber, _
            App.Title, sName, "")
  If lRetVal <> 0 Then
    'Erro qualquer ou não conseguiu!
  End If
End Sub
Crie um controle com um textbox e uma imagem de um telefone ao lado. Quando o Text tem algo, se o usuário clicar na imagem a função é executada.
 


CyberWEB Network Ltda.    © Copyright 2000-2024   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página