Πώς να λάβετε ένα SMS χρήση της Visual Basic

αποστολή και λήψη κειμένων είναι πολύ απλή στο τηλέφωνό σας . Ωστόσο , αν δεν έχετε το τηλέφωνό σας εύχρηστο , μπορείτε να προγραμματίσετε μια απλή εφαρμογή για να λάβετε SMS κείμενα για σας μόνο με τη χρήση της Visual Basic . Μόλις στείλετε μηνύματα , θα είστε σε θέση να λάβετε νέα πίσω . Πάρτε το χρόνο σας κατά τον προγραμματισμό για να βεβαιωθείτε ότι έχετε όλες τις εντολές σωστή . Διαφορετικά , το πρόγραμμα δεν θα λειτουργήσει . Οδηγίες
Η 1

Εγκατάσταση SMSLibx , ακολουθώντας τις οδηγίες με τον οδηγό εγκατάστασης . Μπορείτε να κατεβάσετε SMSLibx σε απευθείας σύνδεση ( βλέπε Πόρων ) . 2

Ξεκινήστε το δικό σας αντίγραφο του Visual Basic για να φορτώσετε την εφαρμογή . Κάντε κλικ στο " Προγράμματα " από το κύριο μενού , στη συνέχεια, επιλέξτε "Αναφορές ". Εντοπίστε " SMSLibx " στη λίστα αναφοράς και επιλέξτε το . Κάντε κλικ στο " OK".
Εικόνων 3

Κάντε μια δήλωση της Visual Basic . Αυτό θα είναι το αντικείμενο SMS σας . Μόλις έχετε πρόσβαση στο πρόγραμμα επεξεργασίας κώδικα δήλωσης , πληκτρολογήστε τα εξής :

Δημόσια WithEvents Modem Όπως SMSModem
4

Εισάγετε τον παρακάτω κωδικό ακριβώς κάτω από τον κωδικό που πληκτρολογήσατε στο βήμα 3 . Αυτή θα είναι η λειτουργία που στέλνει τα μηνύματά σας . Πληκτρολογήστε out :

Private Sub nowSendSMSMessage ( PhoneNumber , MessageText )

« Ανοιχτή επικοινωνία modem

Set Modem = Νέα SMSModem

Modem.LogTrace = True

Modem.OpenComm ModemType , ModemPort , , smsNotifyAll

« Αποστολή μηνύματος

Καλέστε Modem.SendTextMessage ( PhoneNumber , MessageText )

End Sub

5

Εισάγετε τον παρακάτω κωδικό ακριβώς κάτω από τον κώδικα προσθέσατε στο Βήμα 4 . Αυτή θα είναι η λειτουργία για να λαμβάνετε μηνύματα SMS . Πληκτρολογήστε out :

Private Sub nowRecieiveSMSMessage ( Μήνυμα Όπως SMSLibX.SMSDeliver )

MsgBox " Νέο μήνυμα που έλαβε από " & Message.Originator & " : " _

& vbCrLf & vbCrLf & Message.Body , _

vbInformation , " Νέο μήνυμα ελήφθη "

End Sub
Η

6 Κάντε κλικ στο "Project " και στη συνέχεια επιλέξτε "Αποθήκευση " από τη γραμμή μενού για να αποθηκεύσετε το έγγραφό σας . Με το παράθυρο "Αποθήκευση" ανοιχτό , εντοπίστε την ενότητα " Έγγραφα " κατάλογο , το όνομα του αρχείου " Messenger.vbscript " και κάντε κλικ στο κουμπί "Αποθήκευση".
Η

7 Κάντε κλικ στο μενού των Windows " Start" στην κάτω αριστερή της επιφάνειας εργασίας σας , τον τύπο " CMD.exe " και πατήστε "Enter " για να ανοίξετε το παράθυρο Command Prompt των Windows Vista και αργότερα . Στα Windows XP και προγενέστερα , κάντε κλικ στο κουμπί " Έναρξη ", κάντε κλικ στο " Run ", πληκτρολογήστε " CMD.exe " και πατήστε το πλήκτρο " Enter".
8

Πληκτρολογήστε τα ακόλουθα στη γραμμή εντολών και , στη συνέχεια, πατήστε το πλήκτρο "Enter "για να στείλετε ένα μήνυμα :

c : \\ Documents \\ Messenger.vbscript nowSendSMSMessage ( « ο αριθμός τηλεφώνου »,« εισόδου το μήνυμα που θέλετε να στείλετε εδώ » )
Η 9

Λήψη μηνύματα εισάγοντας το ακόλουθο κείμενο στο Command Prompt και πατώντας το πλήκτρο " Enter" :

c : \\ Documents \\ Messenger.vbscript nowReceiveSMSMessage ( )

Αυτό θα αφήσει αναμονής του υπολογιστή σας για μηνύματα να έρχονται σε .
Η

10 Επαναλάβετε τα βήματα 8 και 9 για να έχει μια συνομιλία .
Η
εικόνων