'------------------------------------------------------------------------------
'
' This code was generated by a tool.
' Runtime Version: 1.0.3705.288
'
' Changes to this file may cause incorrect behavior and will be lost if
' the code is regenerated.
'
'------------------------------------------------------------------------------
Option Strict Off
Option Explicit On
Imports System
Imports System.ComponentModel
Imports System.Diagnostics
Imports System.Web.Services
Imports System.Web.Services.Protocols
Imports System.Xml.Serialization
'
'Saturn Web Development Tool
'
Namespace gcrc
'
_
Public Class insertRegistrationClass
Inherits System.Web.Services.Protocols.SoapHttpClientProtocol
'
Public Sub New()
MyBase.New
Me.Url = "http://www.gcrc.uic.edu/education/insertRegistration.asmx"
End Sub
'
_
Public Function insertRegistrationMethod(ByVal name As String, ByVal dept As String, ByVal email As String, ByVal telephone As String, ByVal message As String, ByVal category As String) As Boolean
Dim results() As Object = Me.Invoke("insertRegistrationMethod", New Object() {name, dept, email, telephone, message, category})
Return CType(results(0),Boolean)
End Function
'
Public Function BegininsertRegistrationMethod(ByVal name As String, ByVal dept As String, ByVal email As String, ByVal telephone As String, ByVal message As String, ByVal category As String, ByVal callback As System.AsyncCallback, ByVal asyncState As Object) As System.IAsyncResult
Return Me.BeginInvoke("insertRegistrationMethod", New Object() {name, dept, email, telephone, message, category}, callback, asyncState)
End Function
'
Public Function EndinsertRegistrationMethod(ByVal asyncResult As System.IAsyncResult) As Boolean
Dim results() As Object = Me.EndInvoke(asyncResult)
Return CType(results(0),Boolean)
End Function
End Class
End Namespace