Contoh Web Services
- Halaman Sebelumnya Platform WS
- Halaman Berikutnya Penggunaan WS
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 memerlukan server .NET
Baris pertama dalam dokumen ini menunjukkan bahwa ini adalah Web Service, ditulis dalam VB, dan nama kelasnya adalah "TempConvert".
<%@ WebService Language="VB" Class="TempConvert" %>
Baris kode berikut mengimpor ruang nama "System.Web.Services" dari framework .NET.
Imports System Imports System.Web.Services
Baris berikut menentukan kelas "TempConvert" adalah kelas WebSerivce:
Public Class TempConvert :Inherits WebService
Langkah berikut adalah dasar pemrograman VB. Aplikasi ini mempunyai dua fungsi. Satu untuk mengubah derajat Fahrenheit ke derajat Celcius, dan yang lain untuk mengubah derajat Celcius ke derajat Fahrenheit.
Perbezaan tunggal antara aplikasi biasa dan fungsi ini adalah ia diatur sebagai "WebMethod".
Sila guna "WebMethod" untuk menandai fungsi di aplikasi yang anda inginkan untuk menjadi 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 mengumumkannya 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 teliti, Anda akan menemukan bahwa ASP.NET akan membuat secara otomatis WSDL dan permintaan SOAP.
- Halaman Sebelumnya Platform WS
- Halaman Berikutnya Penggunaan WS