Layout Web Service Client Application URL Web Service

Layout Web Service Client Application

URL Web Service • https: //webservice. dopa. go. th/Services/Aut hen. Ikno. Srvice. asmx • https: //webservice. dopa. go. th/Services/PO PService. asmx • https: //webservice. dopa. go. th/Services/HO USEService. asmx • https: //webservice. dopa. go. th/services/Go vservice. asmx

Function Web Service

Studio

Web Service & Visual Studio 1 2 3 4

Web Service & Visual Studio

Studio

�� Web Service �� SAS • ---------'�� Web Service-------- • Dim Web. Services_Test As New Service. Authen. Ikno. Service • Dim register_out As New Service. Authen. Register. Service. Out • Dim authencon As New Service. Authen. Confirm. Out • ----------'�� SAS----------------

�� Envelope. GMSx • Public Declare Function Envelope. GMSx Lib "scapi_ope. dll" • By. Val key_id As Integer, _ • By. Val cryptogram As String, _ • By. Val cryptogram_len As Integer, _ • By. Val request As String, _ • By. Ref request_len As Integer, _ • By. Ref status As Integer) As Short

�� • • Public int_key_id As Integer Public envelope_str As String Public envelope_str_len As Integer Public rc As Integer, err_code As Integer, status As Integer • Private reader_name, data. PID, data. CID As String • Public cardid As Integer

�� (�� ( • Public bufran As String = New String(" ", 1000) • Public bufran_size As Integer = 0 • Public bufout As String = Space(1000) • Public bufout_size As Integer = 0 • Public matched As Integer = 0 • Dim buf_envel As String • Dim reader_list As String, reader_list_len As Long

Demo Program