Ako si vyrobiť telefónne hovory s Visual Basic

Mať vedomosti o tom , ako telefonovať z Microsoft Visual Basic.NET ( VB.NET ) , žiadosť vám môže ušetriť čas, ak potrebujete volať nepretržite . VB.NET je počítačový programovací jazyk používaný na vytváranie mobilných, webových a desktopových aplikácií . Telefonovanie z VB.NET možno vykonať pomocou Telephony Application Programming Interface ( TAPI ) . TAPI dáva programátorom vrstvy potrebné pre prístup k Microsoft Telephony DLL ( Dynamic Link knižnice ) . Telefónia integruje počítače so zariadeniami , ako sú fotoaparáty a internetových sietí . Veci , ktoré budete potrebovať v Microsoft Visual Basic Express
Zobraziť ďalšie inštrukcie Cestuj 1

Spustite program Microsoft Visual Basic Express , kliknite na tlačidlo " Nový projekt ... " V ľavej table obrazovky a vyberte "Windows Forms . " Kliknite na tlačidlo " OK " .
2

Double - kliknite na " tlačidlo " na " Toolbox " pridať nové tlačidlo . Double - kliknite na " Label " pridať štítok . Pridanie druhého štítku pomocou rovnakého postupu. Double - kliknite na " textové pole " pridať textové pole .
3

Double - kliknite na " Button1 " otvorte modul " Form1.vb " . Skopírujte a vložte nasledujúci hneď v prvom riadku modulu:

Imports System.Windows.Forms
4

Skopírujte a vložte nasledujúci vyhlásiť Tapi32 DLL v rámci " Verejné triedy Form1 " , ale nad " Button1_Click " postupu :

Declare Function Auto tapiRequestMakeCall Lib " tapi32.dll " _

( byVal DestAddress As String , byVal appname As String , _

byVal CalledParty As String , byVal Komentár As String ) As Integer

Const TAPIERR_NOREQUESTRECIPIENT ako Short = -2

Const TAPIERR_REQUESTQUEUEFULL čo najkratšie = -3

Const TAPIERR_INVALDESTADDRESS čo najkratšie = -4

postup " Button1_Click " bol vytvorený , keď ste poklepali " Button1 " na formulári .
5

skopírujte a vložte nasledujúci vnútri postupu " Button1_Click " vytvoriť Vaše premenné :

Dim phoneNum As String Dim

ako Short

Dim tmpStr As String

postup " Button1_Click " bol vytvorený , keď ste double - klikol " Button1 " na formulári
6

skopírujte a vložte nasledujúci získať telefónne číslo zadané do textového poľa a hovoria : .

phoneNum = Trim ( TextBox1.Text )

Skúste

= tapiRequestMakeCall ( phoneNum , " Dial " , phoneNum , " " ) klipart

Catch ex ako výnimka

Label2.Text = " chyba "

End Try
7

skopírujte a vložte nasledujúci pre kontrolu chýb :

Ak < > 0 Then

tmpStr = " Chyba "

Select Case

Case TAPIERR_NOREQUESTRECIPIENT

tmpStr = tmpStr & " Nie okná Telephony aplikácie vytáčanie beží a nikto nemohol byť spustený . "

Case TAPIERR_REQUESTQUEUEFULL

tmpStr = tmpStr & " front nevybavených žiadostí Windows Telephony vytáčanie je plný . "

Case TAPIERR_INVALDESTADDRESS

tmpStr = tmpStr & " telefónne číslo nie je platné . "

Case Else

tmpStr = tmpStr & " Unkown chyba . "

End Select

Else

tmpStr = " Vytáčanie "

End If

Label2.Text = tmpStr

End Sub End Class

8

Press " F5 " spustiť program , potom zadajte telefónne číslo do textového poľa a kliknite na " Button1 . "

• Predchádzajúca strana: Ako sa pripojiť k Avaya cez VBA 
• Ďalšia strana: Ako volať funkcie , ktoré získava v VB.NET