Contoh Web Services

Setiap aplikasi dapat memiliki komponen Web Service.

Pembuatan dan pemrograman Web Services tidak berhubungan dengan jenis bahasa pemrograman.

Contoh: ASP.NET Web Service

Dalam contoh ini, kita akan menggunakan ASP.NET untuk membuat Web Service sederhana.

<%@ WebService Language="VB" Class="TempConvert" %>
Imports System
Imports System.Web.Services
Public Class TempConvert :Inherits WebService
<WebMethod()> Public Function FahrenheitToCelsius
(ByVal Fahrenheit As Int16) As Int16
	Dim celsius As Int16 
	celsius = ((((Fahrenheit) - 32) / 9) * 5) 
	Return celsius
End Function
<WebMethod()> Public Function CelsiusToFahrenheit
(ByVal Celsius As Int16) As Int16
	Dim fahrenheit As Int16
	fahrenheit = ((((Celsius) * 9) / 5) + 32) 
	Return fahrenheit
End Function
End Class

Dokumen ini adalah file .asmx. Ini adalah ekstensi file ASP.NET untuk XML Web Services.

Untuk menjalankan contoh ini, kita membutuhkan server .NET

Baris pertama dokumen ini menunjukkan bahwa ini adalah Web Service, ditulis dalam VB, dan nama classnya adalah "TempConvert".

<%@ WebService Language="VB" Class="TempConvert" %>

Baris kode berikut mengimpor namespace "System.Web.Services" dari framework .NET.

Imports System
Imports System.Web.Services

Baris berikut ini mendefinisikan class "TempConvert" sebagai class WebSerivce:

Public Class TempConvert :Inherits WebService

Langkah berikutnya adalah pemrograman dasar VB. Aplikasi ini memiliki dua fungsi. Satu untuk merubah derajat Fahrenheit ke derajat Celcius, dan yang lain untuk merubah derajat Celcius ke derajat Fahrenheit.

Perbedaan tunggal dengan aplikasi biasa adalah fungsi ini didefinisikan sebagai "WebMethod".

Silakan gunakan "WebMethod" untuk menandai fungsi di aplikasi yang ingin dijadikan web services.

<WebMethod()> Public Function FahrenheitToCelsius
(ByVal Fahrenheit As Int16) As Int16
	Dim celsius As Int16 
	celsius = ((((Fahrenheit) - 32) / 9) * 5) 
	Return celsius
End Function
<WebMethod()> Public Function CelsiusToFahrenheit
(ByVal Celsius As Int16) As Int16
	Dim fahrenheit As Int16
	fahrenheit = ((((Celsius) * 9) / 5) + 32) 
	Return fahrenheit
End Function

Hal terakhir yang harus dilakukan adalah mengakhiri fungsi dan kelas:

End Function
End Class

Jika Anda menyimpan berkas ini sebagai berkas .asmx dan meluncurkannya di server yang mendukung .NET, maka Anda telah memiliki Web Service yang bekerja pertama kalinya.

Pemrosesan Otomatis ASP.NET

Dengan ASP.NET, Anda tidak perlu menulis dokumen WSDL dan SOAP secara manual.

Jika Anda mempelajari contoh ini dengan seksama, Anda akan menemukan bahwa ASP.NET akan membuat otomatis WSDL dan permintaan SOAP.