Kuidas teha telefonikõnesid Visual Basic

Automatiseerida helistamine VB.NET . telefon pildi Matthieu FABISIAK alates & lt; a href = "http: //www.fotolia.com'> Fotolia.com & lt; / a & gt;

võttes teadmisi, kuidas teha telefonikõned Microsoft Visual Basic.NET (VB.NET) taotluse võib säästa aega, kui teil on vaja helistada pidevalt.VB.NET on arvuti programmeerimiskeelt kasutatakse, et luua mobiilne Web ja töölaua rakendusi.Making telefonikõned VB.NET on võimalik saavutada kasutades sideteenuse Application Programming Interface (TAPI).TAPI annab programmeerijad kihid vaja siseneda Microsoft Telefoonia DLL (dynamic link raamatukogud).Telefoonia ühendab arvuteid seadmeid nagu kaamerad ja Internet.

, mida te vajate

  • Microsoft Visual Basic Express

juhised

  1. Start MicrosoftVisual Basic Express, klõpsake "Uus projekt ..." vasakul paanil ekraani ja valige "Windows Forms taotlemine."Vajuta "OK."

  2. topeltklõps "nupp" kohta "Toolbox" lisada uus nupp.Topeltklõpsake "Label" lisada silt.Lisa teine ​​label kasutades sama protsessi.Topeltklõpsake "teks

    tikasti" lisada teksti kasti.

  3. topeltklõps "Button1" avada "Form1.vb" moodul.Kopeeri ja kleebi järgmine kõige esimene rida moodul:

    Import System.Windows.Forms

  4. Kopeeri ja kleebi järgmine tunnistada Tapi32 DLL all "Avalik klassi Form1", vaid eelkõige "Button1_Click" korras:

    Tuvastada Auto Function tapiRequestMakeCall Lib "Tapi32.dll" _

    (ByVal DestAddress Nagu String, ByVal APPNAME Nagu String, _

    ByVal CalledParty Nagu String, ByVal Kommentaar Nagu String) As Integer

    Const TAPIERR_NOREQUESTRECIPIENT nii lühike = -2

    Const TAPIERR_REQUESTQUEUEFULL nii lühike = -3

    Const TAPIERR_INVALDESTADDRESS nii lühike = -4

    "Button1_Click" korras loodi siis topeltklikkisid "Button1" oma vorm.

  5. Kopeeri ja kleebi järgmine sees "Button1_Click" menetlust, et luua oma muutujad:

    Dim phoneNum Nagu String

    Dim tResult nii lühike

    Dim tmpStr Nagu String

    "Button1_Click" korras loodi siis topeltklikkisid"Button1" oma vorm.

  6. Kopeeri ja kleebi järgmine saada telefoni number sisestatud teksti kasti ja nimetame seda:

    phoneNum = Trim (TextBox1.Text)

    Proovige

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

    Catch ex Nagu Exception

    Label2.Text = "Viga"

    End Püüa

  7. Kopeeri ja kleebi järgmine kontrollida vead:

    Kui tResult & amp; lt; & gt;0 Siis

    tmpStr = "Viga"

    Select Case tResult

    Case TAPIERR_NOREQUESTRECIPIENT

    tmpStr = tmpStr & amp; amp;"No aknad Telefoonia helistamise rakendus töötab ja ükski võiks alustada."

    Case TAPIERR_REQUESTQUEUEFULL

    tmpStr = tmpStr & amp; amp;"Järjekorda oodates Windows Telefoonia helistamise taotlused on täis."

    Case TAPIERR_INVALDESTADDRESS

    tmpStr = tmpStr & amp; amp;"Telefoni number ei kehti."

    Case Else

    tmpStr = tmpStr & amp; amp;"Unkown viga."

    End Select

    Else

    tmpStr = "helistamine"

    End Kui

    Label2.Text = tmpStr

    End Sub

    End klassi

  8. Press "F5" käivitada oma programmi, siis sisestage telefoninumber tekstikasti ja vajuta "Button1."

Resources

  • Microsoft: Microsoft Telefoonia Ülevaade
687
0
3
Visual Basic Programmeerimine