Imports System.Net
Imports System.Net.Dns

Public NotInheritable Class SplashScreen1

    Private Sub SplashScreen1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        '응용 프로그램 제목
        'If My.Application.Info.Title <> "" Then
        '    ApplicationTitle.Text = My.Application.Info.Title
        'Else
        '    '응용 프로그램 제목이 없는 경우 확장명 없이 응용 프로그램 이름을 사용합니다.
        '    ApplicationTitle.Text = System.IO.Path.GetFileNameWithoutExtension(My.Application.Info.AssemblyName)
        'End If

        'Version.Text = System.String.Format(Version.Text, My.Application.Info.Version.Major, My.Application.Info.Version.Minor)

        ''저작권 정보
        'Copyright.Text = My.Application.Info.Copyright

        ''프로젝트 버젼정보
        'Prj.MaxUI = "20091231"
        'Prj.MaxLG = "20091231"
        'Prj.Admin = True
        'Prj.Password = ""   '//암호는 기본해제되어있음

        'For Each A As Net.NetworkInformation.NetworkInterface In ArinNet.MyNet.GetMacArray
        '    If A.NetworkInterfaceType <> Net.NetworkInformation.NetworkInterfaceType.Loopback Then
        '        Prj.CUrMac = A.GetPhysicalAddress.ToString
        '    End If
        'Next

        ''//데이터디렉토리정보를 확인한다 이곳에서 데이터베이스및 기타 설정파일을 저장하게한다 
        ''//이는 인터넷설치버젼의경우 사용자폴더로 들어가기떄문이다
        'Msg("데이터폴더를 확인합니다")
        'If DataDir.Exists = False Then DataDir.Create() '//데이터폴더가없다면 생성
        'If TemplateDir.Exists = False Then
        '    TemplateDir.Create()
        '    If System.IO.File.Exists(My.Application.Info.DirectoryPath & "\template\sample.tpl") = True Then
        '        My.Computer.FileSystem.CopyFile(My.Application.Info.DirectoryPath & "\template\sample.tpl", TemplateDir.FullName & "\sample.tpl", True)
        '    End If
        'End If

        'Msg("기본정보를 설정합니다")
        'Myini = New CEnergy.MyINI(DataDir.FullName & "\arinwaret4.ini")

        'Me.Show()
        'Me.Validate()
        'My.Application.DoEvents()
        'Me.Hide()
        'MdiMain.Show()

    End Sub

  
End Class
