Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
 Nainštalujte SMSLibx , postupujte podľa pokynov v sprievodcovi inštalácie . Tu si môžete stiahnuť SMSLibx on - line ( pozri zdroje ) . 
 2 
 Začnite kópiu Visual Basic pre načítanie aplikácie . Kliknite na " Projekty " z hlavného menu , potom vyberte " Odkazy " . Vyhľadajte " SMSLibx " v referenčnom zozname a zvýraznite ju . Kliknite na tlačidlo " OK " . 
 3 
Vykonajte Visual Basic vyhlásenie . To bude vaša SMS objekt . Akonáhle budete mať prístup ku kódu vyhlásenie editor , zadajte nasledujúci príkaz : klipart
Verejné WithEvents modem ako SMSModem GameTwist GameTwist 4
 Vstup nasledujúci kód tesne pod kódom ste zadali v kroku 3. To bude funkcia , ktorá odosiela správy . Zadajte out : 
 
 Private Sub nowSendSMSMessage ( PhoneNumber , textSprávy ) 
 
 " komunikácie Otvoriť modem 
 
 Set Modem = New SMSModem 
 
 Modem.LogTrace = TRUE 
 
 Modem.OpenComm ModemType , ModemPort , , smsNotifyAll 
 
 " Poslať správu 
 
 Volajte Modem.SendTextMessage ( PhoneNumber , textSprávy ) 
 
 End Sub 
 
 5 
Zadajte nasledujúci kód tesne pod kódom pridaná v kroku 4. To bude funkcia pre príjem SMS . Zadajte out : klipart
 Private Sub nowRecieiveSMSMessage ( Message As SMSLibX.SMSDeliver ) 
 
 MsgBox " Nová správa prijatá od " a Message.Originator & " : " _ 
 
 & vbCrLf & vbCrLf & Message.Body , _ 
 
 vbInformation , " nová správa " 
 
 End Sub 
 6 
 Kliknite na " projekt " , potom vyberte " Uložiť " od lišta menu uložiť dokument . Pomocou okna " Uložiť " Otvoriť , vyhľadajte " Dokumenty " adresára , názov súboru " Messenger.vbscript " a kliknite na " Uložiť " . 
 7 
 Kliknite na ponuku Windows " Štart " v ľavom dolnom rohu z vášho stolného , typ " cmd.exe " a stlačte tlačidlo " Enter " pre otvorenie príkazového riadku v systéme Windows Vista a novšie . V systéme Windows XP a staršie , kliknite na tlačidlo " Štart " kliknite na tlačidlo " Spustiť " , zadajte " cmd.exe " a stlačte " Enter " . 
 8 
zadajte nasledujúce príkazového riadku , potom stlačte tlačidlo " Enter "odoslať správu : Spojené
 C : \\ Documents \\ Messenger.vbscript nowSendSMSMessage ( " telefónne číslo " , " vstup na správu , ktorú chcete poslať tu " ) 
 9 
Príjem správy zadaním nasledujúci text do príkazového riadku a stlačením klávesy " Enter " : Spojené
 c: \\ Dokumenty \\ Messenger.vbscript nowReceiveSMSMessage ( ) 
 
 To vám umožní váš počítač čakať na správy , aby sa v . 
 10 
 Zopakujte kroky 8 a 9 majú rozhovor .