autocad.vb

系统概要: 本系统采用VB.NET开发. 开发平台:Windows XP Professional SP2 (English Version) 开发环境:Visual Studio .NET

'------------------------------------------------------------------------------
' <autogenerated>
'     This code was generated by a tool.
'     Runtime Version: 1.1.4322.573
'
'     Changes to this file may cause incorrect behavior and will be lost if 
'     the code is regenerated.
' </autogenerated>
'------------------------------------------------------------------------------

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

'
'This source code was auto-generated by Microsoft.VSDesigner, Version 1.1.4322.573.
'
Namespace AutoCAD

    '<remarks/>
    <System.Diagnostics.DebuggerStepThroughAttribute(), _
     System.ComponentModel.DesignerCategoryAttribute("code"), _
     System.Web.Services.WebServiceBindingAttribute(Name:="ExamSoap", [Namespace]:="http://mse.ujn.edu.cn/autocad/exam")> _
    Public Class Exam
        Inherits System.Web.Services.Protocols.SoapHttpClientProtocol

        '<remarks/>
        Public Sub New()
            MyBase.New()
            Dim oSetReader As New System.Configuration.AppSettingsReader
            Dim strUrl As String
            strUrl = oSetReader.GetValue("SERVER_URL", GetType(String)) + oSetReader.GetValue("EXAM", GetType(String))
            Me.Url = strUrl
        End Sub

        '<remarks/>
        <System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://mse.ujn.edu.cn/autocad/exam/GetStudentInfo", RequestNamespace:="http://mse.ujn.edu.cn/autocad/exam", ResponseNamespace:="http://mse.ujn.edu.cn/autocad/exam", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
        Public Function GetStudentInfo(ByVal SID As String, ByRef oStudentInfo As StudentInfo) As Boolean
            Dim results() As Object = Me.Invoke("GetStudentInfo", New Object() {SID, oStudentInfo})
            oStudentInfo = CType(results(1), StudentInfo)
            Return CType(results(0), Boolean)
        End Function

        '<remarks/>
        Public Function BeginGetStudentInfo(ByVal SID As String, ByVal oStudentInfo As StudentInfo, ByVal callback As System.AsyncCallback, ByVal asyncState As Object) As System.IAsyncResult
            Return Me.BeginInvoke("GetStudentInfo", New Object() {SID, oStudentInfo}, callback, asyncState)
        End Function

        '<remarks/>
        Public Function EndGetStudentInfo(ByVal asyncResult As System.IAsyncResult, ByRef oStudentInfo As StudentInfo) As Boolean
            Dim results() As Object = Me.EndInvoke(asyncResult)
            oStudentInfo = CType(results(1), StudentInfo)
            Return CType(results(0), Boolean)
        End Function

        '<remarks/>
        <System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://mse.ujn.edu.cn/autocad/exam/GetExamInfo", RequestNamespace:="http://mse.ujn.edu.cn/autocad/exam", ResponseNamespace:="http://mse.ujn.edu.cn/autocad/exam", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
        Public Function GetExamInfo(ByVal SID As String, ByRef oExamInfo As ExamInfo) As Boolean
            Dim results() As Object = Me.Invoke("GetExamInfo", New Object() {SID, oExamInfo})
            oExamInfo = CType(results(1), ExamInfo)
            Return CType(results(0), Boolean)
        End Function

        '<remarks/>
        Public Function BeginGetExamInfo(ByVal SID As String, ByVal oExamInfo As ExamInfo, ByVal callback As System.AsyncCallback, ByVal asyncState As Object) As System.IAsyncResult
            Return Me.BeginInvoke("GetExamInfo", New Object() {SID, oExamInfo}, callback, asyncState)
        End Function

        '<remarks/>
        Public Function EndGetExamInfo(ByVal asyncResult As System.IAsyncResult, ByRef oExamInfo As ExamInfo) As Boolean
            Dim results() As Object = Me.EndInvoke(asyncResult)
            oExamInfo = CType(results(1), ExamInfo)
            Return CType(results(0), Boolean)
        End Function

        '<remarks/>
        <System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://mse.ujn.edu.cn/autocad/exam/GetPaper", RequestNamespace:="http://mse.ujn.edu.cn/autocad/exam", ResponseNamespace:="http://mse.ujn.edu.cn/autocad/exam", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
        Public Function GetPaper(ByVal SID As String) As System.Data.DataSet
            Dim results() As Object = Me.Invoke("GetPaper", New Object() {SID})
            Return CType(results(0), System.Data.DataSet)
        End Function

        '<remarks/>
        Public Function BeginGetPaper(ByVal SID As String, ByVal callback As System.AsyncCallback, ByVal asyncState As Object) As System.IAsyncResult
            Return Me.BeginInvoke("GetPaper", New Object() {SID}, callback, asyncState)
        End Function

        '<remarks/>
        Public Function EndGetPaper(ByVal asyncResult As System.IAsyncResult) As System.Data.DataSet
            Dim results() As Object = Me.EndInvoke(asyncResult)
            Return CType(results(0), System.Data.DataSet)
        End Function

        '<remarks/>
        <System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://mse.ujn.edu.cn/autocad/exam/ReGetPaper", RequestNamespace:="http://mse.ujn.edu.cn/autocad/exam", ResponseNamespace:="http://mse.ujn.edu.cn/autocad/exam", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
        Public Function ReGetPaper(ByVal SID As String) As System.Data.DataSet
            Dim results() As Object = Me.Invoke("ReGetPaper", New Object() {SID})
            Return CType(results(0), System.Data.DataSet)
        End Function

        '<remarks/>
        Public Function BeginReGetPaper(ByVal SID As String, ByVal callback As System.AsyncCallback, ByVal asyncState As Object) As System.IAsyncResult
            Return Me.BeginInvoke("ReGetPaper", New Object() {SID}, callback, asyncState)
        End Function

        '<remarks/>
        Public Function EndReGetPaper(ByVal asyncResult As System.IAsyncResult) As System.Data.DataSet
            Dim results() As Object = Me.EndInvoke(asyncResult)
            Return CType(results(0), System.Data.DataSet)
        End Function

        '<remarks/>
        <System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://mse.ujn.edu.cn/autocad/exam/GetDrawingFile", RequestNamespace:="http://mse.ujn.edu.cn/autocad/exam", ResponseNamespace:="http://mse.ujn.edu.cn/autocad/exam", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
        Public Function GetDrawingFile(ByVal FileName As String) As <System.Xml.Serialization.XmlElementAttribute(DataType:="base64Binary")> Byte()
            Dim results() As Object = Me.Invoke("GetDrawingFile", New Object() {FileName})
            Return CType(results(0), Byte())
        End Function

        '<remarks/>
        Public Function BeginGetDrawingFile(ByVal FileName As String, ByVal callback As System.AsyncCallback, ByVal asyncState As Object) As System.IAsyncResult
            Return Me.BeginInvoke("GetDrawingFile", New Object() {FileName}, callback, asyncState)
        End Function

        '<remarks/>
        Public Function EndGetDrawingFile(ByVal asyncResult As System.IAsyncResult) As Byte()
            Dim results() As Object = Me.EndInvoke(asyncResult)
            Return CType(results(0), Byte())
        End Function

        '<remarks/>
        <System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://mse.ujn.edu.cn/autocad/exam/GetTmpFile", RequestNamespace:="http://mse.ujn.edu.cn/autocad/exam", ResponseNamespace:="http://mse.ujn.edu.cn/autocad/exam", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
        Public Function GetTmpFile() As <System.Xml.Serialization.XmlElementAttribute(DataType:="base64Binary")> Byte()
            Dim results() As Object = Me.Invoke("GetTmpFile", New Object(-1) {})
            Return CType(results(0), Byte())
        End Function

        '<remarks/>
        Public Function BeginGetTmpFile(ByVal callback As System.AsyncCallback, ByVal asyncState As Object) As System.IAsyncResult
            Return Me.BeginInvoke("GetTmpFile", New Object(-1) {}, callback, asyncState)
        End Function

        '<remarks/>
        Public Function EndGetTmpFile(ByVal asyncResult As System.IAsyncResult) As Byte()
            Dim results() As Object = Me.EndInvoke(asyncResult)
            Return CType(results(0), Byte())
        End Function

        '<remarks/>
        <System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://mse.ujn.edu.cn/autocad/exam/SubPaper", RequestNamespace:="http://mse.ujn.edu.cn/autocad/exam", ResponseNamespace:="http://mse.ujn.edu.cn/autocad/exam", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _