paymentmethodinfo.vb

C#语言制作asp.net网上商店的

Namespace NetShopForge.Library.Payment

    <Serializable()> Public Class PaymentMethodInfo

        Private _paymentmethodid As Integer
        Private _paymentmethodname As String
        Private _paymentgateway As PaymentGateway
        Private _merchantid As String
        Private _merchantkey As String
        Private _currency As String
        Private _button As Integer
        Private _isvalid As Boolean
        Private _ItemOrder As Integer
        Private _description As String
        Private _expressions As String
        ''' <summary>
        ''' 
        ''' </summary>
        Public Property PaymentMethodID() As Integer
            Get
                Return _paymentmethodid
            End Get
            Set(ByVal Value As Integer)
                _paymentmethodid = Value
            End Set
        End Property
        ''' <summary>
        ''' 
        ''' </summary>
        Public Property PaymentMethodName() As String
            Get
                Return _paymentmethodname
            End Get
            Set(ByVal Value As String)
                _paymentmethodname = Value
            End Set
        End Property
        ''' <summary>
        ''' 
        ''' </summary>
        Public Property PaymentGateway() As PaymentGateway
            Get
                Return _paymentgateway
            End Get
            Set(ByVal Value As PaymentGateway)
                _paymentgateway = Value
            End Set
        End Property
        ''' <summary>
        ''' 
        ''' </summary>
        Public Property MerchantID() As String
            Get
                Return _merchantid
            End Get
            Set(ByVal Value As String)
                _merchantid = Value
            End Set
        End Property
        ''' <summary>
        ''' 
        ''' </summary>
        Public Property MerchantKey() As String
            Get
                Return _merchantkey
            End Get
            Set(ByVal Value As String)
                _merchantkey = Value
            End Set
        End Property
        ''' <summary>
        ''' 
        ''' </summary>
        Public Property Currency() As String
            Get
                Return _currency
            End Get
            Set(ByVal Value As String)
                _currency = Value
            End Set
        End Property
        ''' <summary>
        ''' 
        ''' </summary>
        Public Property Button() As Integer
            Get
                Return _button
            End Get
            Set(ByVal Value As Integer)
                _button = Value
            End Set
        End Property
        ''' <summary>
        ''' 
        ''' </summary>
        Public Property IsValid() As Boolean
            Get
                Return _isvalid
            End Get
            Set(ByVal Value As Boolean)
                _isvalid = Value
            End Set
        End Property
        ''' <summary>
        ''' 
        ''' </summary>
        Public Property ItemOrder() As Integer
            Get
                Return _ItemOrder
            End Get
            Set(ByVal Value As Integer)
                _ItemOrder = Value
            End Set
        End Property
        ''' <summary>
        ''' 
        ''' </summary>
        Public Property Description() As String
            Get
                Return _description
            End Get
            Set(ByVal Value As String)
                _description = Value
            End Set
        End Property
        ''' <summary>
        ''' 
        ''' </summary>
        Public Property Expressions() As String
            Get
                Return _expressions
            End Get
            Set(ByVal Value As String)
                _expressions = Value
            End Set
        End Property
    End Class


    Public Enum PaymentGateway
        gwAdvance = 1
        gwOffline = 0
        gwAliPay = 2
        gw99Bill = 3
        gwChinaBank = 4
        gwPaypalCN = 5
    End Enum


End Namespace