|
|
|
![](images/pasta_topo.gif)
|
![](images/folha.gif)
|
Dicas
|
![](images/folha_fim.gif)
|
Visual Basic (Internet)
|
|
![](images/box01esqsup.gif) |
Título da Dica: Discar com o modem via API
|
![](images/box01dirsup.gif) |
|
|
Postada em 14/8/2000 por Webmaster
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.
|
|
|
|
![](images/hosted.gif)
|