VB.NET HTTP SMS primer

Oglejte si, kako dodati SMS funkcionalnost vaši VB.NET aplikaciji. Za rešitev boste potrebovali samo Ozeki 10 in Microsoft Visual Studio. Komunikacija bo delovala prek HTTP protokola. Izvorna koda je na voljo. Lahko jo prenesete in uredite.

Za dodajanje SMS funkcionalnosti v VB.NET:

1. Namestite Microsoft Visual Studio
2. Prenesite primer projekta
3. Zaženite Ozeki SMS Gateway
4. Dodajte HTTP strežniško povezavo
5. Odprite VB.NET primer projekta
6. Po potrebi spremenite parametre
7. Ustvarite URL za HTTP zahtevo
8. Pošljite HTTP zahtevo v Ozeki

Prenos: send-sms-vb.net-http-sms-example.zip (106 Kb)

VB.NET aplikacije je mogoče fleksibilno razvijati za ustvarjanje dinamičnih spletnih strani in standardnih aplikacij. Razvijalci pogosto potrebujejo dodati mobilno sporočanje v svoje aplikacije, da lahko uporabniki pošiljajo SMS sporočila kateremu koli prejemniku. Običajno je najenostavnejši in najprimernejši način za dodajanje SMS sporočanja v vaš sistem uporaba HTTP SMS prehoda, kot je aplikacija Ozeki 10's SMS Gateway in pošiljanje sporočil na ta prehod z uporabo HTTP zahtev (Slika 1).

Poleg pošiljanja SMS sporočil jih lahko tudi prejemate z VB.NET. To lahko storite na dva načina. Najlažji način je ustvarjanje HTTP Client User v Ozeki SMS Gateway, ki lahko posreduje dohodna sporočila vašemu VB.NET programu. To deluje, če lahko obdelujete HTTP zahteve. Drugi način je periodično prenašanje dohodnih sporočil. Lahko prenesete besedilna sporočila s poročili o dostavi iz Ozeki SMS Gateway.

Obstajata samo dva predpogoja, ki ju morate prenesti. Aplikacija Ozeki 10's SMS Gateway in Microsoft Visual Studio za kodiranje VB.NET. Oba sta končni točki HTTP komunikacije. Poleg Microsoft Visual Studio lahko uporabite katero koli drugo IDE, ki vam omogoča razvijanje v VB.NET. Če se pomaknete navzdol, lahko vidite VB.NET primer kode za HTTP aplikacijo. Tukaj najdete seznam potrebne programske opreme in primer programa:

• Prenesite Ozeki SMS Gateway
  
• Microsoft Visual Studio
  
• send-sms-vb.net-http-sms-example.zip
  

Nastavite Ozeki 10 in zaženite primer kode

Lahko enostavno prenesete in namestite Ozeki 10. Preverite hitri vodnik za SMS za enostavno povezavo z mobilnim omrežjem. Prav tako boste morali ustvariti HTTP Server Connection v Ozeki 10. Kliknite 'Add new user or application...' in poiščite HTTP Server Connection na seznamu. Kliknite modri gumb 'Install' poleg njega (Slika 2).

Morali boste navesti uporabniško ime in geslo. Ne pozabite teh prijavnih podatkov. Potrebovali jih boste v VB.NET z zamenjavo primerov nizov v izvorni kodi.

Odprite VB.NET primer projekta in prepišite potrebne parametre (Koda 1).

Dim request As HttpWebRequest

Dim response As HttpWebResponse = Nothing
Dim url As String
Dim username As String = "admin"
Dim password As String = "abc123"
Dim host As String = "http://127.0.0.1:9501"
Dim originator As String = "06201234567"

Niza 'username' in 'password' sta prijavni podatki, ki pripadajo HTTP Server Connection. Če Ozeki 10 in vaša VB.NET aplikacija tečeta na različnih napravah, potem je potrebno prepisati parameter 'host' na IP naslov in vrata naprave z Ozeki 10. 'originator' je telefonska številka, ki se uporablja kot pošiljatelj.

Korak 2 - Sestavi URL iz parametrov

