sys_config.vb

来自「对现代企业来说」· VB 代码 · 共 18 行

Imports System.Reflection

Public Class Sys_Config
    REM This class handles configuration options in Sys_Config.xml
    Inherits XMLTable
    Private StartupPath As String

    Public Structure Config_Type
        Public Config_ID As Integer
        Public DBDirectory As String
        Public DBFileName As String
    End Structure

    Public Sub New(ByVal XMLPath As String)
        MyBase.New(XMLPath)
    End Sub
End Class