Koda 2 sestavi HTTP zahtevek iz parametrov, podanih v Kodi 1. Ta URL bo uporabljen za pošiljanje vašega SMS sporočila v aplikacijo Ozeki 10 SMS Gateway. Vse parametre, določene v Ozeki HTTP SMS API dokumentaciji, lahko vključite v URL. Vrednosti morajo biti URL kodirane, da posebni znaki ne porušijo HTTP specifikacije.

url = host + "/api?action=sendmessage&" _
& "username=" & HttpUtility.UrlEncode(username) _
& "&password=" + HttpUtility.UrlEncode(password) _
& "&recipient=" + HttpUtility.UrlEncode(tbReceiver.Text) _
& "&messagetype=SMS:TEXT" _
& "&messagedata=" + HttpUtility.UrlEncode(tbMessage.Text) _
& "&originator=" + HttpUtility.UrlEncode(originator) _
& "&serviceprovider=" _
& "&responseformat=html"

Koda 3 vsebuje zadnje tri vrstice tega VB.NET primera. Pošlje HTTP zahtevek in prikaže odgovor v pojavnem oknu. VB.NET metoda WebRequest.Create("...") pošlje URL v Ozeki 10, medtem ko metoda GetResponse() zbira odgovor. Prikazal se bo v pojavnem oknu, ustvarjenem z metodo MessageBox.Show("...").

request = DirectCast(WebRequest.Create(url), HttpWebRequest)
    
response = DirectCast(request.GetResponse(), HttpWebResponse)
    
MessageBox.Show("Response: " & response.StatusDescription)

Priporočljivo je, da si ogledate HTTP API akcije in ustrezne parametre za nadzor Ozeki 10 prek HTTP API-ja. Na ta način lahko ustvarite URL-je za vaše potrebe.

Celotno kodo, ki jo vidite spodaj (Koda 4), sestavljajo segmenti, opisani zgoraj (Koda 1 - 3). Primer kode lahko prosto uporabljate in spreminjate po želji. Izjema se lahko pojavi, če pride do težave s HTTP komunikacijo.

Imports System
Imports System.IO
Imports System.Net
Imports System.Text
Imports System.Web

Public Class fMain

Private Sub bSend_Click(ByVal sender As System.Object, 
ByVal e As System.EventArgs) Handles bSend.Click
	Dim request As HttpWebRequest
	Dim response As HttpWebResponse = Nothing
	Dim url As String
	Dim username As String
	Dim password As String
	Dim host As String
	Dim originator As String
	
	Try

		host = "http://127.0.0.1:9501"
		originator = "06201234567"
		username = "admin"
		password = "abc123"
		
		url = host + "/api?action=sendmessage&" _
		         & "username=" & HttpUtility.UrlEncode(username) _
		         & "&password=" + HttpUtility.UrlEncode(password) _
		         & "&recipient=" + HttpUtility.UrlEncode(tbReceiver.Text) _
		         & "&messagetype=SMS:TEXT" _
		         & "&messagedata=" + HttpUtility.UrlEncode(tbMessage.Text) _
		         & "&originator=" + HttpUtility.UrlEncode(originator) _
		         & "&serviceprovider=GSMModem1" _
		         & "&responseformat=html"
		
		request = DirectCast(WebRequest.Create(url), HttpWebRequest)
		
		response = DirectCast(request.GetResponse(), HttpWebResponse)
		
		MessageBox.Show("Response: " & response.StatusDescription)

	Catch ex As Exception
		MessageBox.Show(ex.Message)
		
	End Try
End Sub
End Class

Ta članek je bil napisan, da bi videli, kako dodati SMS funkcionalnost vaši VB.NET aplikaciji z uporabo Ozeki SMS Gateway. VB.NET aplikacija je resnično koristna za uporabo, saj jo je mogoče fleksibilno razvijati za ustvarjanje dinamičnih spletnih strani in standardnih aplikacij enako. Če ste skrbno sledili vadnici, ste se naučili, kako ustvariti HTTP odjemalca v Ozeki SMS Gateway in kako ga uporabiti za razvoj sistema sporočil v vaši VB.NET aplikaciji.

Na spletni strani Ozeki lahko najdete več člankov o zanimivih temah in impresivnih rešitvah. Oglejte si naslednji vodnik o tem, kako poslati SMS iz VB.NET z uporabo HTTP API.

Prenesite Ozeki SMS Gateway zdaj za boljši SMS sistem!