솔루션에 fp5,fp13 포함

Epole.fp13/AboutBox1.Designer.vb

@@ -0,0 +1,179 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class AboutBox1
+    Inherits System.Windows.Forms.Form
+
+    'Form은 Dispose를 재정의하여 구성 요소 목록을 정리합니다.
+    <System.Diagnostics.DebuggerNonUserCode()> _
+    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
+        Try
+            If disposing AndAlso components IsNot Nothing Then
+                components.Dispose()
+            End If
+        Finally
+            MyBase.Dispose(disposing)
+        End Try
+    End Sub
+
+    Friend WithEvents TableLayoutPanel As System.Windows.Forms.TableLayoutPanel
+    Friend WithEvents LogoPictureBox As System.Windows.Forms.PictureBox
+    Friend WithEvents LabelProductName As System.Windows.Forms.Label
+    Friend WithEvents LabelVersion As System.Windows.Forms.Label
+    Friend WithEvents LabelCompanyName As System.Windows.Forms.Label
+    Friend WithEvents TextBoxDescription As System.Windows.Forms.TextBox
+    Friend WithEvents OKButton As System.Windows.Forms.Button
+    Friend WithEvents LabelCopyright As System.Windows.Forms.Label
+
+    'Windows Form 디자이너에 필요합니다.
+    Private components As System.ComponentModel.IContainer
+
+    '참고: 다음 프로시저는 Windows Form 디자이너에 필요합니다.
+    '수정하려면 Windows Form 디자이너를 사용하십시오.  
+    '코드 편집기를 사용하여 수정하지 마십시오.
+    <System.Diagnostics.DebuggerStepThrough()> _
+    Private Sub InitializeComponent()
+        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(AboutBox1))
+        Me.TableLayoutPanel = New System.Windows.Forms.TableLayoutPanel()
+        Me.LogoPictureBox = New System.Windows.Forms.PictureBox()
+        Me.LabelProductName = New System.Windows.Forms.Label()
+        Me.LabelVersion = New System.Windows.Forms.Label()
+        Me.LabelCopyright = New System.Windows.Forms.Label()
+        Me.LabelCompanyName = New System.Windows.Forms.Label()
+        Me.TextBoxDescription = New System.Windows.Forms.TextBox()
+        Me.OKButton = New System.Windows.Forms.Button()
+        Me.TableLayoutPanel.SuspendLayout()
+        CType(Me.LogoPictureBox, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SuspendLayout()
+        '
+        'TableLayoutPanel
+        '
+        Me.TableLayoutPanel.ColumnCount = 2
+        Me.TableLayoutPanel.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 33.0!))
+        Me.TableLayoutPanel.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 67.0!))
+        Me.TableLayoutPanel.Controls.Add(Me.LogoPictureBox, 0, 0)
+        Me.TableLayoutPanel.Controls.Add(Me.LabelProductName, 1, 0)
+        Me.TableLayoutPanel.Controls.Add(Me.LabelVersion, 1, 1)
+        Me.TableLayoutPanel.Controls.Add(Me.LabelCopyright, 1, 2)
+        Me.TableLayoutPanel.Controls.Add(Me.LabelCompanyName, 1, 3)
+        Me.TableLayoutPanel.Controls.Add(Me.TextBoxDescription, 1, 4)
+        Me.TableLayoutPanel.Controls.Add(Me.OKButton, 1, 5)
+        Me.TableLayoutPanel.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.TableLayoutPanel.Location = New System.Drawing.Point(10, 8)
+        Me.TableLayoutPanel.Name = "TableLayoutPanel"
+        Me.TableLayoutPanel.RowCount = 6
+        Me.TableLayoutPanel.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 10.0!))
+        Me.TableLayoutPanel.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 10.0!))
+        Me.TableLayoutPanel.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 10.0!))
+        Me.TableLayoutPanel.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 10.0!))
+        Me.TableLayoutPanel.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 50.0!))
+        Me.TableLayoutPanel.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 10.0!))
+        Me.TableLayoutPanel.Size = New System.Drawing.Size(463, 239)
+        Me.TableLayoutPanel.TabIndex = 0
+        '
+        'LogoPictureBox
+        '
+        Me.LogoPictureBox.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.LogoPictureBox.Image = CType(resources.GetObject("LogoPictureBox.Image"), System.Drawing.Image)
+        Me.LogoPictureBox.Location = New System.Drawing.Point(3, 3)
+        Me.LogoPictureBox.Name = "LogoPictureBox"
+        Me.TableLayoutPanel.SetRowSpan(Me.LogoPictureBox, 6)
+        Me.LogoPictureBox.Size = New System.Drawing.Size(146, 233)
+        Me.LogoPictureBox.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
+        Me.LogoPictureBox.TabIndex = 0
+        Me.LogoPictureBox.TabStop = False
+        '
+        'LabelProductName
+        '
+        Me.LabelProductName.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.LabelProductName.Location = New System.Drawing.Point(159, 0)
+        Me.LabelProductName.Margin = New System.Windows.Forms.Padding(7, 0, 3, 0)
+        Me.LabelProductName.MaximumSize = New System.Drawing.Size(0, 16)
+        Me.LabelProductName.Name = "LabelProductName"
+        Me.LabelProductName.Size = New System.Drawing.Size(301, 16)
+        Me.LabelProductName.TabIndex = 0
+        Me.LabelProductName.Text = "제품 이름"
+        Me.LabelProductName.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+        '
+        'LabelVersion
+        '
+        Me.LabelVersion.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.LabelVersion.Location = New System.Drawing.Point(159, 23)
+        Me.LabelVersion.Margin = New System.Windows.Forms.Padding(7, 0, 3, 0)
+        Me.LabelVersion.MaximumSize = New System.Drawing.Size(0, 16)
+        Me.LabelVersion.Name = "LabelVersion"
+        Me.LabelVersion.Size = New System.Drawing.Size(301, 16)
+        Me.LabelVersion.TabIndex = 0
+        Me.LabelVersion.Text = "버전"
+        Me.LabelVersion.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+        '
+        'LabelCopyright
+        '
+        Me.LabelCopyright.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.LabelCopyright.Location = New System.Drawing.Point(159, 46)
+        Me.LabelCopyright.Margin = New System.Windows.Forms.Padding(7, 0, 3, 0)
+        Me.LabelCopyright.MaximumSize = New System.Drawing.Size(0, 16)
+        Me.LabelCopyright.Name = "LabelCopyright"
+        Me.LabelCopyright.Size = New System.Drawing.Size(301, 16)
+        Me.LabelCopyright.TabIndex = 0
+        Me.LabelCopyright.Text = "저작권"
+        Me.LabelCopyright.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+        '
+        'LabelCompanyName
+        '
+        Me.LabelCompanyName.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.LabelCompanyName.Location = New System.Drawing.Point(159, 69)
+        Me.LabelCompanyName.Margin = New System.Windows.Forms.Padding(7, 0, 3, 0)
+        Me.LabelCompanyName.MaximumSize = New System.Drawing.Size(0, 16)
+        Me.LabelCompanyName.Name = "LabelCompanyName"
+        Me.LabelCompanyName.Size = New System.Drawing.Size(301, 16)
+        Me.LabelCompanyName.TabIndex = 0
+        Me.LabelCompanyName.Text = "회사 이름"
+        Me.LabelCompanyName.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+        '
+        'TextBoxDescription
+        '
+        Me.TextBoxDescription.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.TextBoxDescription.Location = New System.Drawing.Point(159, 95)
+        Me.TextBoxDescription.Margin = New System.Windows.Forms.Padding(7, 3, 3, 3)
+        Me.TextBoxDescription.Multiline = True
+        Me.TextBoxDescription.Name = "TextBoxDescription"
+        Me.TextBoxDescription.ReadOnly = True
+        Me.TextBoxDescription.ScrollBars = System.Windows.Forms.ScrollBars.Both
+        Me.TextBoxDescription.Size = New System.Drawing.Size(301, 113)
+        Me.TextBoxDescription.TabIndex = 0
+        Me.TextBoxDescription.TabStop = False
+        Me.TextBoxDescription.Text = "설명:" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "(런타임에 레이블의 텍스트는 응용 프로그램의 어셈블리 정보로 바뀝니다." & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "응용 프로그램의 어셈블리 정보를 사용자 지정하려면 프로젝트 " & _
+    "디자이너의 [응용 프로그램] 창을 사용하십시오.)"
+        '
+        'OKButton
+        '
+        Me.OKButton.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.OKButton.DialogResult = System.Windows.Forms.DialogResult.Cancel
+        Me.OKButton.Location = New System.Drawing.Point(373, 215)
+        Me.OKButton.Name = "OKButton"
+        Me.OKButton.Size = New System.Drawing.Size(87, 21)
+        Me.OKButton.TabIndex = 0
+        Me.OKButton.Text = "확인(&O)"
+        '
+        'AboutBox1
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 12.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.CancelButton = Me.OKButton
+        Me.ClientSize = New System.Drawing.Size(483, 255)
+        Me.Controls.Add(Me.TableLayoutPanel)
+        Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog
+        Me.MaximizeBox = False
+        Me.MinimizeBox = False
+        Me.Name = "AboutBox1"
+        Me.Padding = New System.Windows.Forms.Padding(10, 8, 10, 8)
+        Me.ShowInTaskbar = False
+        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterParent
+        Me.Text = "AboutBox1"
+        Me.TableLayoutPanel.ResumeLayout(False)
+        Me.TableLayoutPanel.PerformLayout()
+        CType(Me.LogoPictureBox, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.ResumeLayout(False)
+
+    End Sub
+
+End Class

Epole.fp13/AboutBox1.resx

@@ -0,0 +1,603 @@
+<?xml version="1.0" encoding="utf-8"?>
+<root>
+  <!-- 
+    Microsoft ResX Schema 
+    
+    Version 2.0
+    
+    The primary goals of this format is to allow a simple XML format 
+    that is mostly human readable. The generation and parsing of the 
+    various data types are done through the TypeConverter classes 
+    associated with the data types.
+    
+    Example:
+    
+    ... ado.net/XML headers & schema ...
+    <resheader name="resmimetype">text/microsoft-resx</resheader>
+    <resheader name="version">2.0</resheader>
+    <resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
+    <resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
+    <data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
+    <data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
+    <data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
+        <value>[base64 mime encoded serialized .NET Framework object]</value>
+    </data>
+    <data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+        <value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
+        <comment>This is a comment</comment>
+    </data>
+                
+    There are any number of "resheader" rows that contain simple 
+    name/value pairs.
+    
+    Each data row contains a name, and value. The row also contains a 
+    type or mimetype. Type corresponds to a .NET class that support 
+    text/value conversion through the TypeConverter architecture. 
+    Classes that don't support this are serialized and stored with the 
+    mimetype set.
+    
+    The mimetype is used for serialized objects, and tells the 
+    ResXResourceReader how to depersist the object. This is currently not 
+    extensible. For a given mimetype the value must be set accordingly:
+    
+    Note - application/x-microsoft.net.object.binary.base64 is the format 
+    that the ResXResourceWriter will generate, however the reader can 
+    read any of the formats listed below.
+    
+    mimetype: application/x-microsoft.net.object.binary.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
+            : and then encoded with base64 encoding.
+    
+    mimetype: application/x-microsoft.net.object.soap.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Soap.SoapFormatter
+            : and then encoded with base64 encoding.
+
+    mimetype: application/x-microsoft.net.object.bytearray.base64
+    value   : The object must be serialized into a byte array 
+            : using a System.ComponentModel.TypeConverter
+            : and then encoded with base64 encoding.
+    -->
+  <xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
+    <xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
+    <xsd:element name="root" msdata:IsDataSet="true">
+      <xsd:complexType>
+        <xsd:choice maxOccurs="unbounded">
+          <xsd:element name="metadata">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" />
+              </xsd:sequence>
+              <xsd:attribute name="name" use="required" type="xsd:string" />
+              <xsd:attribute name="type" type="xsd:string" />
+              <xsd:attribute name="mimetype" type="xsd:string" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="assembly">
+            <xsd:complexType>
+              <xsd:attribute name="alias" type="xsd:string" />
+              <xsd:attribute name="name" type="xsd:string" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="data">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+                <xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
+              <xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
+              <xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="resheader">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" />
+            </xsd:complexType>
+          </xsd:element>
+        </xsd:choice>
+      </xsd:complexType>
+    </xsd:element>
+  </xsd:schema>
+  <resheader name="resmimetype">
+    <value>text/microsoft-resx</value>
+  </resheader>
+  <resheader name="version">
+    <value>2.0</value>
+  </resheader>
+  <resheader name="reader">
+    <value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <resheader name="writer">
+    <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
+  <data name="LogoPictureBox.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAAHgAAAEGCAIAAAAhWcaAAAAABGdBTUEAALGPC/xhBQAAACBjSFJNAAB6
+        JgAAgIQAAPoAAACA6AAAdTAAAOpgAAA6mAAAF3CculE8AABvkklEQVR4Xu29B1hUd9r+z3X939+7bzax
+        RQWmnZmhS++9i4KCXRRRsKGoiKKIKIJKlSrSpTdpioWmYm9gLzEao4kliTGmZ3ez6767yb7/+3u+M8fD
+        DBiTTVE33+u5cKSe85n73M/9nJk5oyEsE4rKRaIKkbhKLKmVMPUM08hIW6Ty3XL5PrlOl45Ot47uEV3d
+        47p6J/X0TrGFG8f09I7o6Xbr6u7X1W3X1d2nq7NbR2enjk6zjk6jjk69jk6djixDxsxhRJailJSUy5cv
+        f/vtt3/729/+/ve//+///u8//vGPf/7zn999993333//L3b936u+WNBlInG5WFIhkVRKmCpGWiOV1kpl
+        O2TyJrm8RS5vlevs1dHt1NU9oAuy4Esoo46yrA+xn8dX29RY1+joVOvI0mXMbEZkIUpPT7958+Zf/vKX
+        v/71r0+ePPlPw60BylA0Bc1UMgR0lVRWLZPVyuR1cnm9XKeBBdeio9OqA+US/Xbp6h7UJYi5UrLW3aOr
+        s6sPa3mVXF4pl6ZKJTMlQmNhYWHhhx9++B+Im4B+SrlSSblaJq+Rk6qVwwQIsh06hHiTkvheljjgwjoA
+        HQXWuAOojbSqsa6Qy8vl0o1SyWSJUEfY0NDwpz/96T8KtwYoiysUoEFZWk1AP6Vcq/O0OOIgCI4qxEEZ
+        hRucZeMbVFiXyeWlcmY1I/YRR0REHDlyhMP9ynu3hrhMLCmXMBWsnCtZOdcoQPehzBVwqxCHL+9mXQXW
+        Acq0uPaIgwDfybEulcu3y+WFcmYRI7IXbdmy5c6dO3zcYK2CW7GlL/nSEBeLxaWENaFcJUPJq+WkBgLN
+        lYqlgPguHXi0gjgKN2DZtD2qsC6Ry4vlsmSZZLpEqC9samr6+uuvgZtLJq+etDXEOWLJNglTxDAljLRM
+        KquQySoJa3DpUyqUuepX4LAUShzGwrVH3B+1PNbFcnkRK+0oRuwpXr9+/ZUrV4D7z3/+80DGrdjkl3Np
+        iNPF4gyxJEPC5DDSPKmsSCYrkREzLSdpAfnsuYir44ZBgy8sBaDhIVwUqevLulAuL5AjcUtmkUxSX1//
+        5ZdffvPNNxQ337hfdmlriFPFkjQJs4VhMhhplhQl2yqTb2MRwExBHFCApur5NK6CWylwUmDNtcdqnT6s
+        8+WyPBmzihF7iTds2HDjxo2vvvqKc5JXQ9oa4mSxJEXCpDFgLU2XSjOkskyZLJstEM9jD3Ae8efSOB83
+        tW/gpkV1ja/Csvms8+SybTJpmlQSKBEaCPfs2fPFF1/06yQvqbQ1JIkSJplhUhjMFNhP2RYZZjnCmsNN
+        ieezRMDl+QWujhuKpqy5KMJjDVHjD8lyZMwyRuQkysrK+vjjj+EkNJO87NJmQScx0mQpqRSpLE1GiuLO
+        YHFnKXHnyMBCxVJ+QOAq3k1x0+JYVypZw6y3KVhLN0jF/mKBUNDb2/v555+rS/ulCyQaoMyBlqXIFJXK
+        w60u8FwWN9D8NNwoyho3KGscIiqs2T/EzGaEo4QtLS2ffvrpyy5tAvqpnDnQfNwDCRx+UvBj/EQdN0RN
+        WdPYh7sNvw2NEaxx9FDWsBFH0bZt2x4/fsyXtnrWVuzQi7o0xIvFTDxhrUqZX8/G3de+f1jdYM3H3S/r
+        3Kespeuk4jEkaN+6deuzzz7jAsnLZSMazs7OAgOByE0kni5mljOqiPnF95OB1P08ZsKXNj01iI/qrJUG
+        QlinSCVTJAKJ4PTp05A2AgmytoqNvOCsNerq6vLz82NiYoKCghwdHUVWIom/hAljZBvVQNN6hrqpd2O8
+        Biy0OHXcHGsV3FzRcaY/1ihi2YbC9vb2Tz755KWzEY2dO3e2trbuZhfSa3Z29pIlS8aMGSMyF0nGSZhF
+        jCxRjTVKHTdHBMmERu/nNG7OSVC4MbCuUVCAyEKEARLJDx2S2ghNIy84a42Ojo7Ozs6urq79+/fjBhYk
+        09bWBpkvX76cELcWSSZLmEg1V+GchOIGaw53zg8ZtwprDjetZ7NeTk77FRcXP3z4EDZC00i/lq3YxRdj
+        aRw5cuTo0aPH2IUbhw8fPnTo0MGDByl3QIfGFyxYIJQJxR5iJlTNUp5h3NRJIG32tMkPS5uPm2Y+yhpD
+        o7Ix0sKwLnIR5eTkfPjhh8+2bMVevgBL4yy7zp07h4+YDs6cOXPq1KkTJ06AO+4DDjrC7IYNGyZOnEgE
+        Pl0iXaMWujnc/6a0KW58fCZr6Vop7vjU1NQPPviAb9kvbHvUeOutt65fv46P165du3r16uXLly9dunT+
+        /HlwB3R0eUCH0kG8u7sbxHNzc0NDQ4UmQskECROl9JNnJ26+tNVdm8+aj5vPuogd0Pmss2TSOKnYW5yY
+        mPjgwYNHjx4h+am3xxeHtcadO3feU6533333nXfeuXnzJtCD+5UrVy5evAjoUDqInzx5EjKHt4B4RUUF
+        eiYyAIkoK1ncYP08rg1qz2kj6qwxyHCgUWAdLxX7iDdu3Hj//n2uPapHkReBtcZHygW/w2GILb537x6g
+        3759m4MOpUPmFy5cgMw54tA4un9kZCTBHSCRrpI+ZT2QtGkgeR4b4XDjBjejq7DGr82USRPIOJOQkIAt
+        p+2RiyIvFGsNqAAHHTwON7CV8DtIA9wp9Lt373JKf/vttzniVONwFfj4jh07IiIihKZCyVSJdL3ytJQK
+        a07anI30G/74oLliv6Q491TIDo3qrH3EmzZtgkSw5VwUeaFYa8DX0LKxWfiI29hEQAd6DjqUDhOkMqfE
+        OY2jhfb09KB5QuBVVVVhYWEiWxEzh3USPmsVG6FjJOaa57FsWvh8NY81F/hY0IQ1PMRbnJycDGXwWSP2
+        vSCsNXC3cwsJCQanAp0qncqcTxyughYKH+cEfvz48YKCghkzZoi9xMxS5lmsn23ZKpRpUdY4DnA09Msa
+        vdFDnJGRAdZc7HtxWGvQjcBCKsJtxH4kJEDH9nHQ4XrYaCpzSpy6Chop31IgcOonSUlJxLgnS6Qb2EcS
+        ONZ9LZs8fPOc7ZGCpmYN1jgaMMhwIYRjHSMVOYvy8vLef//9F421Bv4wXdgIrH6hQ+l84pzGqY9D4Ldu
+        3bpx4waCCsWNXIixfunSpSInETltMjBrNLc+7ZEPGvUM1jRc01+CYkGjkDhFdqLy8vJnsP5NZhkNevfS
+        hS3A6he6OnG4CnYDAZYKHDvG+QmHG6FbqCuUTJLAQ38G1spPEtbw92JeCFGKmrBeyojMRc3NzSqssf2/
+        IWsNxb/KRYljUeIUugpxzlXg41TgaJuIVnBw+IkK7q6uLkRAsQvr2j8Xa5g1WNNwzYUQjnWGjFnACA2E
+        Bw4c4Fir55BfmbUqaP7iiFPofOJwFb7AsRvUwVVwUzNB+s7OzhaOEjJBjAK0OmvEvudhrfwMAa0eQiho
+        yjqIEUgEuKdfENbPAs2tfomrCJzvJ3zc8G60SkyYLS0tmN3F48Qka3Ogfyxr3mcIa3wnQkiBsjHyRI0/
+        IZkoiYqKQrvGltDMhy2kcyM2HruAffnVWD8XaG5xxPsVOPUT7AynburdaJVIJpcvX0YKjI2NRTBgIlhp
+        q7PmPEQlh3CK7pc1QgjXGDnW6TJpolQ8WpySkqLOGvr4lVn/ONB0cbixgJsTOB83NRN4N22VNAhS487J
+        yRGaC5m5DAE9EGv4L0DzZ/T+QCvMWqUx0l/Iilq6RiqyJyEEdzYmANz36Cj03BNljY0Ha7pHit37ZdZP
+        Ac0tDjffTzjc1LuxY0gmCILYT+okmHHq6upIGgmUPAXNZ50nU+Tr5xC1gjXfrHmiRjHhjNBI2NHRgb+O
+        uxypFAoAazQYbCq2GVuOXXihQdPFqqGPn1Dc1LtpMsExiz2EcSN0U2l3dnbOmzdPMkGCA/wpawqam2XY
+        GV0BlA+6L2sCul+zZkVNWKMxCgTwLsoadzx6CXSALfzVWP8MoOlSx821Ss644SQIAJD27du3IW0E7RUr
+        VojHiskASUFzoqYzOsyXa4wqoFHqrPlmTX8hCxqxEk04Pj4erQImhvsbW6ISrn9ps/7ZQNNFWWNR1hQ3
+        30lUpI38t379erGXWBqrxnqr8jwf9+xhFdAojrV6su4ravx+kYOorKwMdzD+NKwMW8IFvl+hMf7MoOlS
+        kTbnJNgrOAkOW07aOJahssTERLGrmIlmFKwpaI41/HcgUaOUrAloLllTA6G/TSlqZjEj1BceOnQIAZ8L
+        1/wQgq3FNr9MoLGwuSq4qZOgBUHa1LVp/sOxjD1PT08nsW81y5oTNQohhG/W3KMBaqAVrKmB5PMMhIqa
+        Pd8imSbBmIpcj4OJH0J+hcb4S4Gmi8OtLm3q2jSQUBvB9EhOQoE1QKuYNVhXsAYCsj/ImqY9voEoRS3d
+        LBW7i5Ev0Y25EMI1xl/UrH9Z0HRR1nxpU9fm2wgGCkRdwhq6hofwRa1iIBS0Cm6ONcxa3UB4omaWkbTX
+        1tZ2/fp19GSVxsiZ9UsJGosIu6+0qY1g92iHpHMNVJaZmSl2E0vXSZ+CRvGnGGB9JmuFgaCL8hOIUtSy
+        NPJSsCVLlmB0oo2xX7P+2UX9K4Gmi7LmpA0bgYiojcArcRSDNVSWmppKckg8jzUMhCZrGAhogi997kd/
+        oBWsYSBIIHSEAWjKmhW1dJMUvXfr1q0YnWBZOJhg1r/0FPOrgsZSYc23EewqTX5ojxs3bhT7ismTiTnW
+        XNqjBsI9p6lf1pyBYIShP04NhAUNUZNxUU948OBB5Ev+FPPLGcivDRoLW09x822Es2yuPUZHR0smSp6C
+        huEqDYR0RSrqgVkrDIQ7B8J1RRY0MZAJktWrV1+8eJFOMVyy/oUM5DcATRdlDdVwrGnyo+0Ruw2thYeH
+        S2byWEPUynGR0ARi+gRUvocoQStYw9ZVuqJS1GSEsRZVVlZiNKfJGn3il0t7vxloLI419gesueRHUzZY
+        nz59WqgrZBYwCtBU1DAQ2hUBl3uyb3+sFaKG29BYrSZqZjYze/bsc+fOIVkj83Bp75cwkN8SNBafNfZK
+        nTVymNBCSJ51RllTUXNdEZTpqwWeYSAqXZGKmj4VIlmGWI1ZCQaCtPeLGshvDBrrB1lXVFSIXEWKEMKJ
+        msZq8KUvzlBhrQT9tCvyZ0VO1KnsXC4jcznSnoqB/LwjzG8PGgv7gMWxxu6psE5OThb7ixWg1UXNveKo
+        P9YKA0FX7FfUqTLEm/Xr1/MNBA2ZP8Jgq/59A3khQGNR1hBOv6yx80uXLoWlElLgxT1ZkoqagqasBzIQ
+        Oiv2K+pI8tKY1tZWlQRCR5ifqyu+KKCxnsEaOeTkyZNCYyGzgiGgqXtw8QOIm9iCjTxb1PQESF/QshSZ
+        JECycuXKnp4eJBB6vok7BwJRcwbyioDGUmHN+TXN17W1tWQ6xxSTy7oHN5RDyPTFz882EBr1+KKm7pEi
+        k66SCk3IlZ7Onz9PzzfRcyBcV/z3Rf1igcbqlzXN11BZQkKCZJqEgMZETgfFSjbnATH/Zc9qoElXhKhL
+        lPOLuqgnSZYtW3bmzJlnd8VXBzQWZc31RrDGBEFn9Bs3bpBkHcEoQLOnqglHmAYotyhZ/6CoaabmgZZG
+        E1HX19efPXv2GV3xJ4v6RQSNxWeNPeRmdEisubkZaQ9oFKC5lgjEO1nW9LoJHGiONSdqdadmX4mDiR+i
+        xpREuyJ3Yo/Oiv+mqF9Q0FjYH8hHhTWSAPY8Pj6emcEQ0LBpuAfXEvnXXunPQFRFzeU8FjRxaiNhY2Nj
+        b28vPbGnPiv+ZFG/uKCxONaQEnYSu4odRoNCNgARHOwENLIH3KOaJQvEu5Ss+00gVNT8TE1bIuseRNT+
+        5Flkp06dunDhAn9WpKKmUe+nifqFBo3FZ42Dl7KGxDAuiseIiagBmjv1QUG3sqxVDERF1PT0KUD3FTWz
+        nBHqCPfu3ase9f5NUb/ooLEoa+yeSmMMDw9nwhkCGjaN7AGa1D12s6y5C2X9oKh5oFHi0eK4uDjEdhr1
+        fi5RvwSgsfisObPu7OwUOYlAioCmNg27YEE/vdjeQKLGj9CzH1xLVLoHE8aMGzfu6NGjiHo/o6hfDtBY
+        2CuuMVIDQfCC9JgQhlgBQMOmafag1++kF5F8hqiL2PPUai0RhfsvMzPz5xX1ywSab9Z0ikHmFVmKMCsS
+        cJxN08sv04ujPkPU2/sOLzzQTBAza9asn1fULw1oLMpaxaxTU1MlMyVPQbM2TUCzF0d9KmoKWsmagC5X
+        5jw195CuI8NLVVUVFbV6/PgJmfplAo3FsYamYNbQFw5tobFQmiQloMGRgqYXW0bBQAYSdSU7vAzQEiXj
+        Sc6DqBE/uEzNDYr8sx+KLfuh9ZKBxgJrFQOBn0pmSBSg2VkcfAnljh8SNcyd3xL57hFOnunb3d1NMzU3
+        KPLPfvwo93gpQfMNBAkEhzaOdGAiEOnYgn4I0F0s64FEzbVEgEZL7OseKJEDuZrksWPH6KBIz36onNJ7
+        fvd4+UBj8Q2EJhA4NTObISg50PBoepH2NqWoOdBK1kTUaIncqY++oCXTJHPnzj106BA9+3Hjxg16Sg8R
+        np6n/lEt8aUEjYV94xvIpUuXED/kW9m3fgBoBA8Kmr7LAxV1vzkPLZGbElXcI4o8nNja2nr8+HHEG/pU
+        mwcPHqAl8h98eU5Rv8SgOQOhIwzJ1IsYolwKGsEDoOm7PLSzosZ9oC5qtERMiZx78ECjxC7kigmHDx+G
+        qOl56oFynmKzBl4vK2gsFVEfOXJE5CwiLZEPupt99xLcgKibBmiJpbxA3dc9mBlMcHDwwYMHT5w4oT68
+        /KiW+HKD5kRNu2JYWBgTw6iCPszqGk7dMnBL5AJ135BHTpzKhDt37lTPeT+2Jb7EoLE41rQrNjQ0SAIk
+        xCUoaLjzIfJWSIR1F/vuMAO1ROoeajaNwjgO90BLRM7jWiJ99umPco+XGzQW9pAaCESN/RfqCuG2itMd
+        FPRR8oZTRNrI1LQlqoOGe9DJhZ734IFG9ggNDT1w4AC/JVL3QEt8/inxpQetImqojwljyMBCrQOgj+np
+        nWDf1quTbYl896CsqXtwk4uKTS8nk0tHRwdaIn3ott8p8dUHjYU95EQN3Yldxbot7LkODvQpwpo4NVpi
+        v+6B7EEnl37dw0qUm5uLKfHkyZPclNhvoFZsUH/rFQHNF/WsWbNkybKnoI/r6Z1mC6JGzhvIPTC50LOm
+        aqAl4yTLly/fv38/nRKvXr3KD9Sce2AbniHqVwE0Fl/U+fn5TAhDhu/9CtD6p/UNTxsSUe9XugcHmrKG
+        e5SxF4vsz6aZuUxAQEBnZycXqLkTp8/vHuRSP4qbL/PiixpHt8hBRIIHRhWAPqFncNrA+IwxcOO/A7qH
+        Ssjj2bQ0ViqUk0fH/x33eEVAY2FHsKtQFvSFKQOHPzHlwwQ05GzWYwbWUPez3IMLeX1Bo3DPpaWlUfeg
+        z7D5se6h8Yw74eVaVNTYW+wzehezgCFyPkI6IRBb9lpa9FgQUVP34INmWStC3kA2HSAJDw+n7qGePZ5n
+        ciGgXxlRY1+oe8BJxW5i8satCNEsaKteK9uztiZnTBTu0e95j3KeTfcFzcwnj9i2tbXx3aPfyWVA0D8Y
+        AF+ihR3hWuL48eMRJGjkgG+AsuM5R+AmLRHj+EAhj2/TPNDSGKmAEbS0tNDJ5dy5c2+99dbt27f55z2e
+        bdMaz7bwl2sBNCfquLg40KGd0LzH3OGcg+t5V7CGX5NxXMWmWdaqNs0DjUKazs7OhnscOXIE7qH+UADu
+        3WfYtMazLfylW5yooT5Mz/ANkIVBO5138rzo6XHBA9DhHuRZH2qgSchDmh6gH4pHi1etWtXe3k4fClA/
+        a/psmyagXzH3gG6wUziuRZYivQPEoK17rSHn0ZdG+1zygbRJ9tjL2rQKaIgaaXpr//2QCWSCgoJg09xZ
+        0+vXr/cb8voHzTnLK8Oac4+pU6fql+jDoO3O2kHL4y6NC7gcgBskeyDkDZSm6Uv11UGHM56ennv37uVC
+        3rVr11Rsmjs9rdgU3tKgzvJKtsT4+Hi9dXrUNyDniVcmTr061feSL9CTkAeb5oNmWRObpv1QLXhI15N+
+        2NTUxIU8+tya57Rpcv3oZ7fLl25hJ7Ev2GFAkQfJkTfgG+ALyjPfmjn5ymS4B7HpgdL0M/qhOXl7tJ9m
+        0xrPeU7k5VrYF0gHwYBxYoAVdjH+8vjAa4Eh10PAGv+FTZMnjP1gP+wLGtkcYYZv0/xZ/NlpWoO7H/r9
+        8ku6sCOQFQ5kgUjgsMfB+6I3fGP29dkLbyyc+/ZcmDUyH3kcQP3sEu2HmA/7A435MCwsbN++fZxNP3+a
+        1kC75H/51WBNQUM9oaGhdoV2IDv92vT5N+Yve2fZkneWTLs6jYS8TrYf8kGzrNEPSfAAaPTDvgmPmc1M
+        mTJlz549NE3TRxHVT3r0D5rv4q9SS6TusXnzZus4a8g5+Hpw+Dvhq99djQp9O5TY9IEB+iHmQwQPmvBU
+        QC9h3N3dd+/e3dHRwdm0ysO1A/VDDfUTfa+MqLE7dXV15nPNIed5b89bcWvF+jvr496Lg6i9LnrpHdEj
+        j4s/I3ioJTzpWqmZmdmuXbtg09zDteiHd+/e/cF+qEE1/+qJGnuBfQELo7FGkPOim4tibsckvp+YfDc5
+        +t1oBGpM52Q+7Bc0fVhLLeHJkmVCXWFlZeVAYwvXD/sB/fDhw3/n+dUv7MIuYEfQpuTm8rnX5i5/Zzm0
+        nH4vPft+dsJ7CUgg6If9Bw+wpglPHTSb8HJyclT64Z07d/hPNKUYVUH3+2QybKLi6y/zwl5ghx0dHUMO
+        h0DF0PK2B9uKPihKv5++4MYCMrYgeKiAZlk/TXjqoJ1EGzduRD/s6uqiz6qhDwJwwWOgfqjBXYzslRQ1
+        9mXy5MkhLSHx78VDy2UflVV9XFX4QWHkO5GYy8kgrpLwKOjSgaO0tzgqKgr9kD8fcqfxqF65uUSxHezS
+        4NIJv2m+Gqyx/Tg6lyxZMqt4Vtq9tOIPi3c82rHz8c7qj6vj7sRhbCGDeL8JD1F6ANA0Sre2tvLnQ5VH
+        W7jgodgOdmnQpklFTTM1vUNega5IQeNID0wNzH2QC767H+/u/Kxz1+Nd4I6hXLd74Cg90MwSKJk5cyYN
+        HvTRlucMHhrcFfZ+3stTvCALu1BYWDhpzaTSj0qbP2k+8PmBo18e7fqsK+9B3pSrU0jCQ5TuFzSdWdRA
+        MyHkqQc7d+7kggf/YS0uVvQDGsrnnsv+M16e4gVZAN3U1DQ+bHztx7Xtn7Uf/+r42W/O4mPlw0pM5OSM
+        R7+gq9gn8vYLOowZPXo0QCN4cA9rPc+JafKes7/E5SlekIWNh+68Z3jDLg5/cRiUaUHdYTfC9E6xM4sK
+        aPY9nMmjtP2CjmCcnZ1bWlr4J6afJ+FpZGdn08tTcE+x5ke9l501thyKcxnnArvo+bqHAw11I3gYnjYk
+        J0v7A02e84gpXA20NEpqbW3d3NzMJTz6JLF+Ty31Ac0w5rh/+K8PfZW6IrYc+2XraktNgys4deztWJMz
+        JmQ4VANNTpYOBHqt1NTUlILmP1D7g6eWNMzMloSGhuJugf7pd9OuSLvni2Yg2IwfXIpvZRf+C6GZWZvx
+        KaOg7s3vb7bosSDPTlehjALoQuV5JRXQcVIDAwOA7jdKPwu0q2u9kVFgbGws7Yowdf71bX5RA8GhgzaC
+        bW1sbMzPz9+0adOKFStwr2PEQMNxcnKysLAwNDSUyWQSiUTILtzAf/FJfAnf4O3tPWnSJPxIZGQkYty2
+        bdt27NiBeIsohV3ANmPhrxiMMuj9updfYI1x3KrXikzhKpRR6IcDgJZtlMnlcjTYfs/hqT+mpdhVFvQO
+        R8c8Pb3RGOFxCHAGgqSiYiD4sZ/MGr8HbQCRKC8vb/Xq1YGBgcBkbjxqrIdryNSJq8Pmpq1ZuT1lY0t+
+        dnd1ydld9Tf2775/vOvx2aN/unz6ydvn//HOpe/fvYzCDfwXn8SX8A032prO1pV0F6S3JK/bHr0kNSx4
+        VWDAHB+3sbaW5ga6GL7xh5YvX/7m8DczdmTUnak78uGRni97SH3Vk3Mvx67HjiiaPb9B6nlAJ8oYhgHo
+        gWaWZ4FG2dhslkqt6+rq6EMG1EBUEsiPMmv8FP489JWQkICEr6cjH+PuGh48Y0tMVMPW9FNNVcD0j3cu
+        /uv2lX+3bvT+6/Kx73u7vj/e+v2hhu87Kr9vLfy+IevvFZvvpq84GRNaP39ilLPxPDdzD1M5I9bynuw9
+        d83cjds3xrTF2B2zk+9krz+B4nCjYB0FA4BOlolEIoBWP1kKgT5jOAToBrZ2WFquEov14Tt8A6EJ5DlH
+        GNyZyJXQ7KJFi3Tl8gAf7zWL5pelbj7RUPXxmUOqgH7GunXxX9dO/evCoe9Pt31/uPn7rqrvdxPW31Ul
+        fVca911B9KN1M55smfckefa9NRO753sVTrKLdBvlbSIaqvWHQT6DhgcPF6wVMAUMCRts6VSxoGm8S2aL
+        xxoOBq9THw77fZRWgYYF3eTq2khxm5qGzZs3D+5ODYTO5c82a9zGn9m+fXt4eLiJkeGsiQHQbHtZwb1j
+        Xao4ftF699K/rvf869KR73s6ibQP1H6/t+T75q3f1aZ9V77x0aa5T3LCWdbBTzZO/9uGSX+L9f/zau/z
+        c83K/WVRjlrehoNHav73IM9BI0JHCBOE9NmO0gypNFUqS1KyVhYFTYdD7jmPUGe/U7gCE0C7uTXzWY8a
+        FYyOxM3lOBa4sZJv1qCPv5GcnIy/OsHHe/PKZftKtj04cUB1/3/NeufCv946rWS9i7BuK/1+V/73OzIf
+        pUc8KV79JHfZk4yFT1LnPNk042/xU/4cM/bxSodHS60eLTJ7tND47Az9ojHixTYj7HRe/6+h/9+w8cO0
+        FmhJNpD3TCOVRIpATyLWAUtEJqZT+LNBc6IkoHmsG52cyg0Np6xfv54bYbi0B9YQOH57XFyckYH+3OmT
+        ixI3XNjToLrDv34BMeR89SQo/+vcwe/PdCj8urPq+7bt3+3M+yQ35kll/JPtMU/yVjzJXkyknTTr2/hJ
+        j6PdH0XaP1rCsl4w6sP5RvfnGb0fatjkL13rqOmjP3jY8P8e4j5Ec7amZJ1Eii4G4hulaIb19fUAzU3h
+        9HkH/NMd/YJu4bEmuB0dCw0M/BMTE+E71KzBGlEGbc1AX2/e9KllqZve7tr93S2SBFT3+WcvNEyi06MK
+        gif3ErUeaf7+UCOp7h3fd9d/f7CO6Be1v+b7rmqWb/n3+7Z/v7vo+10F/2zKebwt5knN5ifl65+URD/J
+        X0FsJH3+t0lBn8aNeQTWK5weLbV5tMgcuias5xrdCTF8d47hO8EGe/xl6x21xugNHjbsv4d6DdWap4Uc
+        jXxZW1uLfoiZhZvC6emOZ5xX0nB3363Gusnefque3pj09HRMmUlJSVpaWlN8x2Stj0bw+utbZ/9+A3nr
+        4j+VkUsVzU+oqydJHwM10GnK/q46mTSxwujvtkZ+l7Xku/Sw71Lnf5cc+l1SyHeJs0ltDmZvzPkuOeS7
+        lLnfpc0n35Ox+LvsZeRHtq38Ln8V+fGitd+VrPtHUezjlEUEcdHqJwVRT/Iin+QufZK16Nu0kE83BXyy
+        Hqw9CesIu0fhlo8WmjycPwq6fi/E8FawwY1ZBteD9K/O1G/wY1bajnSSv/Ffb/x/mpqaW7ZsaWhoQMKj
+        wyEd97jTHfS8kipoT8+Oflmbm6doatrpSqWRc2c3b8t8eKr707NHv7p44s9Xz/zt+rn//TdYkygG0dWn
+        f1cU8136ou82Bf1z3aR/Ro39Z6T3/y7z+HaJ+5/C3b5c7Pr5YtfHi1wfh7k8Wujy8UKXhwtdPlpACjfw
+        X9QnYS746meLXL9Y7Pp1uBt+6q9L3f++zP2fER7/XOFNfuEaf/zmJ2snfxrh82RT4JPEoCcpc56khTxJ
+        C0V9mzLr8Sb/T+J8P4n1eRTt8Wil86Pl9oT1ItOPF4x6EGp0d46C9VtB+ldm6l+coX8hUD/fUzhHb7iV
+        WDMgIACHOBeluSkcRz93uqMPaG/vQyzrPZS1i0ujrW21qWmJqUmRqXGCTOKSFbvq1sE9SBFg/dm5Y19f
+        OvmXaz0ca2ogz2ZN1Lozj+grZS7L1Ac4wAWMwOuDBc735zm/P9fpTqjTu6FO74Q63QxxuhHi9HaI4/U5
+        jm/NcbzWX+Hz+Cq+B4Vvxk+h8OPvzXW6O8/p/nxn/Fr8ctwTn8xzuBto/M0Sx78uc/pbhOvfVnr9LXrM
+        39aO/3PsuE/Wejxa40kUvdr9UZQr0TVYE8s2fzTf+MO5hPWd2YZU12AN0Oem6p3z1z800SzJWW+8gdDL
+        yysmJgZ9i5/w6MxCswMX0gD6KMu608Vll41NtZFRgYV5qb1tpatjHcrOKkVX6p4ZE/Vu9977x/d/fJqw
+        /ubSqR9gjc8caviuctN3aQsI2eVef1niTrECAZhSoADER3l19s9Q3D1B7wbcZ9dmWp+baPROqO2deXZ3
+        59t9sMD+UZjDZ4scvwi3e7TIGPolKoZHwzpo4TbRNWH9Ueio+yFGYA2/VrCepndhgsH1mVbXZlhemWFV
+        5GUUYs7oCTTXrFmDxgj3+Oijj2DTcA/0Q+6MB1gD9HEPj257+z2mpjU2VjWOdrVuTjuUVY+ys0rTl3ul
+        rlp+u3vfgxP7H5059Pn545Q1pmE+6+9O7CH2mjofx+w/lnngcMZRzyeLPf95sT5PnZtmcWKC4aVga9SV
+        2TbX5ti8HWJzM9T2Zqjl5Tn61+cYvDPH8L1QQ/gyHAP98FGYKaEcZv5ogemjecYfzyWs359NbOTtWQZX
+        p+tfnWx0c6bV24S11dWZ1pdnWNX5miy10bWUCmNjY48ePYpBD/MhHT64oVrD0XG/lWWrg91ed5cOT9d9
+        Hi673JwaVFg72GQa6PgmRCy6c6gNrD/pOcxn/fe9pX/PXfG/66f8Y7kn4MI6AReH8C3WBDi4Kvv/q1XP
+        ZLMTE0ddmGVN62IwKUA/F2x2fKbuqUDdnhl652bqXZqlfy3Y4Ca8IsTw3lwj+MbDuaNAGUV1fXe24buw
+        kUCDG1OMb8+yfifI+u0gaxwuV2aAtfWlmTY7/c2jHPTtdMTwbrRHbtADa3iIhqN9p6fbodGeh709ur3c
+        93u5tXm4tLo7N/bFvcPRLs9Qb2L0gpCrbc2U9Wf12V+lhH2zatyfwl0J3HmA60jg8pSrss+/SZ2eaHJq
+        sgkHmqszQaaHZ+gcmqZzZJrO0Wk6J6brnmahXwjSvxSkf32W/s1gA5gG+IIy6t4cwvr2DMM7gab3Z1u/
+        F2zzbrDNjSCb60HWV2faXJ5pc3Gm7YWZtq0TLKMcDe11Jampqch8MGskEODWGO15jK2joz2PeHsc8nI/
+        4OXW7um6x925SYW1s0OZscHMReO9T6wIvLd0zAfznO7MdbgZYv/2bPtrsx2ukb1yuELKEaWyt79hnQwY
+        dWaqqQpl1KmZJoem6xyaqqxpOodZ4sen6Z6crntmmt65QD0kDWQ7OAZ8A9BJBRren2n2YYjN/Tk278+2
+        BetbwTZvz7K5FmR7JciWsA6yOxdk1xJgudzBwEIuLigoQOaDtDnQlPVRsPb2OOjlBhsB6xaWNYvbsc7N
+        psLNcrspM104aHjl6FGnA23OBNr2zLDtnWl7Nsjuwiz7C7McLgU7XCb1ArE+Nt6wZ7q5CmXUyZnGfUDz
+        6vBUnaNTdI5N0T05RfcMYsZ0PeQNEEc/vDHV4P5M84chNh+F2H4QYndvju17c2zfnW17M9juerDdlVl2
+        F4PszgfZnZ1p1xtkVzPOYoGNgT4jQujmg+Zww0YOerl3sZbd6u5Q52Zd7mZR7Gpe5GJe5GxWZCqbLxoq
+        S3TSOTjF+uh0mxOBNqcJbvwBsLZXZ001zhX7VVL4zouzSJ2f5XAuyP5skH3PTFKnUTPsUKdm2J0MtDvB
+        K/wXhc/Tb8B34vt72Z/Fb8A9jd+GX6vcBnJ4HfbVOzvD8vwsaxQf9ImZRv2DnqLTPZnUock6hycT4sf5
+        xCfqvTvD/P5smwdzbD8MsfsgxPZ+iN3dELs7c+xvzWYP7mD7S7PsLpBNsqP7kudjNs1cF6CPs3zpR441
+        bKTby2mfp22jh1WNq0W5s3mJs1mxk1kRLQu9KOkIqwgLSeckq8NTbY5Ptzk1A+q2OzeTsKbSvhTseFmJ
+        lTLF54GD/nnAOh5odyTQ9tB02wPTbDqn2HSw1T7Fml9tk1VL5RvoT+HH90+16Z5GftvRQFvcJbgbyN02
+        w6ZzjE7PTKveIKuzQVbn2KLQj84w7J6mRnmqTjcFPUlRwM0RPzFF99R4navTzNEJbwdbwzruz7F9EGL3
+        INT+Xqj9+6EO74Y43Jjj8NZse+wyOODuP8OKBrtJQfctj2OjnfePtm/ztm31tNnpbtXgalnjYlHhbL7d
+        0azE0ayYrSJbo0Q97dEzDLQrfIy7p9ocg7Rn2J6ZYdcL3MSniMTOBjlAbhTrsUA7PlMwouD2KWvvJOs9
+        bO1+jqLfiR9Bcb+Bf09Q+vsCzJu8dQ5Oszg03eJooMWJGZanZlr2BBHuhwP1Dk6VH5wi7wZctvoFzRXF
+        fcRXfn6q+ZVAy7dmWN2cBdy278+xvRdifz/U4f5ch7tzHe+EON4Kcbg+x+EKYe1AWWP3+4IGYqcDo+3b
+        ve3avGwh572etrvdbXa5WTe5WtW5WFY7mZc59cU9igkSDhYlOunCRo5MswbuY9NQtvh4eBrB2jXVun2y
+        TRu78xQrBUp5tU602jXRaievWiYoqlmtuC+h+D+C34DCr+LuA45+s69xnbfO7klmqL2TzNummHdNteie
+        ZnEk0KJtqk77ZFnnZPn+KfIDU3jEp+gc7A80qQk6h311z06zOD/N4mIgGVjeCrK+Ocv29mzb90Ls7811
+        uDfX8d5cTKdIX45vk9BFjmOwhtSUHq2KmFabh80+D5s97ta73K13ulrtcLGsdbao5OEmxM11V0pH2Cww
+        EdX5me2baLl7kiUiDtlt3CY7jxso61YWK0Wj4Bjws1bfO4Cirx1tUOOj3zLRbOckUrtY4qhdk0zqJjCN
+        /szOAOnuCdK2SbL2SbKuySzxyfKDk1A6tPqADtA54qffO9UCrM9Nt7ww3fLSDKtrSHizbN8JtrsTAvcg
+        oO/Nc8KMdpuMESTjwjbBmgVNjcJuH4fYA2VDQNPicLPSroe0n+I2J7htjdP1hBNGvvHmWjt53Tizen/z
+        hvEWDf4Wjf4WDQGWTQGW5KO/VVMAKVVAv1Cx92WZu071WMOGCaZNqIlmqGYW+o4JhhXjJZV+kio/SfU4
+        yY7xTLM/Ib5voqx9oqxronz/RPlBWnzi/jrHxhkQ0IS15blplucDrS7OsL4SZPPWLLsbwXa35jjcCXV8
+        f67jXbBG/GXnYYwUYK0x2qFtNEEMlyBFEXNFKCvL3Wavu81uNyLtJhfLOmeLakfzSkfzcgezMnuzUpSJ
+        PEI83DLQQJDpYVTua1bpZ17jZ143zqJ+vMWO8ZYN/paN/grcqlB+mcIfyrMXVfuNqvM3rQ8w3RFgCuKN
+        LPRqf73tfpLSsZIyX0m5b1/i46W7/aV7A2TtAbKuCfIDfNzjdI77G/UBPd3qfKD1RQwsQbbXSMKzvzkH
+        LdHxDjEQha7B+vocRw0v292etntQHqBsQ6sPayXodrYIbjebVlfrFmerRifLOkfgtqhyMK9wAHHzchvj
+        bF3hlJFvaIebM2VjzSp8zar9zGv9LOoJbsIa9atJu97PrNCZAWV+UeJl4+VFvuLiMeKSsZLtYxXEK0Dc
+        V1w5VlLjK2nwY3aOk+7xl7UFyDonKAR+wFd+YoJxz1QL1j0s4R4AfSHQ+sIMMhZenmV3dZYdIgeCxzsh
+        ju+GOkLRwE1Za3jY7PSwbYUzsNWHtTtbStBt7qTa3WxQ+1yt97hY7XKxanGybHC0qHcwr3EwB25Fmemt
+        lWq6+khHxNrrQtpVvpC2Rb/S/kVxV/uMKnGXq4CmVeQrLRgrLvQRF40hxREvGysuHyOuYKtqjKTel2ny
+        Y3aPl+71JwLvHCM7OdHkzBRzgO6dZnl2utU5FvTFGTaXZtpeCrK7Emx/NZjMyUgdN+Y4srjJCTWUhpt1
+        ozsynM0uD5vdHGvWJRSgSdm2Aa6bDT6CcoerotpcrPc4W+1yJrgbHS12OFrUOZjXstBr7M0qjaSLhMNM
+        p+hpJ7sYVPqaq0sbuBv8rQrGmKd4msQ4G4XbGQZb6k001RltJHPSZ6x0GGOpWE8ikoqEYqFQKBCgcAP/
+        xSfxJXwDvg3fjB/BD+LH8UvwqwrHmDeyoMs99cu89FQQo2r9TQp8Jfk+4vzRpAp8nhIvQfmIS33EZT7i
+        CtQYceUYSa2vpNGP2eUn3eslPTbR9NRk8zNTFazPBRLrgKIp6Muz7K/MskfYAOu3ZjvQ87SQ8y2ARmdD
+        nHCzbkGvA2t3ND0FaFJEvDZ7Xa1JsbfbXG3aQdnNthPF4XaxbmVxN7ECB/F6WrYm+friWdpD5EFGwgx3
+        I0g7y9NkrZPRQhuDiaZyF33GiBGbmJg4OTn5+fkFBgYuWLAgMjJy3bp1SUlJWVlZeXl527dvr6ioqK6u
+        rmNXbW1tVVVVWVlZYWFhdnZ2SkpKXFxcVFTUokWLZs6cOX78eBcXF1NT01GM2NVA6iEeNsdcstZFP3u0
+        ER905XjD/LFiDjRXwE1qtKh4tKhktHj7aIK7XIm7erSk2Ut+IMD0yESzE5PNT0+x6KGiBmj2jBIHGgn6
+        ajBhjcjBnRbXQHJwtqhClnCzakajc7dpZVnvcVPw3UMpu7DlSlijONZdbFHi+1ysdysFDuJw8AbC3bLR
+        3CiDEUwd9EeBePhQzZEj3N3dp06dunjx4vXr1+fk5FRWVoJdTU0NIALlDnY1sKuxsbFJuZr7Wy3sUvyH
+        t0pKSqKjo0dqj/Se7G3vZT9Se4SFXNvPWLLARp7gZrBtjE6/oEl5iwu8RWBd6C0q9u6L21Nc56nTOs64
+        3d/k4ASzo5PNTxLWVmcDrc/PsAFrgL40y56wZkFD11fZByKQOkgzxNCBfOZsUYGM7GrVCGm7Wu9ytd7N
+        IibFClYBegDW+9mixKnAdztY7rS1aLYybzI3a7Kw2Glt3WpqmiOTBY8caTBt2rTNmzeXlpaWl5cDMdQK
+        xPX19RxZkAK+nTt37mJXa2vrbnbtUa69AyzFl/fswTfHxsY6jXZKrU1FpVSnrExbOXvF7LGBYy2dLcWi
+        1+303phmNmy1g2aeGuh8LxGqgC3gLlLiLnUX13nptfiN2uVnsme8SWeA2aFJ5senWJ4mrG3OzySn7gjo
+        YAKasGZBU9YoChqFMa/MyaLKyXKHs1UzGp2rdSt4sUVZP8WtZA0boaz3u9sdQLnZHnCy2W9n1WFl0WZl
+        1WZj02Fn1+no2OXsvN/JiZSz8wFr6+36+gu0tEwnTZoUHx8PIUPFVL/gC7jAClKgtm/fvra2tnZ2dXR0
+        dLKrS7n2qy3FF7q66HfOmjUrcHFgVnNWVlNWZmNmRkNGxo6M9Pr0LXVbZLGyodOGvu78+v/o/Y+e+DUf
+        w8HhtiMyPYUsaEKZlCcpylqhbhdx3WiDJt9RmDZ3jjNuHW+6L8D0wCTzo1MsT06z7p1hew6siajREgno
+        K0rQtDQcTAsczAodTIvsUWYlDuaVThb1zpaNcAD4wECslbgJa1fbTkfrTnvr/dZWB2xsjjg4HHd2PuHm
+        dtLV9TjKxeWoi8thlLMz+YhydT1ib7/DyGilWOzs4+OzatUquAcQU82CL8V64MCBgwcPdrPr0KFDhw8f
+        PsKuo+w6prbo5+n34JsdHBxicmLy9uZt27Mtd3dubmvu1l1bs3dmR9VGCdOFWrFaWlFaWiu0hgcNH+w9
+        +DWT1xjh/3gbDA63HpHt8RT0U9woR1Gdj9GOsaMafI2b/cDaBKz3+Jt1TrQ4NMXqxDTrHsKanC6GexBd
+        s6fmcRtB8GTAKA170wI7kwJ700I7RRWzibgG9joA66e4naz32VnutbLYZw3Q9t0s3zNubr3u7mfZ6nVz
+        63FzO+3mdsrNDV8iRenjhrv7CReXAxYWKTo6U0aOZObOnUsvdgZtgizFCnwnTpw4efLkqVOnTp8+febM
+        mZ6enl7lOstbik/19uIb8G3on9ZO1iX7S1DFXcVFnUWowo7CgraCaVXTBOkCQZxAe4229mq2orQJ8eDh
+        gz0Gv2bwmr7gtQDDodH2mnzW+e5QtLR2jFHdGMrapNnPpGW8aau/2Z4A87YJlgenWB2bRk4XnwXrIPtL
+        wfYIJKcnmXaP1T3mP+rMZAsNO5N8lK1JAcoO0AnrIjvTUsRh5Ae0NeBGqODjdrbeY2+5x9pij7nZbviD
+        o+NBF5cjLi7HWIigeRqI3d3PeXhcYOs8W4Q7ysPjjLJ62Or19Dzn4FBrbLyKYdypwOmbVIEXwAHi+fPn
+        L168eIldV65cuXr16rVr195SW/gkFr6K70Fumb5wevWJ6urj1VXHqiqPVlYcrag4UlF2qMy50lmUKRIm
+        CIXrhYJ1AkGsQBAj0I5mcS/V0lyg+ab/m2/YvDFo2P+zl74x1/zNTHchQOe5iLa76VT7GNX4jKobO6re
+        17jRz6R5nOlOf7PWAPO9Eyz2TbTsmmJ1ZJoNnOTIRJPucYbdfvonJpj0TEX4c0ABdJ4tKbAmpWRNpG1v
+        hnmvli9tJ6vdtpa7Lc13w4Lhv05OUPEhFPUE1iWAG2olrMHX0/Oip+dlL68r7EfUJRQ+6eXVp7y9L48e
+        fcXL65yd3fZRo5ZKJE4IauhmsG9QA77r16+//fbbN2/efOedd26x6za77vAW/cy77Jo8eXJ8QXzT+abG
+        c42NZxsbzjbU99TXnakrP1luWG0ozhGLkkSijSJRgkgYT4gL1wkF0QLtZdpaYVpa87S0QrVGBo0c6jH0
+        NaPX9IWvTRk1LN5aq8xDr2q0Uc2YUbVjCOh6XxPCerzZLn/z1gkWcJKmMYY7vHSbPOVtvkaHJlicnmbb
+        G2h/bob9+Rn2BLS+eLqtyTa21HE/lba9RZONebO5WYuNTZuDA/obENMioClrmC9bxBlgF2Dt6XkeZL29
+        r3p7v+XtfX30aK7e8vG55uODj09rzJjrY8a8PXbsO6NHX3J0rDI2DpPJ3Dw9PSMiIpCajx8//t57791l
+        17179+6z68GDBx+oLRi6jbMN+O55a8/ua7tbr7W2Xm3ddWVXy6WWtUfXSuukkq0S8RaxOEUsThaLE8Wi
+        zazAY4WC5QLBMoF2mLb2Am2t+Qrib45/8w3TN4Sv//d0I2Gykx6mTbCuG0tAQ9o1ow2qvPTK3WSVbrI6
+        L/3msca7/a3aJ1p3T7Y5NtX21HS7nkD7syxrjWH/85qOwM/KaEt/uIm0rU2KLUzKTIyrrKxaHBzanJxI
+        inB2PsgWAe3iwikadcTN7aib2zHWhU/BHOAMlPXo0W/7+NwcM+bWmDHv0ho7ltYttnDjtq/vHT8/1Ht+
+        fnd9fC6gXFx2WFltNDAIkkis/P39YSzIhbDvDz/88OHDhx+z69GjR5988gn9iJWZmRkSGdJ5u7Pjdkf7
+        u+2kbrXvu7lv3419k7snM7WMJF8iyZJIMiWSDIlki0SSJhEniUVxIuEqoXC5ULBEIFgsECxiiS/U1p6v
+        rTlGE1OVl5eXrtbwyfqCBFtmu5u82JkpdJRsd5VVeurX+Rg3jbNsGWe509+q1d9qT4DVvgDr/ZNsj0yx
+        PTnN7kygPaStkeJqMF5HkxnpbKYXq2StwG1lnG82Kt/IMN/MrMzGptbOrtnBodXREaxhGoS1i0s3S5nK
+        mVP0UXf3Y2wdd3c/6el52sur19v7AswBsoVgKVBf3/dBEzVu3D227rP1gK0Pxo37cOzYG2PH3vTzu+Xn
+        d3vcuPd8fa+5u++0t081M5uvq+umrS1EgIMXY3RE/4SxfM6uL774AiNiRn1G973u7vvd+Hjw7kHU/vf2
+        d93pst1vK62RMkUMk8cwuQyzlSHEsyTiNLFog0i0RiSKEokiRcAtXCYULhFqL9IeOX/kEKshBgYGGDhf
+        f/31YcOGCwa9PkFHM8lBp3q0ce0Y03pfs3pf80Y/C8J6vNUuBWvrvRNsOifaHp5iewKsp9tp5HmZ5HiO
+        mmkoFAwdNUq2mIK2Nt5mZpRrZJhralpsZVVua1vNVo2dXYODQ4uj414npw5n5y4XF7A+5OqKIpTd3Kic
+        FaA9PI6jPD0p6x5v73PwhDFjroKgr++7fn7vs2Q/HD/+o/HjH44f/8jf/1FAAOqTgIDHKEp//PgPAgI+
+        mDDhg0mTPpoy5aPAwIdBQQ+Dgz+eNq3H37/J23uLo+MSc3N/XV0LOzu7gICAiRMnWmPKurGn672u/Xf3
+        H7x3kOBGPejOuJ4h65IBtLREKi2UMvmMJE8izhULs4SCFIHmOs2Rq0YOXz58WPiwIWFD3pj3xushr/9x
+        9h9fn/3G/4j+aGnpNG7czFmzli1ZEh8aGuXpGWAk0JpjKsvzgIeY7fAz3+Fn0TjOonm8FVjvBO4A6z0T
+        COv2iTbdk21hIxpFo03zvAnrxeaM5iCBnmi6mdHWUYZbTU0LLC2329hAy+U2NpUoJe46e/tmR8dWJ6c2
+        lvUBV9duN7fDbAExLQVlCtrLC3XKy+uMt3evj8/5MWMujx37lq/vO7AI0Bw//kMW8eMJEz6bMOGLiRO/
+        mDTpi8mT8fHjyZMfTZ36ybRpnwQGPp458/GsWZ/OmfPp3Lmfzp//aVjYZ0uXfhYZ+fnq1Z/Hxn4eF/d4
+        zZprkZEH7e2D5kaHtd/uarvdue9W+9532nbf2NP6duuu67vGdI15o+KN17Nefz3t9deTSb2R9MagpEGD
+        Ng0avG7I4KjBgyOHDl325rBlw99cPnJEhObICG2t5cKRMwXDho2IiEhYtmxTRMTmyMjkqKjU1avTw8LW
+        entPsJOKIqz1a30J6IZxYG0J1s3+Vjv9rcF6N4u7bYLNgUm2GmVjTYt9COutnsazTZk//Nd/aWqOHjUq
+        ydq6FKUETVjb2lbZ2VXb2UHXtfb29Y6OLU5Oe1xcOlxdD7i5dbu7H3Z3P+LhcdTDA5SPeXoC8QlaLOiT
+        3t6nvL1Pe3v3jB59dsyYC8Dt6/uWn987sAV///v+/g9Z1gTx1KlfBgZ+OWPGpzNnfhocDLifhYR8Nm/e
+        5wsXfrFo0RdLl34REfHFihVfRkd/uW7dlwkJXyYmfrVly9fZ2V9nZn4oYnSL91ceeXj6yEenjjw8dfTj
+        U0cfnTrGlvVxO6ZFLqmQS0rlkhJS4iKZuFAmypWKUqXCjYwwTiJcKxHESARrJILVYpT2KvFIH21XVz/A
+        XbkybdWqtDVrstauzV63buuGDQWbNhUvXrze3X28r4F0k/OohnGWKMLa3xrFsW7xs2oaba1R4WsG1uke
+        xtPN5HpCLRjchAkTBAI7Q8OV1tZltADa1halYG1vX2NvX+vgANaNzs6tLi5tbm5d7u4HwRqgPT0p5eNe
+        XkDMp0xq9OjTbPX4+JxVqvuan9/NcePujB9/PyDg4YQJn06a9CVYz5jx+ezZn4eEfDl//pdhYV8tXvxV
+        RMRXUVHfREd/Exv7TVzcN5s2/Skl5U8ZGX/euvXPhYV/KSv7duXKxolzAo89OnPskzPHH5858bjn5Kc9
+        J/HxcU/SrTTpIR2mQQkatZ1lXSgT58pEKVLRZkYYzwjXM8J1jDCW4YgPt9QKDFy8Zk1GTExWbOzW9evz
+        4uMLN20qSU4uT0urycioz85unD8/Wl8oDLHQK/Exaxxv2QQD8bfe4WtV621V42lV7WFZ62GhUe1nvtrR
+        0E1PguwZFxeXlpaWnJw8b9684cOlOjozLS23saJWsLazq7Szq7K3J6xZ0KgdTk7Nrq573Nw63N0PeHgc
+        8vQ84uV1zMuLgPb2BmJafUD7+Jxhi+AeM+bc2LEXx4694uf39rhx744ff9ff/8MJEz6BgUyf/uWsWV+F
+        hn4dFvZ1ePg3K1b8KTr6T+vW/Sk+/k+JiX/esuXPOTl/KSj4trT026qqvzY2/s3PLzy5MuPkp70nP+s9
+        9fnZ02ydwu3PeidemCpt12HqdZgqHaacrTI5iog6h4KWijYoK05BXLBYMlyoBTmvW7ctLi4/IQEqLklM
+        rEhLq87M3JGT07xtW2t+/t6iorbU1Mrp0xe660qjbUdVeVlWuJMqd7eocDOvckeZacy21NUTC1esWJGb
+        m7t161Zko4yMjC1btqCh+/r6isUexsZrbW3LWEUDdAVY29tXOThUY5xzdKxzcgLoBmfnRheXXW5u+9zd
+        Oz08Dnp5HfbyOurtfdzbm7IGX1pUzk9LSRzeDeLnx4695Ot7lRL3978bEPARBD55MtT9VUgIwR0R8c2q
+        VYQ15JyaSkAXFX1bXv7Xurq/pqaedBnjvf/9I4TyZwrKtNo/6TI5ZSFt1WFqWdAVbBHWOpIiuThTJk6R
+        ihOlogS24tliiWtPFHt4+G/YkA8Vb9xYvHlzWWpqVXp6XXZ2U15ea2FhGyJPWdnBlJQDS5d2Tp3aaWWV
+        POIN7ck68kwHkzJXs3I3RVUCdFBQUFZWVlFREYaC/Pz8vLw8EMfKzs7G5+fPn6+pqaenN9vaOs/ODqDL
+        7e0ButLBocrRscbRsdbJibBmQaOaXF13ubu3eXh0eXp2e3kd8fY+Nnr0idGjT7I1IG5UX40T4kqN34LG
+        AwKg8cewlMBAIvBFi75ZvvybNWuItIF769a/FBd/O2VK/Mq02BOPe0/0VTQq8sYq6SFdpkmHqdZhKtli
+        WRMDyZeLtwC0TJwoE2+k9ZS4pp1w9uxIVsWlyckQck1mZn1OTkt29p74+PYlS7oCAw/4+cEzD8A/nZx2
+        4fgGKIaZaactWm1mUOZqWu5mWuZGPmqUsQtTAAIpVgm7itkF+lhJSUnITAzjYWoaY29f4eAAyqQcHavB
+        2tm51tm5ztkZrBvYF9CBdbObG8Xd6eXVzb6iQB23Kmh+KYn3wlWUMoeP3+DJ/DGVOaAvXkwsZdGiy6Ms
+        7Wp7Wo9+3HvsUe+xT3qPc8Q/O+vS6yFt02F2qIFGS8yVi9NZ0Jtl4k282igTLmVGigToe/HxpdHRFUuX
+        Vs2ZUz1lSr2fX4uHx26kAGfnvc7OuIEAhlzQAMpwVPagL9XXjxQP0QrWl4MyLY0KdtGHOaqrq+nHmpoa
+        7iMWPrl69WptbR19/Rk2NpmYj1FOTtVsEdYuLnUuLvUuLg3QtZJ1i7v7Lg+PfZ6enZ6exExY4seVrFXh
+        9ls8mT+FrlT6O+PHk7gSEPAx7MXMLDVk1fIDD3oPPujt/qC3+8PeQx/1Hn7Ye+Rhb9LNLNFBPcEOHUGF
+        XFgmF5aSEuFjiUyYLxNskQlSZILNMkGCVDuelNYGqWacdOR66dAxIgODSe7uBc7ORXZ2SLq0iIXCPMEU
+        LYrappOTovAZOCq+ikPf1DRJIPAbyzBpdqMIaAqUPozU0NBAHzfiP8CBhdtY5eXlCxYsYBh7E5Mljo7l
+        Tk5Vzs6gzBXB7epaz76Kn7w2lL7My81tp7v7Hk/Pdi+vA97eh/rifl7itPjclQ6DLnrZw+OAVM+0sLOu
+        697prntn9pPqUdT9Ho9jE99skr9ZKnuzQPZmnuzNfNnwPFJv5siGpcmGJkiHxkmHxkiHrpEOiWZ4JXlN
+        X0tHJ9zcPNXcPI2tDEvLLGvrbba2Rba2pax5AjT4tjg773R23sV+RDVB2g4OmDYQ0rZLpbNttYQx5gYa
+        QLxjx47Gxsbm5mb66EZbW1tHR0cX+ygGPfuOj1j4b2dnJxrmtGnTdHXHWlrGOjtXs1Xj4gLKtIi0WdYK
+        J1HipgJvg8C9vA56e/8UgasXRW9ktHrmsrCuuye77p5S1D1F5d2oEnUYDatihhYyQ7cxQ3OZoVtJDcmR
+        DEmXDN4kHhwnHrxWPHg1LRFXbwQK/vCHEcbGG0xM4k1NN5qZJVpYpFlaZlpZ5draltjZlTk41Dg5NYEv
+        rMPVda+r6z5kAfYG8u5OfIlVN8aOcn39ZTpDtTQ4xHv37m1vbwfNQ4cOHT169AS7zpw5c/r06Z6eHnrq
+        HZ85fvw4vpqYmCgS6RgaTrWxSaK4XVyAeyDi5IWLPOK7WeJdrIOThvnvEMd+MromeW1VLGjV8jseOLRZ
+        MnS7eGieeOg28dBc8dCtpIZkiYakiAbHCQfHCgevEQ5erVp/dNASCscbG69Xgk42N99iZZVtY5MPC2Z9
+        Y4eLSwuba9sxRrCTRCebcTvc3PYig7HSxrRRgSNg1KjVGvAEqmJo9vDhw8eOHQPQs2fPXrhw4dKlS5cv
+        X77GnmXHxytXruC/58+f7+3txR0Aya9du1YiMRk1KtjOLl2pbg66Cm7qJxxuSpxYCo/4T9G4gcHK4MjF
+        fLhcVd7aKe00GVojGVrEglZSHpojHpIuGrKJBb1WFTFq0CLBHwQjdHXDjY3jTEwSTE03m5mlWFhAzvCN
+        YogUudbZucXFZTcou7sDMQaIg2wdYEFD3dA1LBtWXmJjk2ttnaGxb98+GEJ3dzd0CtkCMfgC640bN27d
+        uvXuu+/euXPnPXbhBj6Dz4M7oFPicHBkcIaxMDaeY2eX4ewM46b1o4i38lyF83EElR/wcchKz9Sq+EC9
+        CmJaU06GDNvJDC0TD81Xk3OqaPAGVs4xqpRRr4/VHjHC1dh4HawDcjY1TYScWYPOg+2i16EH8uaGA8iy
+        +MhWp7s7DASujVGuwtER3wxDz7OxydGAMOEV8AT4w8WLF69evQqU4Pv+++8/ePCAnvbF+uijj3D7gw8+
+        uH//PiX+9ttvQ+AQPn4QXXTZsmUMYzlq1Bxb2y083D9MnO8q6JweHnt5MlexclXourqLF65bqcKXVs27
+        rfIus6G1kqHF/cl584ByRv2PwUipNFjpG5uUvpFjY1PAujNGB2x2KyIsTbEs37301ccuLki60Du8BSEY
+        JoPEAtDZGrCLkydPUiGDHRDfvXsXiAH3k08++eyzz+h5XroeP3788ccfgzhwQ+McbqgbZlJfX8/iNjUy
+        QgpM7IubloqVD9Q51aGrKJ1wx1Fs7eZe27NbBTEtIuddA8g5TTQ4Xjh4Xf9yfmOKYOhQaypnExPIGb6R
+        amGRwbZBUCN5A3MDpjN2QINNNyt3ATLH5+uxm4hkjo64S0rs7QsB2s4uVwOODEywgps3b0KqIEgRA+tX
+        X331zTff/OlPf/ozu3Dj66+//vLLL0Ef3wCNU3W/8847MBPcT7i38NvQXaOiosRifUPDiZaWa9VYczWQ
+        zNWhE+6svSCVP+UukUxfnbVRhS+tsneaiDv3K+cM0ZBEpZyjVSmjXrPSFIkmsXKOMzWFogE6CZHDyirT
+        xmarrS2aYREIgiPMgc21ZOOVO4L/wlgqnJzw1VKUknW+Bo59ODJgQaFwhkePHoEjEAPrX/7yl7/+9a9/
+        U64nT57gv5Q4cH/66af4ZvzIvXv3cBzgfoLtwHxg3PB6ZJi4uLhx48bp6nqZmS1xcMjtS1mlVKCrKl2d
+        +6hR0WOmT26/fbTz7gmuuhSFsDF92E7JkNIfL+dZ2n8YMhyBDDkBf2LUqBhj41gTk/VmZvEWFpssLdNs
+        bLKgUBgCyxpdsdLJqZK3I7hNimWNrxLcDg7bHRyKNSBGOADsAoZAhQzZgiaY/v3vf6cvr8XCDbo43Pi2
+        L774gpoJrAaeTp0EBwc1bjgSGmxmZuasWbNg30ZGgVZWcbxtGqj6sRcVvWM/RTL9tB3bOu8eV6+st4pE
+        7QZDq0VDioVDtgmHbFXU4Gzh4HTh4EThoDjBoFjBoGjBoNW0tAetUtQfHUdoaXkYGCwxMFhmaLjcyGgl
+        cJuYrDUz22BuvtnSMgX5wdY2x94erAtZ1qUQL7CyfLld4FgrpA3W5ELdcAD4AJDRS/pAyNAvmIIvfXE+
+        1nfswn8pdHzDt99+i2+G9nHfcE6CwwIHx/Xr1znjprgxxMNPBAKhjo67icl8W9tU3mY9u1R6KUEvkwWF
+        rl7SefdYv+V22Hdoo3BIqWBIvmBIrmDIVsGQHFKDswSDUwSDNmgPWqc9aM1TuFy9Ear1h5HD8Mv19ReD
+        taEhWK8YNSrKxGSNmdl6c/ONFhZJ1tZb0Nns7LaxoLezoCllPmgU/cxTaWuADiQJH6B2AbVCsxQxyNJL
+        IPyf8lqV+C/HGnqn0oaPc05C+yRn3Cq4ESKzsrLmzp2LYUdPz8fUdLFaRPnhMjGJcfTxrjvb2vn+MfVa
+        c2HjiH3M0CrhkELBkG18ytqDt2gP3qw9aL3WoLVag1ZrDVqlWq+5DB850klPb6G+fhhlbWQUwYKOMTUl
+        oKFoGxsoeqvSPQBaXc78UrC2sUnVAGWYMt8u1Clzi7LmS7tfJ6HGrYKbjpfHjh1DmsQgmpycHBwcDOK6
+        ut7QuI3NZrWt7KewhyMF0oTSLSp8uTI74DB0h2BIiWBIXl85Z2gPTtYeFKc1KFZr0BpVxKg35mn+QXso
+        w0zT01ugpwfQ4VC0kVGksfEqU1NYBzw60cqKejTkXADbZeVc/gzQ2CnsGroUdlODM2UVu2AV3IcyXfTz
+        fNy4bzgnwa/iUiAfN8yEejdaJZIJ5njEyoMHD2IuBfHQ0FC4ikzmCB+3sFhlb5+jssVc4bieHbVIBS5X
+        M0/PH7ZbOLSCNQ2+nDNZOW96ppxdh48Y4airC8oL9PUXsdYBOa+Eb5iarmPlnGxtnQ6DZuVMfYOT81PQ
+        2HjsAnYEu4OdCgwMjImJKSwsJO+VxTflfoWsvlRYU9yQNn7VM3DTVolkQoMgpiT4CQSO6b+joyM3N3f5
+        8uUBAQFisR6sfNSoWZaWq+3ts7l9gLjcxvkOZBrbrpcyHUZD6wRDivvKOVswOF17cJKScr9yDlWR82JW
+        zstZOcegE1pYbGblnIlEbGfHyVkBGhuJTcUGY7Ox8WPHjl2wYMHmzZu5c861tbUaUCIOf1AeyC4GWkTY
+        ak7yDNy0VdIhHoESuZvzEypwODg9QYgknpaWFh4ejnQoEjEymQMiuYHBTKmeQWpdjgpfrlwOjxnaLBhS
+        ptYDIedU7UEJWoPWaQ2KUUVM6zUnuLMzT87wDch5hbFxNCvnBFbOW2xtFW3Q1jbTwmKticlCQ8MJ2Dxs
+        pI+PD45LJNqioiL+mWcMcfTkqOIdOn8sZW71i5satwpurlUiCNLcTc+ZUIHThgkH5xNva2traWnJzs5e
+        uXKlsbHxssRlbbfb2u50tN/pan/vQMd73R3vHep4/0jn+0cX9EYM2ysaWikYUsSaBkBzPRBy5npgtCpi
+        1OvBI/8wYqhMNoOTs4HBUipn2gZNTVeNGhU+alSInt5kudxLIrEQChlXV9epU6cuWbIkKSmpvLxchSyF
+        y3/1Anlz359MmVvPgxutEsmEBkHkbs5POIFzDs4nDlcBcUz2syNnH/vkGOrIx0cOfXTo4IOD++/v77zb
+        2f5ee961fFm7zqCaoYOKhg7KfXNQzvDBOSMGZ49EDUofOShZc9AGzUGxmoNiNPsixn9J/Y/N0BEj7KTS
+        iQwznmHGSCToXS5CoZ1AYKGtbaCpKdHT07OxsYFmZ86cGRERAU+AbKktAC5HlnvYhIPLvXoBiiHvCw46
+        lJQC209d9Jc8Gzed4Pl+QgVOHRyzJSXOaRyukpKS4jvNt+Viy4lPT5x4TOr44+NP65PjY3rGCNoEmrWa
+        I7aPGF44/M28N4fmDh26dejgzMGDUge9kfDG67Gv/3HNH/8Y9cc/ruhbK//42qTX/t8b/08ikejq6uKg
+        sbKycnR09PLyQqtAKIJ9rVu3Lj09HUdVfn5+cXExfd0N9EsfkKJn8zmyu3bt4l63ALjt7e1QCY5OtH0N
+        KmQsBa1/e9HfpoKbSyY0d9Mxh/rJw4cPOQdXJw7V2LrYFrYXnvz0JIqw5oqFvvjaYvFhsWinSFgjFFYI
+        hWVCYalQuF0oKBYICgSCbIF2irZ2orb2Rm3teFJa8VpPK05ruN1wPz+/xYsXg+nSpUvRjWFT0dHR4JuQ
+        kIBElJGRgS5dUFBQVlZWWVkJxBAvlS3VLJ8sFn1dCIWLPo/jEkcn2r4G5aKA9PMt+mv5uLEobggcuFUE
+        DuKcpXDEsZV6hnrJFcmnPj916jNSJz87SYqFjtp6Z6vxcWPxHrGoXiSqEonKRU9BFwkEuQLtNG0CerOC
+        skqNnDoSngCfhTUB8YoVK1atWoU0tn79+o0bN4JyZmYmKMMoIGTc5RQx+AIuyGJRzdKH/ShZLO5FIbBB
+        HJc4OtH2CWgFm19gqeDmBE79hAocxCFwODhnKZQ4vBsIojOjT39xmtTnpwluWiz0A58ccOlxkXRKxE1i
+        cbVYXCkGaFGZSFQqEpYIhflC8jTRVIEgSSDYJBAkqJZ2pPZwk+Gw3cjISKgYiNesWRMbGxsfH5+YmIjY
+        w72iFEKGEUPC0C+FC7JoHmghVLMIqZQsfcAPUYrCxUGJYQ0dCGOEhgLJL7k43HyBc37COTi1FI74hg0b
+        lsQtOfPlGVJfkFIQZ6GjplycIj0kZXYxkjqJpEoirhCLy8XiMrFou0hUJBJtFQnThMJkoXCzULhRKNgo
+        UJQStOYYTfqSGRgF1tq1a/EXN23ahJYAU+aEDC+Giili8IVsqRugeaCFUM1yZOlrbRClEKhggPS1ILdv
+        38Yx+muA5hZHXEXg6sShppDIkIP3Dire++DLHgVxJfSIGxE6J3Ske6RMA8NUM0wVI6mQSMolkjKJuEQs
+        zhOLMkSiNJEoSSTcJCS1sU9pz9MewYyAXUDCsGPkXzgygtqWLVtycnLQ9yBkeAXaHfobfcya8oVmKVb0
+        D4oVmkVHAVnIlpKF71G4sEH0HnQgHKO/Kmi6ONx8gfOJYycDwwL3vb2v96teVM9X5E0mSCmhp72fZnrK
+        VNYukzZJpXVSCpqpIAXQkkKJJEciTheLUxUvURFt6lPCdUItB61Zs2bBJcAXKgbi1NRU3Lvbtm1DtKio
+        qIBXwIvR3IAYngvxgi91A4qVEyxGMJBFVAXZu3fvgix8j8KFDSLO4ujEMfobgOYWRxy4OeLYw0lzJiHM
+        PX3bFBY3B732Ya3DWQd5l1y2UyarZ5/BXyWVVpJiyhimhGG2MeTFKWkSSbIEoElt7lPak7R9fX0BF+0O
+        fKFiIKZegWiBaAw7RvgFYpgvJHzu3DnwBVy0Dc4KkEopVqpZzGKULLo6yFK4SFbo9uj5OEZ/S9Dc4ojD
+        DQOCAnac2XH267Oop6yVdfiLw6MvjNY5rCNvlcsaZbJamaxGJqsiJa2QSkul0gIpk8Uw6YwkVSJJ7KdE
+        i0Ra+lpwDBgxQgWMgqY3HEYIyPAK2DEiGowCKgZiGC7EC77QLOBSrGCKVEqxUs1iFuPIotMALjwQC90e
+        PR+u+EKApgs68p/hX3eqjlJWKQp68pXJusd0dfbqyJvk8nq5vFYur5HLq+WEdZlMWiRlchgmk2G2MEwK
+        wySplmSDROAiCAsLA18sGEVhYWFJSQm8ggoZHQ9ChhfDKKiK4Qzgy7cCjikWWjfFyieLTkPhwgaRr+CH
+        cMUXBTRGLGi57nQd93ZWiuKxnnN9ju5JXZ12HXlLH8rkXfEqZLISmWybTJollaaTt/WQJvcpJpmAFk0S
+        TZkyBaENiyKGV0DICMjUkREqIGT0OhgxjAIWAcOFeKkVcFhhBRzWgchi0d7Ddv1/vhCgsauTQyYTx1Ch
+        zKvFNxcbnDbQ7dAlb4y3Q/l+3uwbAZH3pt8ul+XLZNnsm6ekqVKmJVkoEegKEJDhxRQxFTJNb5g7YBdw
+        ZMQJCBlGjMwAFUO/1BAAF0wBlDLlY+2XLBYaD9vyyez924PGbs9YNKPlUosKWX6tvLVy1JlRul0s5Ubl
+        m3lzlMvk5I2ABng7XlrSNVKhvXD16tVAXFpaCsRIb2i8oIwxj6OMxIaUBsoQMvwXlKFfqlmKlQLFokzp
+        4rByZLFo48Giu/lbgsYOoCOFrgxtu9mmQpZfMbdjyHt479clbyCmTrmcfWP6HJnira1SVRHTEvmK5s2b
+        B8T0lAWEDLtoYd9oE2MIAhzmDlBG30PTo08IgFFAxdAvRcwBpWsgrFiK3eu7fjPQaC+YFJYlLDv04JAK
+        WX6tu7NOlTJMg1Kukssr5ORd6bcS0+j3jelpSWZIBAIBcgV9yn1NTQ3SBVrfHvZdNkEZAx4cA5Q5LYMy
+        LBj+AFugiClWBUvlUuzMc6zfBjQaupGpUWxOrApWlQJl8x5z3QPPpLyNpQzTGIAys4gRGgkRlrkzyJQy
+        HAMx7hD79m2cL4My1TIoQ8iwCCCmfBWb/lPXbwAau+fk5ZRem66CVaUUjgHKu3V0mpSU6ZsNUsol7Fvw
+        PtuaV0lFdqK1a9fS147Qk5yUMgbr7u7uEydOICwjYyDGISMjwKH1US1TI4aQ/33KWL8qaKgDvWhC8ISy
+        g2UqWFUK3e+pY/SlTN5sEJS3y+V5P9QAE6Rib/HixYs5yrT77WLfIe/AgQM0L1++fBnDNMIyzRjofmh9
+        nCn/LHLG+vVAo8msX79+YczCfdf3qWBVqfCb4SRjqPgyR5kNc+TNdyll9fd2VJYkgLwrPaUM06irq0Na
+        R16m5+GoNXMNED0DYRkxDi365zUNun4l0Bi3bJxsEgoTMN2pYFWpkOshhqcNSZL79ygzMxiBRIDZmm/N
+        iBlogAhzsGYMJufPn7/W3xsK/rymQdcvDhpbj2EX88j2/dtVmKrUkS+PkLf5P6WnmEqeTbnf9ylVFhPK
+        CA0UDRCLhjm+NR8/fhzj3xX2PXbv3r2L2Q+D3y9kGnT9sqBxeCJdrExe2XWnSwWrStU/qve55KN3XE+3
+        vS9lNmP0T3mAyMyEMyIzUXx8PL8BqlgzUjOSDx2ykZphGpitfyHToEtje1HiL1HpqdHTpoz1muCRVpdy
+        9OPDz65NN+ItjpkJ27UEDVra1ZraZZrapZraJZraxaS0Ckdq5Y3U2jpSa8tIzaQRmptHaG4coblhhGZc
+        PzViwZvDjAf7+DiHzJ4UOmfS3NAp8+dODVswfdHCGUvDgyIj5kStmBezeuG6teEJG5YlblyRlrw6c8ua
+        7MzYbTlx+dviC/MSivI3FhdsKincrLJH/2b9IopubW01tzFflbrqB4WMQsCw6LHQPairu0dXp1ntPAZN
+        cs+nZRLmnETLly/ntMw1QEyA1JqRmmHNSM3UmmmeoxMgnU24wUSxMz/T6qPo0uIkWmUlycpKKd+OSkVV
+        lKLSKsrSKsu2oKrK0xVVkVFNKrOmMjM+LsLX121SyIRtu7cee3REtT7pU10POyac9ZccFglbBcJ6bWG1
+        trBcW1imLSzVFm4nJSjWEhRoCXK1BBla2ila2kla2pu1tBO0tOO1BLQSnpZ2pOYI++Hj/EZHrVy8Kip8
+        9aqlMdERsWsjN8RFbUxYk5y4Lj0tPic7qSA/vbQkp7oyv2HH9p3NFXt313a0NR7o2nmoe/eRw3uPH207
+        cbzz1InOM6f2nzl1oOf0wZ4zB3vPdPf2HDrbe/gc6uyR82ePXjh37ML5YxfPH7944cSliycvXzx1+dKp
+        K5dPX7185uqVnmtXet662vvWtbPXr527/ta5t6+ff/v6hZ9N0Qj8qampPpN8UqpSznxxRkW26lX0QZHX
+        Ra9+TFlFy5j9uKlk4O4nXScVe4kXLFjAhTluAkTM4Bpgb28vl5r7teafN2nw18+g6KyM9cFBE8xsTZYn
+        Ltt5pVlVxfxSannRlYVGRw2EbdrCJm1BjbagUilkTstFWoJ8LcFWLe10Te0UTYWW458WX9HaqzRHuAz3
+        9naLWrEoagXkvCR69bK1ayLi1q2M3xCduGltWmpcZsbmvG0pxYWZFWW5dTVFTQ2lu3dV79tT19XRdHD/
+        zsOcnI91nDzRefpk14ul6AcPHhQVFVnaWy7fvLz5QrOKZvut5k+aJ16ZqHdajyRlzNZqpkwCBrRcxp6T
+        o2eLBp79UNL1UvFocUhISEVFBadlGubQKlRiBp1N+Cc0uNNGv5A1c+snKjotOXrWzABDU/15q0PLDm1X
+        Ve4AFXktwuy4iahDIGzWFtRqCSq1BGXaglJtAatiUiXagkItQZ6WIEtLO5XVcqKm9iZNvpZpUUVrRxEt
+        e3k6r4gMW7liMdyZWPOaZetiYc2rNiXEpCSvz0jfmJuTVJifXrY9uwrWXF/SQqy5pn3fjv2dzd0HdkHO
+        Rw/vPXYMcm6HO5862fVCKPrcuXNJSUn2rvYrklY09jaqCHagQkyGkPVP62OwVqSLhgFMGQGDnsVHDXzm
+        EyWNIb4cGhpKtYzFaZlGZvpMAXoKlB8zfunZpN/1vIrOz01YtmS2l6ej02iHFSnL63trjz06rCxV5arU
+        /MtziSO3s46sELKWoFRLsF1LAAmjqCkjYGzVEqQjYMCUNbU3a2pvhJZpqSpae5nmCLs3fXzcVywPo3Je
+        HbVkTfTStTHLYc2bEDOSYrekxudkJeZtS91enFlZvq2+trCpoax1J7HmzvaGg/tbug/sPHKIyBnufPxY
+        28njHb+lopE6MzMz9Q31Zyyakbkj8+hHR1XU+ozacm8LiRYn+zpyXyH3MeVcXsAYICyjmOUM8nJ4eDg/
+        Y/DHv66uLvrQFDb+6tWrdM7+iH2JHz9m/ArWzK0BFb0pYTmGKycHS0cv+yXxi0oOFh19dJhfz1Z04Xv5
+        vj1jmENi4R5tYSOihZaggidkomVS2lxSVjVllXqqZa25I4ebDvP391kesRByZmPG4jWrl8TGLF+/bkVC
+        /OrEzYgZG7IyN27bipiRUV62tbamAKl5V0vFntaajrYGNmm0HDrYCjkfO7L32JF9cOcTx9t/VUVfvHgR
+        QQLG5+ztHL4uvGBfwcnHJ1V0+uza/Xj37OuzySMjh3R125QZmUYLdSGXk6SsOLOMqe+ZpoxiQsl5jOjo
+        aBUtc77MaZmezoeWucj8JftyVf6jU7+Olukiik5NXrU0PMh/vKe5maGDh+3cVSEZDVs6brcpzkX0FTJX
+        6opu+aAp+EIQ7JjkihZtQb2WoEpLUM53ZKWQizS1CzW1t2lpZ/cV8lNTVimiZc2JI95khs4InLA8YkHk
+        8oWw5qiVi6JXLVkbs4xoecOqpM0xqcnrMzM25m5NLirYUsZOgDvqiluaylt3VbfthTVjCGxGcD50cNfR
+        w3tQx4/uY+PzL6/owMBASwfLwIWBcXlxNSdqfvB8cb+179N9C28stDlro3eUPcnZytoxP1dwQuY9EKU4
+        fUFNeeCkjJImSCUBEoFEsGXLFv55DDr70byMjDGQltUfaf01tUyXxrbdW9tu7eVOpPVTalqmReVc+n7J
+        1HOTjY4YCDu0hTu1iIqr+6pYRcgFELKmdramFl/ICSr67VNaSzVHOL3p4my3aGEwq+UFKyPDVhEth69d
+        s2x9LLQclbiJajlhKyJzQVppSXZVxbZ6MgGWwZqVqZnIGUnjcDfnzsgbv5aiVbT5/JV9P3vylcnkkT14
+        cfsPqLiPIz+3kFHMIkZkJ+Ie96Narq+vb2xspA+X0Nnv6NGjyMtcxlDRMndmjjub8SvLGUtDVb/q1VfI
+        ux60hF9eZH/SVtQtEOzREjRqCWo1BVWaRMWchHkqJkKGHUPIuZraWRDySK3kkVqJmlo/JGTUSJiybOjk
+        Sb4RS+dFLJun0HLUoujVS9auiVgfG0m0vDEmNUWp5fy07cVZVRW5dTWFjQ3bdzaV724l1tzV0bC/E0lD
+        IWcU3PnFVXTG/YxpV6dZ9lrqHSO5mAx4LcpE0a+KqR1XKjMyfQIGosVzCJlMfb5igeCpKfPDMj2/3NHR
+        0d3dTc9jICzRZ35yeZlmjBdBy3T9sKIzb6VPPz/V/Jip8KA2kXCTlnatpnY1JKwpKNUUbGerBNVXxTRX
+        5Glq52hqZ2gSFSdByCO1No3UShiptUETpY1SUzFKc/aI4ebDvD2dwxeHRCydq9DyioVEy4qMEZkQv4r4
+        csq6zPQE9lRGamkJtLy1trqgkZxoLt+9q6ptT11H2w7I+UAXDc4kbMCd2WnwxVD0ia9OZN3PQhx2OudE
+        zrR181xYXcJ9VfzUjpErCthnxVE7xrD3zIyMIuliikSoL4yNjeWEzDfl3bt304BBH8bu7e2l5+ToeQz6
+        /FrMfioZ47fVMl19FF30XsGSK4u9T3sYHtEXHlDqt05Tu0pTu0L5UN529tE8ImG2ipU3IORi1o7zWTvO
+        5Ox4pNbmkVoboWJ+9aNozXkjhtu+6exsGxoyfemSkGVLQpcTLc9fuSJs9crFa6Ix+0VsWL9iY/yqpMS1
+        W1LXZ2Vg9ksszN9Suj2rkvgytIzIXAYt79tT276vrpPIGUmjqfsAOa1xuHsXzRu/jaKLPyyOuhWF/OBw
+        zoE8AfmwLvHffexEN5B+n6Hi7XJ5ofI8Mp30YMcDn7WgRYQ8TSI0EkZFRfHTBZeUMfXtU14IEabMBYyb
+        N2/S54o/Yq+5RZ9iq56Xf1st06UhPKAl2KslQARuUIq3nCdepX77FPvgNNEybhSNVHjxVtaLVVQcryJk
+        rp4qWjNkxHCbYY4O1rNnTVkSPgdahi8vj5i3MnIBO/iFx6xZuj52+Ya4lZs3Ricnrd2SFpeduSkvl539
+        tmdWlSu03NxY2rqTROa2vbWw5s72HQc6m9g5sJm682+s6H6Uqy5eWnwJ8xMFjcbUi59bxShEC8x7Qj3h
+        Kvad9tSFjHRBH/FDUj7CvgbtLHshxOvXr8OU7927x4Xlb/pe3uU3mf2evTQGlC2/WAkrisSJkdr5I7Vz
+        R2pnk+daEAmjIGGaKAZUMa/iNEdOGf7mqKFurvZzQ6YTIYfPYU157gqYciQJGGtWh8euXRbHBoykzWtS
+        kxEw4rdmb87fllxcmF62neTl+tqCxnr4cunuXdBy9b499IQGGQJRB4mc4c6KvPFbK1pFtvwaSMKIE5wR
+        c4nih6IxVxj2xO7igICAhIQElWihLuTDhw+fUF43lbsQIkz54+e4stkLtTRUxYvi65c+UahgpFY++1yh
+        rJFaaSO0ktn6YSNWLc2wEcPdhw3TGuLn67F4UXD44tnQ8jKY8rK5kcvmrVi+YNXKsOjVi2Njlq6LXR4P
+        U94UnZK4Np2YcgIbMDD4pVeUZVdXbSNaJhmjtJWcZa5ktQxrJnKmwZlk5xdU0er6RVXI5aVkriOnjDkX
+        5iT8HEZMS7qKtWNDYVhYWGFhIWfHdNhDRqbRAvOeupBpurijvG7qs035BdQyXRp99FukqRAvfa5b5kjN
+        LSM0k0eQZ7wljtDaPEJr0withBFa8SO04kaoqHWg0lw2YsTYN4fpDHFxsZ01a+LiMAg5eMni2UuXzIlg
+        kzJMOWrlwuhVi9ZGL1m3NiI+bsXmjUjKa7akrsvM2LA1exNrymmlJGBg8MvbUVfQ1FCysxkZA+NfJay5
+        bW8NtNzRVt/ZXs+e1iDZ+cVTtIp4ESHgv/SxO06/NEj80FynUkTFEyVCE2FwcHBaWhpVMT1lQe2YnrWg
+        wx4y8sGDB2m0UBcyPX3xed/rpr7gpqyyNLRyR2ohPGSM1ExjlcuKlzxjkz5pM2GEZrziiZpExfxSEy9X
+        IxcMH+41bJh0iJOjdeD08YsWBi0OmxW+KHgphBwesmwpmy4i56+CkFcvXrtmybpYCDlyU0JU8uaYtJTY
+        zPS4nOyNeblJRQUppcXp5WVZNZVba2vyGuoKqZZ3tZTDl6k1t+/FEFgLLbPuTAz6BVW0QrkoKJczX4j3
+        uf2XX0wYIx4tFuoI586dm5mZ2a+KW1paWvu+dwMd9mhGfuuttxAtBhIy0oXKo9cvvpbp0iCy5ZSrFG+/
+        9QxFa64YMWLim8MshhgZ6Xp7Os2ZNTls4UxOyHDkZXDkpaErls9duWLBqqiFayDkmKVxEPKGFZsSWEdO
+        WZuRFrc1a+O23M2F+SklRWnlMOWKnJoqhOX8xvqi5saSnU3QchkiM9UykfO+2o59cGeEjRdf0T9JuVwx
+        4YxkPDHiiRMnxsTEcBKmAx6XKODFnIq72HcVOHr0KLXjCxcu0Es10OsI0IxMo4W6kF/8dDHQ0lCR7TOK
+        L+eRi4cPHzdsmNmQIUMGubrYTp82buG8GWHzZ4QtCFoUFhS+aBaixdLw2cuWzomMmLsyct6qFQtXRy1a
+        uyZ83dqlG9ZHJGwg0SIlMXpLKufImwvykkuKtpRtz6gsz66u3FoPU64vbNpBtbydaHknsea9u2lqrkG9
+        VIpWE+kzCkGCmcGIXcRCGbmObFxcHH+0oxLmjBi5mD6m19HRQb2YqvjMmTPnz5+/fPky344//PBD+iJ3
+        7joCNFq87ELm1nMpeuSCN4l+LYYM1RxsbWXiO8ZtTvCkBfMCF8wPXDg/kNhx2EyoeGk4UXHEspDIiNAV
+        kfOiVixYHRUWE70oNmbJhnVsQE6IStq8OjU5Jj11XVbGhtychLxczHsQclrZ9i0VpVnVFTl1Ndsa6vIb
+        dxRAyy1NVMul0PLuXeV7iZyr9u1BvUKKlsZKmbmMZJxEZCUSCAT0OshF7DU5IV6qXwQJzoU5Ce9TXhmO
+        Xrns+PHjSBS9vb3Ui69fv05VfO/evQ8++IDaMc0V9CE+DHvqGfnlFTK3+ih6ZMTwETOHDfceCvMdqjXY
+        2FjPxdlmQoD3vNCp8+dOWzBv2oL50xcuCFyklPCSxUTFMOLlS6Fi1otXLohetTAmevG6tUviYpex6XhF
+        0uZVKUmY9GKz0tfnZMXn5mws2JZYVJBcWgwhp1eWZVVX5tRWs6bMarm5Ab5cvLOpBFpuhZx3le8hSaPi
+        5VY0YgMTSMIvUS4j+MHrIMN/aYrg9EvnOrhwd3c3lfAp9uJwMGLk4mvKd4N677334MXqKv4L+yYkfDt+
+        lYTMLQ19XamVpbGHu92EAK+Q4Enz2BfmKcRLCvqdAf0uDpu5ZHHQEjZLREDCy0IQiqNWQMLzWQmTRLE+
+        lk0U8cs3b1wJFacSFa/NSl+XnRnH2vHmovykksKU7cWp5SRaZLJCzq2vQVLOa6xHWC6ElluaiJZ3NpdA
+        y607kTQQnF8JRUOwfM1i0dhAlQvnpREY4kUKhnjhv9DvAfbKnNAvhjoECc6FOQlzRoxcjAGPXlyLRmNO
+        xfx0/EqqmL80FsyfBuWGLUAR8S5eSMQbvgjiZf13CfQ7m9Vv6MrIuatWzotetWDNKpolwuNil8SvXwYJ
+        w4gTN0WlJK1OS1mTnrY2M319dlZcbnZCfu6mwnzYcdL2otTSEuSKjKpyOHJ2bRUx5R2123bAlOvzmxqg
+        ZSJnquVdzUga2181RVO3hWZ3P991kCFeBOFz585R/V69ehVDHfT77rvvci788OFDhGJqxF+xb7iFXMwl
+        iv8cFfOXxtLwWcuWoIKXL5sdGYFBLmRlZGjUirmrqP+S8xJha9dAv4vj1i3ZsH5p/IaITfGRiRtXJpMs
+        sSotJXoLJLwlNjsDEt6wbWtC/raNBXmbiwqh4pRSYsdbKsvI62qrK7Ig5LrqrXU1udByQz3ryyRjFDY3
+        FrWQUrjzq6loCBZuSzX7PNdBvnnzJiLE7du332evH0ktmAYJ7hJ8cGEqYRUj/k9TMX9prI5CbJi/ZvWC
+        mOiFsWvC1q1dtH6tUrxxyzbGR27eGJm4aUXy5qhU6DcZ+o3J2EKyRA5x4bhtOfF5ucjFmwrzEoupikuI
+        iivIq2vhyBk1lVk1ldl11TlIFztqiZZ31G1jtZzfhPGPuvN/gqJhtRd/zHWQIV5ECL5+YcFckFBx4f9k
+        CassjY0blm1KiNicsDxxY2TSJkxxMF9WvDDf1DXpqTGZ6WuzMmJzMtdtzVrPuvCG/NyEgm0bi/I3Fxcg
+        FydtL04pK0GlkdfVlqZXlqdXwZErM2urkC6IllFUyw11qDylO/+HKRpW+6Oug8z3X75+qYSh398l3O/S
+        SE+NzkiLztiyJnPLmqz0tdkZyA+xrHjhv8SCqX4L8jYVF0DCiSXkFYlJpcXkRbVlxI5TWTveAjumV+1Q
+        aLlaoeX6mq2o3xVN3v0Ni7otNEsnNypb2C6nXIQHFfFy/vu7fp9naeQS2cblbd2Ays+NL9iWUMBeV4gt
+        ouKSQhTiBH2BeErZ9hTWixVX7SBa5l2BhmSMKuTl3xWtpmi+YKlmVWSLpaJcLMXd9Pt67qVRmLcRRSXM
+        ipcU73XhimscoJ7nmkq/K3pARbMxQSFYLIVi2aW4L35fP8fS4CSscnUDZfV/BZrfFf2jFa0A/vv6hdfP
+        cJWw3xX9u6JfoPW7on9X9Ku1flf074p+tdbviv5d0a/S+r//+/8BPTxUq6Ub7iwAAAAASUVORK5CYII=
+</value>
+  </data>
+</root>

Epole.fp13/AboutBox1.vb

@@ -0,0 +1,29 @@
+Public NotInheritable Class AboutBox1
+
+    Private Sub AboutBox1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
+        ' 폼의 제목을 설정합니다
+        Dim ApplicationTitle As String
+        If My.Application.Info.Title <> "" Then
+            ApplicationTitle = My.Application.Info.Title
+        Else
+            ApplicationTitle = System.IO.Path.GetFileNameWithoutExtension(My.Application.Info.AssemblyName)
+        End If
+        Me.Text = String.Format("{0} 정보", ApplicationTitle)
+        ' 정보 상자에 표시되는 모든 텍스트를 초기화합니다.
+        ' TODO: "프로젝트" 메뉴에서 선택하여 표시되는 프로젝트 속성 대화 상자의 "응용 프로그램" 창에서 응용 프로그램의 
+        '    어셈블리 정보를 사용자 지정합니다.
+        Me.LabelProductName.Text = My.Application.Info.ProductName
+        Me.LabelVersion.Text = String.Format("버전 {0}", My.Application.Info.Version.ToString)
+        Me.LabelCopyright.Text = My.Application.Info.Copyright
+        Me.LabelCompanyName.Text = My.Application.Info.CompanyName
+        Me.TextBoxDescription.Text = My.Application.Info.Description + vbCrLf + vbCrLf + "사용기한 : " + Rundate.ToString("yyyy-MM-dd")
+    End Sub
+
+    Private Sub OKButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OKButton.Click
+        Me.Close()
+    End Sub
+
+    Private Sub TextBoxDescription_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBoxDescription.TextChanged
+
+    End Sub
+End Class

Epole.fp13/Common.vb

@@ -0,0 +1,853 @@
+Imports System.IO
+Imports MyControlOLEDBv2
+
+Module Common
+
+
+    Structure S_Arrow
+        Dim Direction As Short
+        Dim RectX As Short
+        Dim RectY As Short
+        Dim RectW As Short
+        Dim RectH As Short
+        Dim TriWidth As Short
+        Dim TriHeight As Short
+        Dim PenColor As Drawing.Color
+        Dim PenWidth As Single
+        'Dim FillColor As Drawing.Color
+        Dim Field As String
+    End Structure
+
+    Structure S_Line
+        Dim X As Short
+        Dim Y As Short
+        Dim X2 As Short
+        Dim Y2 As Short
+        Dim PenColor As Drawing.Color
+        Dim PenWidth As Single
+        Dim Field As String
+    End Structure
+
+    Structure S_Box
+        Dim X As Short
+        Dim Y As Short
+        Dim Width As Short
+        Dim Height As Short
+        Dim PenColor As Drawing.Color
+        Dim PenWidth As Single
+        Dim Field As String
+    End Structure
+
+    Structure S_QRCode
+        Dim X As Single
+        Dim Y As Single
+        Dim Width As Single
+        Dim Height As Single
+        Dim Field As String
+    End Structure
+
+    Structure S_QRCode1
+        Dim X As Single
+        Dim Y As Single
+        Dim Width As Single
+        Dim Height As Single
+        Dim Field As String
+    End Structure
+
+    Structure S_Circle
+        Dim X As Single
+        Dim Y As Single
+        Dim Width As Single
+        Dim Height As Single
+        Dim PenColor As Drawing.Color
+        Dim PenWidth As Single
+        'Dim Radius As Single    '//휘어짐수치
+        Dim Field As String
+    End Structure
+
+    Structure S_Image
+        Dim X As Single
+        Dim Y As Single
+        Dim Width As Single
+        Dim Height As Single
+        Dim FileName As String
+        Dim Field As String
+    End Structure
+
+    Enum ESorted
+        No = 1
+        YES = 2
+        NULL = 0
+        CANT = 3
+    End Enum
+    Structure Cfont
+        Dim FontName As String
+        Dim FontSize As Int16
+    End Structure
+
+    Structure Str_Alllabels '레이블들을 저장한다.
+        Dim ctl As MyControlOLEDBv2.MyLabel
+        Dim desc As String
+    End Structure
+
+    Structure SStyle
+        Dim Desc As String
+        Dim File As String
+        Dim LoadOK As Boolean
+    End Structure
+
+    Public StyleList() As SStyle
+    Public PDS() As PatternDS
+
+    Public Draw_Line As New List(Of S_Line)
+    Public Draw_Box As New List(Of S_Box)
+    Public Draw_Circle As New List(Of S_Circle)
+    Public Draw_Image As New List(Of S_Image)
+    Public Draw_QRcode As New List(Of S_QRCode)
+    Public Draw_QRcode1 As New List(Of S_QRCode1)
+    Public Draw_Arrow As New List(Of S_Arrow) '//방향화살표  170711
+
+    Public Runcnt As UInt16 = 0
+    Public Rundate As Date = Now
+
+    Public DataBaseFile As String = My.Application.Info.DirectoryPath & "\database\database.mdb"
+    'Public ConString As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & DataBaseFile
+    'Public Arin As New CommonClassv2.ARINCLASS
+    'Public ArinPath As New CommonClassv2.MyPath
+    Public Auto_Log As Boolean = False  '//디비나 각종 로그파일을 쌓을지 여부
+    Public PICmanFile As String = vbNullString '//그림관리프로그램의 파일명을 적는다.
+    Public MakeState As String = vbNullString
+    Public PoleState As String = vbNullString
+    Public PoleEtcState As String = vbNullString
+    Public PicState As String = vbNullString   '/그림파일연결관리다.
+    Public HelpWebSite As String = vbNullString  '//웹페이지주소 일단은 도움말을 얻기위해쓴다.
+    Public HomePage As String = vbNullString
+    Public SORTNULL As Boolean = True   '//전주세부-정렬이 번호가 비어잇을경우 가장위에표시할지 아닐지!
+    Public NUMCOLOR As Boolean  '//가공번호찰에서 번호에 색상을 지정할지
+    Public Admin As Boolean = False '//개발자모드로 접속햇을때
+    Public IsPro As Boolean = False
+
+    Public ViewFont As Cfont   '//뷰의 글자
+    Public MenuFont As Cfont    '//메뉴의 글자
+    Public FormFont As Cfont    '//폼의 글자
+
+    'Public CEpole As CEpole.C_Epole  '//전신주용 DLL추가햇다.
+
+    'Public Sub AddLog(ByVal msgtext As String, Optional ByVal ClearData As Boolean = False)   '//로그창에 기록을 남깁니다.
+    '    If ClearData Then Frm_Log.RichTextBox1.Clear()
+    '    Frm_Log.RichTextBox1.AppendText(msgtext & vbCrLf)
+    'End Sub
+    'Public Sub Showlog()
+    '    Frm_Log.MdiParent = Main
+    '    Frm_Log.Show()
+    'End Sub
+
+    Public Sub Work_Form(ByVal T As String)
+        Form_Work.Show()
+        Form_Work.Msg(T)
+    End Sub
+    Public Sub NWork_Form(ByVal T As String, ByVal maxcount As Integer)
+        Form_Work.Show()
+        Form_Work.Msg(T)
+        Form_Work.ProgressBar1.Value = 0
+        Form_Work.ProgressBar1.Minimum = 0
+        Form_Work.ProgressBar1.Maximum = maxcount
+    End Sub
+
+    Public Sub NOTICE(ByVal MSG As String, ByVal Src As Object)
+        On Error Resume Next
+        If Src.GetType.Name.ToUpper = "TOOLSTRIPSTATUSLABEL" Then
+            CType(Src, ToolStripStatusLabel).Text = "▶ " & MSG & Space(1)
+            CType(Src, ToolStripStatusLabel).ForeColor = Color.Black
+        ElseIf Src.GetType.Name.ToUpper = "LABEL" Then
+            CType(Src, Label).Text = "▶ " & MSG & Space(1)
+            CType(Src, Label).ForeColor = Color.Black
+        End If
+        ' My.Computer.Audio.PlaySystemSound(Media.SystemSounds.Beep)
+    End Sub
+    Public Sub NOTICE(ByVal MSG As String, ByVal FCOLOR As Color, ByVal Src As System.Windows.Forms.ToolStripStatusLabel)
+        Src.Text = "▶ " & MSG & Space(1)
+        Src.ForeColor = FCOLOR
+        '  My.Computer.Audio.PlaySystemSound(Media.SystemSounds.Beep)
+    End Sub
+
+    Public Function NVL(ByVal Indata As Object, Optional ByVal nullVal As Object = "") As Object
+
+        Try
+            'If Indata = "" Then Return nullVal
+            If Indata Is DBNull.Value Then Return nullVal
+        Catch ex As Exception
+            Return nullVal
+        End Try
+        If Indata Is vbNullString Then Return nullVal
+        If Indata.ToString.Trim = "" Then Return nullVal
+        Return Indata
+    End Function
+
+    Public Function PATTERN_ENC(ByVal SRCSTR As String, Optional IncludeH As Boolean = False) As String
+        Dim MSG As New System.Text.StringBuilder
+        For Each A As Char In SRCSTR.ToCharArray   '//모든문자의 숫자번호를 판별한다.
+
+            If IncludeH Then
+                If A = ";" Then '//구분자라면
+                    MSG.Append(";")
+                ElseIf A = "H" Then
+                    MSG.Append("Z")
+                ElseIf A = "-" Then
+                    MSG.Append("-")
+                ElseIf Char.IsNumber(A) Then
+                    MSG.Append("1")
+                ElseIf Asc(A) < 0 Then
+                    MSG.Append("H")
+                Else
+                    MSG.Append("0")
+                End If
+            Else
+                If A = ";" Then '//구분자라면
+                    MSG.Append(";")
+                ElseIf A = "-" Then
+                    MSG.Append("-")
+                ElseIf Char.IsNumber(A) Then
+                    MSG.Append("1")
+                ElseIf Asc(A) < 0 Then
+                    MSG.Append("H")
+                Else
+                    MSG.Append("0")
+                End If
+            End If
+
+
+        Next
+        Return MSG.ToString
+    End Function
+
+    Public Sub ReNum(ByVal Srcspread As MyControlOLEDBv2.MyFpoint, ByVal NumColumnindex As Integer, Optional ByVal PBar As ProgressBar = Nothing)
+        If Not PBar Is Nothing Then
+            PBar.Minimum = 0
+            PBar.Maximum = Srcspread.ActiveSheet.RowCount
+            PBar.Value = 0
+        End If
+
+        For Each SR As FarPoint.Win.Spread.Row In Srcspread.ActiveSheet.Rows
+            If Not PBar Is Nothing Then PBar.Value += 1
+            Srcspread.ActiveSheet.Cells(SR.Index, NumColumnindex).Value = SR.Index + 1
+        Next
+    End Sub
+
+    Public Sub AddLog(ByVal t1 As Boolean, ByVal txt As String, Optional ByVal t2fn As String = "")
+        'If Admin Then Log.RichTextBox1.AppendText(txt & vbCrLf)
+    End Sub
+    Public Sub showlog()
+        '  Log.Show()
+    End Sub
+    Public Sub hidelog()
+        '  Log.Close()
+    End Sub
+    Public Sub resetLog()
+        '  Log.RichTextBox1.Text = ""
+    End Sub
+
+    Public Function TextEnc(ByVal SrcText As String) As String
+        If SrcText = "" Then Return ""
+
+        Dim Ec As New System.Text.UnicodeEncoding
+        Dim Msg1 As New System.Text.StringBuilder
+        For Each bi As Byte In Ec.GetBytes(SrcText)
+            Msg1.Append(bi.ToString & ",")
+        Next
+        Msg1.Remove(Msg1.Length - 1, 1)
+        Return Msg1.ToString
+    End Function
+    Public Function TextDec(ByVal srctext As String) As String
+        Dim Ec As New System.Text.UnicodeEncoding
+        Dim Z(srctext.Split(",").GetUpperBound(0)) As Byte
+        Dim i As Int16 = 0
+        For Each aa As String In srctext.ToString.Split(",")
+            Z(i) = CType(aa, Byte)
+            i += 1
+        Next
+        Return Ec.GetString(Z)
+    End Function
+
+
+
+    Public Sub ReNum(ByRef SrcTable As DataTable, ByVal ColumnName As String, Optional ByVal PBar As ProgressBar = Nothing)
+
+
+        If Not SrcTable.GetChanges Is Nothing Then
+            MsgBox("변경된 내용이 있습니다" & vbCrLf & vbCrLf & "먼저 저장을 하세요", MsgBoxStyle.Information, "확인")
+            Return
+        End If
+
+        If MsgBox("모든번호가 새로 갱신됩니다" & vbCrLf & vbCrLf & "계속하시겠습니까?", MsgBoxStyle.Information + MsgBoxStyle.OkCancel, "확인") <> MsgBoxResult.Ok Then
+            Return
+        End If
+        If Not PBar Is Nothing Then
+            PBar.Minimum = 0
+            PBar.Maximum = SrcTable.Rows.Count
+            PBar.Value = 0
+        End If
+
+        Dim i As Integer = 0
+        Dim DV As New DataView(SrcTable, "", "정렬번호,번호", DataViewRowState.CurrentRows)
+        Dim DT As DataTable = DV.ToTable
+
+        For Each dr As DataRow In DT.Rows
+            i += 1
+            dr(ColumnName) = i
+            If Not PBar Is Nothing Then PBar.Value += 1
+        Next
+        SrcTable.Merge(DT)
+        MsgBox("번호 정렬이 완료되었습니다", MsgBoxStyle.Information, "확인")
+    End Sub
+
+    Public Sub GetAllsection(ByVal FILENAME As String, ByVal CurIdx As Short)
+
+
+        Dim f As New fProgress()
+        f.ProgressBar1.Minimum = 0
+        f.ProgressBar1.Maximum = 0
+        f.ProgressBar1.Style = ProgressBarStyle.Marquee
+        f.Label1.Text = "스타일(" + CurIdx.ToString() + ")을 불러오고 있습니다" + vbCrLf + FILENAME
+        f.TopMost = True
+        f.Show()
+        Application.DoEvents()
+
+
+        '//파일의내용을 데이터테이블에 바로 넣도록 변경작업
+
+        'Dim wat As New System.Diagnostics.Stopwatch
+        'Dim FS As New System.IO.FileStream(FILENAME, IO.FileMode.Open)
+        'Dim SR As New IO.StreamReader(FS, System.Text.Encoding.Default)
+
+        Dim buffers() As String = System.IO.File.ReadAllLines(FILENAME, System.Text.Encoding.Default)
+
+        Dim Findkey As String = ""
+        ' Dim Line As String
+        Dim KeyPos As Integer = -1
+        Dim Seppos As Integer = -1
+        Dim dr As DataRow
+
+        'WLog2(Auto_Log, "getallSection : 파일의 모든내용을 테이블로 옴긴다.()", "\지중(케이블라벨)순차로그.txt")
+
+        'StyleList(CurIdx).PATTERNTABLE = New DataTable
+        'StyleList(CurIdx).PATTERNTABLE.Columns.Add("설명")
+        'StyleList(CurIdx).PATTERNTABLE.Columns.Add("값")
+
+        '//초기값셋팅
+        'StyleList(CurIdx).Backimg = ""
+        'StyleList(CurIdx).CanvasX = 292
+        'StyleList(CurIdx).CanvasY = 520
+        'StyleList(CurIdx).Desc = "기본걸명"
+        'StyleList(CurIdx).dummmyx = 0
+        'StyleList(CurIdx).dummmyy = 50
+        'StyleList(CurIdx).Dummy = False
+        'StyleList(CurIdx).Dummytype = 1
+        'StyleList(CurIdx).File = FILENAME
+        'StyleList(CurIdx).IsXml = False
+        ' MsgBox(FILENAME)
+
+        'StyleList(CurIdx).Filter = ""
+        'StyleList(CurIdx).LandScape = False
+        'StyleList(CurIdx).MarginX = 50
+        'StyleList(CurIdx).MarginY = 50
+        'StyleList(CurIdx).picstyle = 1
+        'StyleList(CurIdx).PrintFontOffset = 0
+        'StyleList(CurIdx).ScaleX = 1.5
+        'StyleList(CurIdx).ScaleY = 1.5
+        'StyleList(CurIdx).Viewimage = False
+
+        '//XMl테이블 동기화(기존데이터삭제)
+
+        If Common.PDS(CurIdx) Is Nothing Then Common.PDS(CurIdx) = New PatternDS()
+
+        Common.PDS(CurIdx).TStyle.Rows.Clear()
+        Common.PDS(CurIdx).TPattern.Rows.Clear()
+
+        '//set default value
+        Dim Drow As PatternDS.TStyleRow = Common.PDS(CurIdx).TStyle.NewTStyleRow
+        Drow.BACKIMG = String.Empty
+        Drow.CANVASX = 292
+        Drow.CANVASY = 520
+        Drow.DESC = "기본설명"
+        Drow.DUMMMYX = 0
+        Drow.DUMMMYY = 50
+        Drow.DUMMY = "false"
+        Drow.DUMMYTYPE = "1"
+        Drow.FILE = FILENAME
+        Drow.ISXML = False
+        Drow.DUMMYCNT = 0
+        Drow.LANDSCAPE = "false"
+        Drow.MARGINX = 50
+        Drow.MARGINY = 50
+        Drow.FILTER = String.Empty
+        Drow.PICSTYLE = "1"
+        Drow.PRINTFONTOFFSET = "0"
+        Drow.SCALEX = "1.5"
+        Drow.SCALEY = "1.5"
+        Drow.VIEWIMAGE = "false"
+        Drow.PRINTBG = "false"
+        Drow.BAKX = "0"
+        Drow.BAKY = "0"
+        Drow.BAKW = "0"
+        Drow.BAKH = "0"
+        Drow.VIEWIMAGE = "false"
+
+        'wat.Restart()
+        'Console.WriteLine("File Read Ready")
+
+
+        '//모든줄을 읽어서  섹션&키  = 설명  으로 한다.
+        Try
+            For Each Line As String In buffers
+                If String.IsNullOrEmpty(Line) Then Continue For '//빈값제거
+                If Line.StartsWith("#") Then Continue For '//주석제거
+
+
+                If Findkey = "" Then '//아직 셋팅된 키가 없다면
+                    If Line.ToUpper.IndexOf("[") > -1 Then Findkey = Line.Trim("[").ToString.Trim("]").ToString
+                Else   '//셋팅된 키가 있다면 테이블에 추가해준다.
+                    If Line.IndexOf("[") = -1 Then  '//그다음 키가 오기전까지 모두 추가한다.
+                        Seppos = Line.IndexOf("=")
+
+                        Select Case Line.Substring(0, Seppos).ToUpper
+                            Case "DESC"
+                                If Findkey.ToUpper = "STYLE" Then
+                                    Drow.DESC = Line.Substring(Seppos + 1).ToUpper
+                                Else
+                                    'dr = StyleList(CurIdx).PATTERNTABLE.NewRow
+                                    Dim stitle As String = CStr(Findkey & Line.Substring(0, Seppos)).ToUpper
+                                    Dim svalue As String = Line.Substring(Seppos + 1).ToUpper
+                                    '  StyleList(CurIdx).PATTERNTABLE.Rows.Add(dr)
+
+                                    Dim Nrow As PatternDS.TPatternRow = Common.PDS(CurIdx).TPattern.NewTPatternRow
+                                    Nrow.NAME = stitle ' PRow("설명")
+                                    Nrow.Val = svalue ' PRow("값")
+                                    Common.PDS(CurIdx).TPattern.AddTPatternRow(Nrow)
+
+                                End If
+                            Case "FILE" : Drow.FILE = FILENAME ''StyleList(CurIdx).File = Line.Substring(Seppos + 1).ToUpper
+                            Case "BACKIMG" : Drow.BACKIMG = Line.Substring(Seppos + 1).ToUpper
+                            Case "CANVASX" : Drow.CANVASX = Line.Substring(Seppos + 1).ToUpper
+                            Case "CANVASY" : Drow.CANVASY = Line.Substring(Seppos + 1).ToUpper
+                            Case "DUMMY" : Drow.DUMMY = Line.Substring(Seppos + 1).ToUpper
+                            Case "DUMMYCNT" : Drow.DUMMYCNT = Line.Substring(Seppos + 1).ToUpper
+                            Case "DUMMYTYPE" : Drow.DUMMYTYPE = Line.Substring(Seppos + 1).ToUpper
+                            Case "DUMMMYX" : Drow.DUMMMYX = Line.Substring(Seppos + 1).ToUpper
+                            Case "DUMMMYY" : Drow.DUMMMYY = Line.Substring(Seppos + 1).ToUpper
+                            Case "LANDSCAPE" : Drow.LANDSCAPE = Line.Substring(Seppos + 1).ToUpper
+                            Case "MARGINX" : Drow.MARGINX = Line.Substring(Seppos + 1).ToUpper
+                            Case "MARGINY" : Drow.MARGINY = Line.Substring(Seppos + 1).ToUpper
+                            Case "PICSTYLE" : Drow.PICSTYLE = Line.Substring(Seppos + 1).ToUpper
+                            Case "PRINTFONTOFFSET" : Drow.PRINTFONTOFFSET = Line.Substring(Seppos + 1).ToUpper
+                            Case "PRINTBG" : Drow.PRINTBG = Line.Substring(Seppos + 1).ToUpper
+                            Case "SCALEX" : Drow.SCALEX = Line.Substring(Seppos + 1).ToUpper
+                            Case "SCALEY" : Drow.SCALEY = Line.Substring(Seppos + 1).ToUpper
+                            Case "BAKX" : Drow.BAKX = Line.Substring(Seppos + 1).ToUpper
+                            Case "BAKY" : Drow.BAKY = Line.Substring(Seppos + 1).ToUpper
+                            Case "BAKW" : Drow.BAKW = Line.Substring(Seppos + 1).ToUpper
+                            Case "BAKH" : Drow.BAKH = Line.Substring(Seppos + 1).ToUpper
+                            Case "VIEWIMAGE" : Drow.VIEWIMAGE = Line.Substring(Seppos + 1).ToUpper
+                            Case "FILTER" : Drow.FILTER = Line.Substring(Seppos + 1).ToUpper
+                            Case Else
+                                'dr = StyleList(CurIdx).PATTERNTABLE.NewRow
+                                Dim stitle As String = CStr(Findkey & Line.Substring(0, Seppos)).ToUpper
+                                Dim svalue As String = Line.Substring(Seppos + 1).ToUpper
+                                'StyleList(CurIdx).PATTERNTABLE.Rows.Add(dr)
+
+                                Dim Nrow As PatternDS.TPatternRow = Common.PDS(CurIdx).TPattern.NewTPatternRow
+                                Nrow.NAME = stitle ' PRow("설명")
+                                Nrow.Val = svalue ' PRow("값")
+                                Common.PDS(CurIdx).TPattern.AddTPatternRow(Nrow)
+
+
+                        End Select
+                    Else
+                        Findkey = Line.Trim("[").ToString.Trim("]").ToString
+                    End If
+                End If
+
+            Next
+
+        Catch ex As Exception
+            f.Close()
+            MsgBox("Load Error " + vbCrLf + ex.Message, MsgBoxStyle.Critical, "Error")
+        End Try
+
+        ' MsgBox(tyleList(CurIdx).Filter)
+
+        'Console.WriteLine("File Read : " + wat.ElapsedMilliseconds.ToString() + "ms")
+        'wat.Restart()
+
+        'SR.Close()
+        'FS.Close()
+        Dim CFile As New System.IO.FileInfo(FILENAME.ToLower.Replace("ini", "cfg"))
+        If CFile.Exists = False Then  '//새로만들기
+            AddLog(Admin, "로컬프린터정보 Config 파일이 존재하지않습니다. 새로 생성합니다.", "\Alllog.txt")
+            Dim CfgIni As New MyINI2(CFile.FullName)
+            CfgIni.Write("printer", "MARGINX", Drow.MARGINX)
+            CfgIni.Write("printer", "MARGINY", Drow.MARGINY)
+            CfgIni.Write("printer", "PRINTFONTOFFSET", Drow.PRINTFONTOFFSET)
+            CfgIni.Write("printer", "SCALEX", Drow.SCALEX)
+            CfgIni.Write("printer", "SCALEY", Drow.SCALEY)
+            CfgIni.Write("printer", "PRINTBG", Drow.PRINTBG)
+        Else   '//파일있으면 불러온다
+            AddLog(Admin, "로컬프린터정보 Config 파일이 존재하므로 해당 파일을 이용합니다(" & CFile.FullName & ")", "\Alllog.txt")
+            Dim CfgIni As New MyINI2(CFile.FullName)
+            Drow.MARGINX = CfgIni.Read("printer", "MARGINX", 50)
+            Drow.MARGINY = CfgIni.Read("printer", "MARGINY", 50)
+            Drow.PRINTFONTOFFSET = CfgIni.Read("printer", "PRINTFONTOFFSET", 0)
+            Drow.SCALEX = CfgIni.Read("printer", "SCALEX", 1.5)
+            Drow.SCALEY = CfgIni.Read("printer", "SCALEY", 1.5)
+            Drow.PRINTBG = CfgIni.Read("printer", "PRINTBG", True)
+        End If
+
+        ' Console.WriteLine("File Read  2: " + wat.ElapsedMilliseconds.ToString() + "ms")
+        ' wat.Restart()
+
+        '//필터파일추가한다.
+        CFile = New System.IO.FileInfo(FILENAME.ToLower.Replace("ini", "filter"))
+        If CFile.Exists = True Then  '//필터파일이있으며 불러오기한다.
+            Dim CfgIni As New MyINI2(CFile.FullName)
+            Drow.FILTER = CfgIni.Read("STYLE", "FILTER")
+        End If
+
+        ' Console.WriteLine("File Read  3: " + wat.ElapsedMilliseconds.ToString() + "ms")
+        ' wat.Restart()
+
+        '//XML테이블 데이터 동기화
+        'Dim Drow As PatternDS.TStyleRow = Common.PDS(CurIdx).TStyle.NewTStyleRow
+        'Drow.DESC = StyleList(CurIdx).Desc
+        'Drow.BACKIMG = StyleList(CurIdx).Backimg
+        'Drow.CANVASX = StyleList(CurIdx).CanvasX
+        'Drow.CANVASY = StyleList(CurIdx).CanvasY
+        'Drow.DUMMY = StyleList(CurIdx).Dummy
+        'Drow.DUMMYCNT = StyleList(CurIdx).DummyCnt
+        'Drow.DUMMYTYPE = StyleList(CurIdx).Dummytype
+        'Drow.DUMMMYX = StyleList(CurIdx).dummmyx
+        'Drow.DUMMMYY = StyleList(CurIdx).dummmyy
+        'Drow.LANDSCAPE = StyleList(CurIdx).LandScape
+        'Drow.MARGINX = StyleList(CurIdx).MarginX
+        'Drow.MARGINY = StyleList(CurIdx).MarginY
+        'Drow.PICSTYLE = StyleList(CurIdx).picstyle
+        'Drow.PRINTFONTOFFSET = StyleList(CurIdx).PrintFontOffset
+        'Drow.PRINTBG = StyleList(CurIdx).Printbg
+        'Drow.SCALEX = StyleList(CurIdx).ScaleX
+        'Drow.SCALEY = StyleList(CurIdx).ScaleY
+        'Drow.BAKX = StyleList(CurIdx).bakx
+        'Drow.BAKY = StyleList(CurIdx).baky
+        'Drow.BAKW = StyleList(CurIdx).bakw
+        'Drow.BAKH = StyleList(CurIdx).bakh
+        'Drow.VIEWIMAGE = StyleList(CurIdx).Viewimage
+        'Drow.FILE = StyleList(CurIdx).File
+        'Drow.FILTER = StyleList(CurIdx).Filter
+        Common.PDS(CurIdx).TStyle.AddTStyleRow(Drow)  '//기본스타일 데이터 추가
+
+
+        '  Console.WriteLine("File Read  4: " + wat.ElapsedMilliseconds.ToString() + "ms")
+        '  wat.Restart()
+
+        '//패턴정보 추가하기
+        'For i As Integer = 1 To StyleList(CurIdx).PATTERNTABLE.Rows.Count
+        '    Dim PRow As DataRow = StyleList(CurIdx).PATTERNTABLE.Rows(i - 1)
+        '    Dim Nrow As PatternDS.TPatternRow = Common.PDS(CurIdx).TPattern.NewTPatternRow
+        '    Nrow.NAME = PRow("설명")
+        '    Nrow.Val = PRow("값")
+        '    Common.PDS(CurIdx).TPattern.AddTPatternRow(Nrow)
+        'Next
+        Common.PDS(CurIdx).TPattern.AcceptChanges()
+
+        '  Console.WriteLine("File Read  5: " + wat.ElapsedMilliseconds.ToString() + "ms")
+        '  wat.Stop()
+
+        f.Close()
+        f.Dispose()
+        Application.DoEvents()
+
+    End Sub
+
+
+    Public Sub GetAllsection_INI_Backup(ByVal FILENAME As String, ByVal CurIdx As Short)
+
+        'Dim wat As New System.Diagnostics.Stopwatch
+        'Dim FS As New System.IO.FileStream(FILENAME, IO.FileMode.Open)
+        'Dim SR As New IO.StreamReader(FS, System.Text.Encoding.Default)
+        'Dim Findkey As String = ""
+        'Dim Line As String
+        'Dim KeyPos As Integer = -1
+        'Dim Seppos As Integer = -1
+        'Dim dr As DataRow
+
+        ''WLog2(Auto_Log, "getallSection : 파일의 모든내용을 테이블로 옴긴다.()", "\지중(케이블라벨)순차로그.txt")
+
+        'StyleList(CurIdx).PATTERNTABLE = New DataTable
+        'StyleList(CurIdx).PATTERNTABLE.Columns.Add("설명")
+        'StyleList(CurIdx).PATTERNTABLE.Columns.Add("값")
+
+        ''//초기값셋팅
+        'StyleList(CurIdx).Backimg = ""
+        'StyleList(CurIdx).CanvasX = 292
+        'StyleList(CurIdx).CanvasY = 520
+        'StyleList(CurIdx).Desc = "기본걸명"
+        'StyleList(CurIdx).dummmyx = 0
+        'StyleList(CurIdx).dummmyy = 50
+        'StyleList(CurIdx).Dummy = False
+        'StyleList(CurIdx).Dummytype = 1
+        'StyleList(CurIdx).File = FILENAME
+        'StyleList(CurIdx).IsXml = False
+        '' MsgBox(FILENAME)
+
+        'StyleList(CurIdx).Filter = ""
+        'StyleList(CurIdx).LandScape = False
+        'StyleList(CurIdx).MarginX = 50
+        'StyleList(CurIdx).MarginY = 50
+        'StyleList(CurIdx).picstyle = 1
+        'StyleList(CurIdx).PrintFontOffset = 0
+        'StyleList(CurIdx).ScaleX = 1.5
+        'StyleList(CurIdx).ScaleY = 1.5
+        'StyleList(CurIdx).Viewimage = False
+
+        ''//XMl테이블 동기화(기존데이터삭제)
+
+        'Common.PDS(CurIdx).TStyle.Rows.Clear()
+        'Common.PDS(CurIdx).TPattern.Rows.Clear()
+
+        'wat.Restart()
+        'Console.WriteLine("File Read Ready")
+
+
+        ''//모든줄을 읽어서  섹션&키  = 설명  으로 한다.
+        'While SR.Peek > -1
+        '    Line = SR.ReadLine.ToUpper
+
+        '    If Line <> "" Then
+
+        '        If Findkey = "" Then '//아직 셋팅된 키가 없다면
+        '            If Line.ToUpper.IndexOf("[") > -1 Then Findkey = Line.Trim("[").ToString.Trim("]").ToString
+        '        Else   '//셋팅된 키가 있다면 테이블에 추가해준다.
+        '            If Line.IndexOf("[") = -1 Then  '//그다음 키가 오기전까지 모두 추가한다.
+        '                Seppos = Line.IndexOf("=")
+
+        '                Select Case Line.Substring(0, Seppos).ToUpper
+        '                    Case "DESC"
+        '                        If Findkey.ToUpper = "STYLE" Then
+        '                            StyleList(CurIdx).Desc = Line.Substring(Seppos + 1).ToUpper
+        '                        Else
+        '                            dr = StyleList(CurIdx).PATTERNTABLE.NewRow
+        '                            dr(0) = CStr(Findkey & Line.Substring(0, Seppos)).ToUpper
+        '                            dr(1) = Line.Substring(Seppos + 1).ToUpper
+        '                            StyleList(CurIdx).PATTERNTABLE.Rows.Add(dr)
+        '                        End If
+        '                    Case "FILE" 'StyleList(CurIdx).File = Line.Substring(Seppos + 1).ToUpper
+        '                    Case "BACKIMG" : StyleList(CurIdx).Backimg = Line.Substring(Seppos + 1).ToUpper
+        '                    Case "CANVASX" : StyleList(CurIdx).CanvasX = Line.Substring(Seppos + 1).ToUpper
+        '                    Case "CANVASY" : StyleList(CurIdx).CanvasY = Line.Substring(Seppos + 1).ToUpper
+        '                    Case "DUMMY" : StyleList(CurIdx).Dummy = Line.Substring(Seppos + 1).ToUpper
+        '                    Case "DUMMYCNT" : StyleList(CurIdx).DummyCnt = Line.Substring(Seppos + 1).ToUpper
+        '                    Case "DUMMYTYPE" : StyleList(CurIdx).Dummytype = Line.Substring(Seppos + 1).ToUpper
+        '                    Case "DUMMMYX" : StyleList(CurIdx).dummmyx = Line.Substring(Seppos + 1).ToUpper
+        '                    Case "DUMMMYY" : StyleList(CurIdx).dummmyy = Line.Substring(Seppos + 1).ToUpper
+        '                    Case "LANDSCAPE" : StyleList(CurIdx).LandScape = Line.Substring(Seppos + 1).ToUpper
+        '                    Case "MARGINX" : StyleList(CurIdx).MarginX = Line.Substring(Seppos + 1).ToUpper
+        '                    Case "MARGINY" : StyleList(CurIdx).MarginY = Line.Substring(Seppos + 1).ToUpper
+        '                    Case "PICSTYLE" : StyleList(CurIdx).picstyle = Line.Substring(Seppos + 1).ToUpper
+        '                    Case "PRINTFONTOFFSET" : StyleList(CurIdx).PrintFontOffset = Line.Substring(Seppos + 1).ToUpper
+        '                    Case "PRINTBG" : StyleList(CurIdx).Printbg = Line.Substring(Seppos + 1).ToUpper
+        '                    Case "SCALEX" : StyleList(CurIdx).ScaleX = Line.Substring(Seppos + 1).ToUpper
+        '                    Case "SCALEY" : StyleList(CurIdx).ScaleY = Line.Substring(Seppos + 1).ToUpper
+        '                    Case "BAKX" : StyleList(CurIdx).bakx = Line.Substring(Seppos + 1).ToUpper
+        '                    Case "BAKY" : StyleList(CurIdx).baky = Line.Substring(Seppos + 1).ToUpper
+        '                    Case "BAKW" : StyleList(CurIdx).bakw = Line.Substring(Seppos + 1).ToUpper
+        '                    Case "BAKH" : StyleList(CurIdx).bakh = Line.Substring(Seppos + 1).ToUpper
+        '                    Case "VIEWIMAGE" : StyleList(CurIdx).Viewimage = Line.Substring(Seppos + 1).ToUpper
+        '                    Case "FILTER" : StyleList(CurIdx).Filter = Line.Substring(Seppos + 1).ToUpper
+        '                    Case Else
+        '                        dr = StyleList(CurIdx).PATTERNTABLE.NewRow
+        '                        dr(0) = CStr(Findkey & Line.Substring(0, Seppos)).ToUpper
+        '                        dr(1) = Line.Substring(Seppos + 1).ToUpper
+        '                        StyleList(CurIdx).PATTERNTABLE.Rows.Add(dr)
+        '                End Select
+
+
+
+        '            Else
+        '                Findkey = Line.Trim("[").ToString.Trim("]").ToString
+        '            End If
+        '        End If
+        '    End If
+        'End While
+        '' MsgBox(tyleList(CurIdx).Filter)
+
+        'Console.WriteLine("File Read : " + wat.ElapsedMilliseconds.ToString() + "ms")
+        'wat.Restart()
+
+        'SR.Close()
+        'FS.Close()
+        'Dim CFile As New System.IO.FileInfo(FILENAME.ToLower.Replace("ini", "cfg"))
+        'If CFile.Exists = False Then  '//새로만들기
+        '    AddLog(Admin, "로컬프린터정보 Config 파일이 존재하지않습니다. 새로 생성합니다.", "\Alllog.txt")
+        '    Dim CfgIni As New MyINI2(CFile.FullName)
+        '    CfgIni.Write("printer", "MARGINX", StyleList(CurIdx).MarginX)
+        '    CfgIni.Write("printer", "MARGINY", StyleList(CurIdx).MarginY)
+        '    CfgIni.Write("printer", "PRINTFONTOFFSET", StyleList(CurIdx).PrintFontOffset)
+        '    CfgIni.Write("printer", "SCALEX", StyleList(CurIdx).ScaleX)
+        '    CfgIni.Write("printer", "SCALEY", StyleList(CurIdx).ScaleY)
+        '    CfgIni.Write("printer", "PRINTBG", StyleList(CurIdx).Printbg)
+        'Else   '//파일있으면 불러온다
+        '    AddLog(Admin, "로컬프린터정보 Config 파일이 존재하므로 해당 파일을 이용합니다(" & CFile.FullName & ")", "\Alllog.txt")
+        '    Dim CfgIni As New MyINI2(CFile.FullName)
+        '    StyleList(CurIdx).MarginX = CfgIni.Read("printer", "MARGINX", 50)
+        '    StyleList(CurIdx).MarginY = CfgIni.Read("printer", "MARGINY", 50)
+        '    StyleList(CurIdx).PrintFontOffset = CfgIni.Read("printer", "PRINTFONTOFFSET", 0)
+        '    StyleList(CurIdx).ScaleX = CfgIni.Read("printer", "SCALEX", 1.5)
+        '    StyleList(CurIdx).ScaleY = CfgIni.Read("printer", "SCALEY", 1.5)
+        '    StyleList(CurIdx).Printbg = CfgIni.Read("printer", "PRINTBG", True)
+        'End If
+
+        'Console.WriteLine("File Read  2: " + wat.ElapsedMilliseconds.ToString() + "ms")
+        'wat.Restart()
+
+        ''//필터파일추가한다.
+        'CFile = New System.IO.FileInfo(FILENAME.ToLower.Replace("ini", "filter"))
+        'If CFile.Exists = True Then  '//필터파일이있으며 불러오기한다.
+        '    Dim CfgIni As New MyINI2(CFile.FullName)
+        '    StyleList(CurIdx).Filter = CfgIni.Read("STYLE", "FILTER")
+        'End If
+
+        'Console.WriteLine("File Read  3: " + wat.ElapsedMilliseconds.ToString() + "ms")
+        'wat.Restart()
+
+        ''//XML테이블 데이터 동기화
+        'Dim Drow As PatternDS.TStyleRow = Common.PDS(CurIdx).TStyle.NewTStyleRow
+        'Drow.DESC = StyleList(CurIdx).Desc
+        'Drow.BACKIMG = StyleList(CurIdx).Backimg
+        'Drow.CANVASX = StyleList(CurIdx).CanvasX
+        'Drow.CANVASY = StyleList(CurIdx).CanvasY
+        'Drow.DUMMY = StyleList(CurIdx).Dummy
+        'Drow.DUMMYCNT = StyleList(CurIdx).DummyCnt
+        'Drow.DUMMYTYPE = StyleList(CurIdx).Dummytype
+        'Drow.DUMMMYX = StyleList(CurIdx).dummmyx
+        'Drow.DUMMMYY = StyleList(CurIdx).dummmyy
+        'Drow.LANDSCAPE = StyleList(CurIdx).LandScape
+        'Drow.MARGINX = StyleList(CurIdx).MarginX
+        'Drow.MARGINY = StyleList(CurIdx).MarginY
+        'Drow.PICSTYLE = StyleList(CurIdx).picstyle
+        'Drow.PRINTFONTOFFSET = StyleList(CurIdx).PrintFontOffset
+        'Drow.PRINTBG = StyleList(CurIdx).Printbg
+        'Drow.SCALEX = StyleList(CurIdx).ScaleX
+        'Drow.SCALEY = StyleList(CurIdx).ScaleY
+        'Drow.BAKX = StyleList(CurIdx).bakx
+        'Drow.BAKY = StyleList(CurIdx).baky
+        'Drow.BAKW = StyleList(CurIdx).bakw
+        'Drow.BAKH = StyleList(CurIdx).bakh
+        'Drow.VIEWIMAGE = StyleList(CurIdx).Viewimage
+        'Drow.FILE = StyleList(CurIdx).File
+        'Drow.FILTER = StyleList(CurIdx).Filter
+        'Common.PDS(CurIdx).TStyle.AddTStyleRow(Drow)  '//기본스타일 데이터 추가
+
+        'Console.WriteLine("File Read  4: " + wat.ElapsedMilliseconds.ToString() + "ms")
+        'wat.Restart()
+
+        ''//패턴정보 추가하기
+        'For i As Integer = 1 To StyleList(CurIdx).PATTERNTABLE.Rows.Count
+        '    Dim PRow As DataRow = StyleList(CurIdx).PATTERNTABLE.Rows(i - 1)
+        '    Dim Nrow As PatternDS.TPatternRow = Common.PDS(CurIdx).TPattern.NewTPatternRow
+        '    Nrow.NAME = PRow("설명")
+        '    Nrow.Val = PRow("값")
+        '    Common.PDS(CurIdx).TPattern.AddTPatternRow(Nrow)
+        'Next
+        'Common.PDS(CurIdx).TPattern.AcceptChanges()
+
+        'Console.WriteLine("File Read  5: " + wat.ElapsedMilliseconds.ToString() + "ms")
+        'wat.Stop()
+
+    End Sub
+
+    Public Function GetSpread(ByRef dv As DataView, ByVal row As Integer, ByVal col As Integer) As String
+        Try
+            If row >= dv.Count Then Return String.Empty
+            Return dv(row)(col).ToString.Trim
+            'Return Me.CustFP1_Sheet1.Cells(row, col).Value.ToString
+        Catch ex As Exception
+            Return ""
+        End Try
+    End Function
+    Public Function GetSpread1(ByRef dv As DataView, ByVal col As Integer) As String   'QR QR
+        Try
+            Return dv(col).ToString.Trim
+            'Return Me.CustFP1_Sheet1.Cells(row, col).Value.ToString
+        Catch ex As Exception
+            Return ""
+        End Try
+    End Function
+    Public Function GetSpread(ByRef dv As DataView, ByVal row As Integer, ByVal colname As String) As String
+        Try
+            If row >= dv.Count Then Return String.Empty
+            Return dv(row)(colname).ToString.Trim
+            'Return Me.CustFP1_Sheet1.Cells(row, col).Value.ToString
+        Catch ex As Exception
+            Return ""
+        End Try
+    End Function
+
+    Public Sub WLog(ByVal msg As String, ByVal fname As String)
+        '//로그를 기록합니다.
+        Dim FD As String = My.Application.Info.DirectoryPath & "\LOG"
+        If Not Directory.Exists(FD) Then Directory.CreateDirectory(FD)
+        Dim FS As FileStream = New FileStream(FD & fname, FileMode.Append)
+        Dim SW As StreamWriter = New StreamWriter(FS, System.Text.Encoding.Default)
+        SW.WriteLine(Now.TimeOfDay.ToString & ":" & msg)
+        SW.Flush()
+        SW.Close()
+        FS.Close()
+    End Sub
+    Public Sub WLog2(ByVal enable As Boolean, ByVal msg As String, ByVal fname As String)
+        '//로그를 기록합니다.
+        If Not enable Then Return
+        Dim FD As String = My.Application.Info.DirectoryPath & "\LOG"
+        If Not Directory.Exists(FD) Then Directory.CreateDirectory(FD)
+        Dim FS As FileStream = New FileStream(FD & fname, FileMode.Append)
+        Dim SW As StreamWriter = New StreamWriter(FS, System.Text.Encoding.Default)
+        SW.WriteLine(Now.TimeOfDay.ToString & ":" & msg)
+        SW.Flush()
+        SW.Close()
+        FS.Close()
+    End Sub
+    Public Sub Log(ByVal msg As String)
+        '//로그를 기록합니다.
+        Dim FD As String = My.Application.Info.DirectoryPath & "\LOG"
+        If Not Directory.Exists(FD) Then Directory.CreateDirectory(FD)
+        Dim FS As FileStream = New FileStream(FD & "\log.txt", FileMode.Append)
+        Dim SW As StreamWriter = New StreamWriter(FS, System.Text.Encoding.Default)
+        SW.WriteLine(Now.TimeOfDay.ToString & ":" & msg)
+        SW.Flush()
+        SW.Close()
+        FS.Close()
+    End Sub
+
+End Module
+Class XML
+    Public Shared Sub SavePatterN(ByVal index As Short, ByVal name As String, ByVal val As String)
+        '//변경을 시도하는데 데이터가 없다면 추가를 하게한다.
+        Dim Dr() As DataRow = Common.PDS(index).TPattern.Select("설명='" & name & "'")
+        If Dr.GetUpperBound(0) < 1 Then
+            Dim NDR As PatternDS.TPatternRow = Common.PDS(index).TPattern.NewTPatternRow
+            NDR.NAME = name
+            NDR.Val = val
+        Else
+            Dr(0)("값") = val
+        End If
+    End Sub
+    Public Shared Sub SaveChkBox(ByVal index As Short, ByVal name As String, ByVal val As Boolean)
+        '//변경을 시도하는데 데이터가 없다면 추가를 하게한다.
+        Dim Dr() As DataRow = Common.PDS(index).TCheckBox.Select("name='" & name & "'")
+        If Dr.GetUpperBound(0) < 1 Then
+            Dim NDR As PatternDS.TCheckBoxRow = Common.PDS(index).TCheckBox.NewTCheckBoxRow
+            NDR.Name = name
+            NDR.Val = val
+        Else
+            Dr(0)("val") = val
+        End If
+    End Sub
+
+End Class

Epole.fp13/ETCLOGIN.Designer.vb

@@ -0,0 +1,80 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class ETCLOGIN
+    Inherits System.Windows.Forms.Form
+
+    'Form은 Dispose를 재정의하여 구성 요소 목록을 정리합니다.
+    <System.Diagnostics.DebuggerNonUserCode()> _
+    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
+        Try
+            If disposing AndAlso components IsNot Nothing Then
+                components.Dispose()
+            End If
+        Finally
+            MyBase.Dispose(disposing)
+        End Try
+    End Sub
+    Friend WithEvents PasswordTextBox As System.Windows.Forms.TextBox
+    Friend WithEvents OK As System.Windows.Forms.Button
+    Friend WithEvents Cancel As System.Windows.Forms.Button
+
+    'Windows Form 디자이너에 필요합니다.
+    Private components As System.ComponentModel.IContainer
+
+    '참고: 다음 프로시저는 Windows Form 디자이너에 필요합니다.
+    '수정하려면 Windows Form 디자이너를 사용하십시오.  
+    '코드 편집기를 사용하여 수정하지 마십시오.
+    <System.Diagnostics.DebuggerStepThrough()> _
+    Private Sub InitializeComponent()
+        Me.PasswordTextBox = New System.Windows.Forms.TextBox
+        Me.OK = New System.Windows.Forms.Button
+        Me.Cancel = New System.Windows.Forms.Button
+        Me.SuspendLayout()
+        '
+        'PasswordTextBox
+        '
+        Me.PasswordTextBox.Location = New System.Drawing.Point(21, 12)
+        Me.PasswordTextBox.Name = "PasswordTextBox"
+        Me.PasswordTextBox.PasswordChar = Global.Microsoft.VisualBasic.ChrW(42)
+        Me.PasswordTextBox.Size = New System.Drawing.Size(220, 21)
+        Me.PasswordTextBox.TabIndex = 3
+        '
+        'OK
+        '
+        Me.OK.Location = New System.Drawing.Point(21, 39)
+        Me.OK.Name = "OK"
+        Me.OK.Size = New System.Drawing.Size(94, 23)
+        Me.OK.TabIndex = 4
+        Me.OK.Text = "확인(&O)"
+        '
+        'Cancel
+        '
+        Me.Cancel.DialogResult = System.Windows.Forms.DialogResult.Cancel
+        Me.Cancel.Location = New System.Drawing.Point(147, 39)
+        Me.Cancel.Name = "Cancel"
+        Me.Cancel.Size = New System.Drawing.Size(94, 23)
+        Me.Cancel.TabIndex = 5
+        Me.Cancel.Text = "취소(&C)"
+        '
+        'ETCLOGIN
+        '
+        Me.AcceptButton = Me.OK
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 12.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.CancelButton = Me.Cancel
+        Me.ClientSize = New System.Drawing.Size(258, 78)
+        Me.Controls.Add(Me.Cancel)
+        Me.Controls.Add(Me.OK)
+        Me.Controls.Add(Me.PasswordTextBox)
+        Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog
+        Me.MaximizeBox = False
+        Me.MinimizeBox = False
+        Me.Name = "ETCLOGIN"
+        Me.SizeGripStyle = System.Windows.Forms.SizeGripStyle.Hide
+        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterParent
+        Me.Text = "암호입력"
+        Me.ResumeLayout(False)
+        Me.PerformLayout()
+
+    End Sub
+
+End Class

Epole.fp13/ETCLOGIN.resx

@@ -0,0 +1,120 @@
+<?xml version="1.0" encoding="utf-8"?>
+<root>
+  <!-- 
+    Microsoft ResX Schema 
+    
+    Version 2.0
+    
+    The primary goals of this format is to allow a simple XML format 
+    that is mostly human readable. The generation and parsing of the 
+    various data types are done through the TypeConverter classes 
+    associated with the data types.
+    
+    Example:
+    
+    ... ado.net/XML headers & schema ...
+    <resheader name="resmimetype">text/microsoft-resx</resheader>
+    <resheader name="version">2.0</resheader>
+    <resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
+    <resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
+    <data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
+    <data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
+    <data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
+        <value>[base64 mime encoded serialized .NET Framework object]</value>
+    </data>
+    <data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+        <value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
+        <comment>This is a comment</comment>
+    </data>
+                
+    There are any number of "resheader" rows that contain simple 
+    name/value pairs.
+    
+    Each data row contains a name, and value. The row also contains a 
+    type or mimetype. Type corresponds to a .NET class that support 
+    text/value conversion through the TypeConverter architecture. 
+    Classes that don't support this are serialized and stored with the 
+    mimetype set.
+    
+    The mimetype is used for serialized objects, and tells the 
+    ResXResourceReader how to depersist the object. This is currently not 
+    extensible. For a given mimetype the value must be set accordingly:
+    
+    Note - application/x-microsoft.net.object.binary.base64 is the format 
+    that the ResXResourceWriter will generate, however the reader can 
+    read any of the formats listed below.
+    
+    mimetype: application/x-microsoft.net.object.binary.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
+            : and then encoded with base64 encoding.
+    
+    mimetype: application/x-microsoft.net.object.soap.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Soap.SoapFormatter
+            : and then encoded with base64 encoding.
+
+    mimetype: application/x-microsoft.net.object.bytearray.base64
+    value   : The object must be serialized into a byte array 
+            : using a System.ComponentModel.TypeConverter
+            : and then encoded with base64 encoding.
+    -->
+  <xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
+    <xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
+    <xsd:element name="root" msdata:IsDataSet="true">
+      <xsd:complexType>
+        <xsd:choice maxOccurs="unbounded">
+          <xsd:element name="metadata">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" />
+              </xsd:sequence>
+              <xsd:attribute name="name" use="required" type="xsd:string" />
+              <xsd:attribute name="type" type="xsd:string" />
+              <xsd:attribute name="mimetype" type="xsd:string" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="assembly">
+            <xsd:complexType>
+              <xsd:attribute name="alias" type="xsd:string" />
+              <xsd:attribute name="name" type="xsd:string" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="data">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+                <xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
+              <xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
+              <xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="resheader">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" />
+            </xsd:complexType>
+          </xsd:element>
+        </xsd:choice>
+      </xsd:complexType>
+    </xsd:element>
+  </xsd:schema>
+  <resheader name="resmimetype">
+    <value>text/microsoft-resx</value>
+  </resheader>
+  <resheader name="version">
+    <value>2.0</value>
+  </resheader>
+  <resheader name="reader">
+    <value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <resheader name="writer">
+    <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+</root>

Epole.fp13/ETCLOGIN.vb

@@ -0,0 +1,51 @@
+Public Class ETCLOGIN
+
+    ' TODO: 제공된 사용자 이름과 암호를 사용하여 사용자 지정 인증을 수행하는 코드를 삽입합니다
+    ' (자세한 내용은 http://go.microsoft.com/fwlink/?LinkId=35339 참조).  
+    ' 그러면 사용자 지정 보안 주체가 현재 스레드의 보안 주체에 다음과 같이 첨부될 수 있습니다. 
+    '     My.User.CurrentPrincipal = CustomPrincipal
+    ' 여기서 CustomPrincipal은 인증을 수행하는 데 사용되는 IPrincipal이 구현된 것입니다. 
+    ' 나중에 My.User는 CustomPrincipal 개체에 캡슐화된 사용자 이름, 표시 이름 등의
+    ' ID 정보를 반환합니다.
+    Public PASS As String
+
+    Private Sub OK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK.Click
+        If Me.PasswordTextBox.Text = "gorhkd" & Format(Now, "yyyyMMdd") Then
+            Me.DialogResult = System.Windows.Forms.DialogResult.OK
+            Me.Close()
+        Else
+            MsgBox("암호가 일치하지 않습니다", MsgBoxStyle.Critical, "확인")
+            Me.PasswordTextBox.Focus()
+            Me.PasswordTextBox.SelectAll()
+        End If
+    End Sub
+
+    Private Sub Cancel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Cancel.Click
+        Me.DialogResult = System.Windows.Forms.DialogResult.Cancel
+        Me.Close()
+    End Sub
+
+    Private Sub PasswordTextBox_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles PasswordTextBox.KeyDown
+        If e.KeyCode = Keys.Enter Then
+
+            '  MsgBox("gorhkd" & Format(Now, "yyyyMMdd"))
+            If Me.PasswordTextBox.Text = "gorhkd" & Format(Now, "yyyyMMdd") Then
+
+                Me.DialogResult = System.Windows.Forms.DialogResult.OK
+                Me.Close()
+            Else
+                MsgBox("암호가 일치하지 않습니다", MsgBoxStyle.Critical, "확인")
+                Me.PasswordTextBox.Focus()
+                Me.PasswordTextBox.SelectAll()
+            End If
+        End If
+    End Sub
+
+    Private Sub PasswordTextBox_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PasswordTextBox.TextChanged
+
+    End Sub
+
+    Private Sub ETCLOGIN_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
+
+    End Sub
+End Class

Epole.fp13/EnDec.vb

@@ -0,0 +1,137 @@
+Imports System.Security.Cryptography
+
+Public Class EnDec
+
+    Private TripleDes As New TripleDESCryptoServiceProvider
+    Sub New(ByVal key As String)
+        ' Initialize the crypto provider.
+        TripleDes.Key = TruncateHash(key, TripleDes.KeySize \ 8)
+        TripleDes.IV = TruncateHash("", TripleDes.BlockSize \ 8)
+    End Sub
+
+    Private Function TruncateHash( _
+        ByVal key As String, _
+        ByVal length As Integer) _
+        As Byte()
+
+        Dim sha1 As New SHA1CryptoServiceProvider
+
+        ' Hash the key.
+        Dim keyBytes() As Byte = _
+            System.Text.Encoding.Unicode.GetBytes(key)
+        Dim hash() As Byte = sha1.ComputeHash(keyBytes)
+
+        ' Truncate or pad the hash.
+        ReDim Preserve hash(length - 1)
+        Return hash
+    End Function
+
+    ''' <summary>
+    ''' 문자열의 암호화
+    ''' </summary>
+    ''' <param name="plaintext"></param>
+    ''' <returns></returns>
+    ''' <remarks></remarks>
+    Public Function EncryptData( _
+        ByVal plaintext As String) _
+        As String
+
+        ' Convert the plaintext string to a byte array.
+        Dim plaintextBytes() As Byte = _
+            System.Text.Encoding.Unicode.GetBytes(plaintext)
+
+        ' Create the stream.
+        Dim ms As New System.IO.MemoryStream
+        ' Create the encoder to write to the stream.
+        Dim encStream As New CryptoStream(ms, _
+            TripleDes.CreateEncryptor(), _
+            System.Security.Cryptography.CryptoStreamMode.Write)
+
+        ' Use the crypto stream to write the byte array to the stream.
+        encStream.Write(plaintextBytes, 0, plaintextBytes.Length)
+        encStream.FlushFinalBlock()
+
+        ' Convert the encrypted stream to a printable string.
+        Return Convert.ToBase64String(ms.ToArray)
+    End Function
+
+    ''' <summary>
+    ''' 복호화'
+    ''' </summary>
+    ''' <param name="encryptedtext"></param>
+    ''' <returns></returns>
+    ''' <remarks></remarks>
+    Public Function DecryptData( _
+    ByVal encryptedtext As String) _
+    As String
+
+        ' Convert the encrypted text string to a byte array.
+        Dim encryptedBytes() As Byte = Convert.FromBase64String(encryptedtext)
+
+        ' Create the stream.
+        Dim ms As New System.IO.MemoryStream
+        ' Create the decoder to write to the stream.
+        Dim decStream As New CryptoStream(ms, _
+            TripleDes.CreateDecryptor(), _
+            System.Security.Cryptography.CryptoStreamMode.Write)
+
+        ' Use the crypto stream to write the byte array to the stream.
+        decStream.Write(encryptedBytes, 0, encryptedBytes.Length)
+        decStream.FlushFinalBlock()
+
+        ' Convert the plaintext stream to a string.
+        Return System.Text.Encoding.Unicode.GetString(ms.ToArray, 0, ms.Length)
+    End Function
+
+    ''' <summary>
+    ''' 파일로부터 문자열을 읽어옵니다.
+    ''' </summary>
+    ''' <param name="Filename"></param>
+    ''' <remarks></remarks>
+    Public Function Read_STring(ByVal Filename As String) As String
+        Dim FI As New System.IO.FileInfo(Filename)
+        If FI.Exists = False Then
+            MsgBox("필수파일이 존재하지않습니다", MsgBoxStyle.Critical, "확인")
+            Return ""
+        End If
+
+        Dim FS As New System.IO.FileStream(FI.FullName, IO.FileMode.Open)
+        Dim SR As New System.IO.StreamReader(FS, System.Text.Encoding.Default)
+
+        Dim cipherText As String = SR.ReadToEnd
+        SR.Close()
+        FS.Close()
+
+        ' DecryptData throws if the wrong password is used.
+        Try
+            Dim plainText As String = DecryptData(cipherText)
+            Return plainText
+            'MsgBox("해독값은? " & plainText)
+        Catch ex As System.Security.Cryptography.CryptographicException
+            Return ""
+            MsgBox("암호화키가 일치하지않거나 기타 오류입니다")
+        End Try
+
+    End Function
+
+    ''' <summary>
+    ''' 파일에 해당 문자열을 기록합니다.
+    ''' </summary>
+    ''' <param name="Filename"></param>
+    ''' <param name="Contents"></param>
+    ''' <remarks></remarks>
+    Public Sub Write_String(ByVal Filename As String, ByVal Contents As String)
+        Dim cipherText As String = EncryptData(Contents)
+
+        Dim FI As New System.IO.FileInfo(Filename)
+        Dim FS As New System.IO.FileStream(FI.FullName, IO.FileMode.Create)
+        Dim SW As New System.IO.StreamWriter(FS, System.Text.Encoding.Default)
+        'MsgBox("암호화된값은? " & cipherText)
+        SW.Write(cipherText)
+        SW.Flush()
+        SW.Close()
+        FS.Close()
+    End Sub
+
+
+End Class

Epole.fp13/Form_Work.Designer.vb

@@ -0,0 +1,66 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class Form_Work
+    Inherits System.Windows.Forms.Form
+
+    'Form은 Dispose를 재정의하여 구성 요소 목록을 정리합니다.
+    <System.Diagnostics.DebuggerNonUserCode()> _
+    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
+        Try
+            If disposing AndAlso components IsNot Nothing Then
+                components.Dispose()
+            End If
+        Finally
+            MyBase.Dispose(disposing)
+        End Try
+    End Sub
+
+    'Windows Form 디자이너에 필요합니다.
+    Private components As System.ComponentModel.IContainer
+
+    '참고: 다음 프로시저는 Windows Form 디자이너에 필요합니다.
+    '수정하려면 Windows Form 디자이너를 사용하십시오.  
+    '코드 편집기를 사용하여 수정하지 마십시오.
+    <System.Diagnostics.DebuggerStepThrough()> _
+    Private Sub InitializeComponent()
+        Me.ProgressBar1 = New System.Windows.Forms.ProgressBar
+        Me.Label1 = New System.Windows.Forms.Label
+        Me.SuspendLayout()
+        '
+        'ProgressBar1
+        '
+        Me.ProgressBar1.Location = New System.Drawing.Point(13, 43)
+        Me.ProgressBar1.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
+        Me.ProgressBar1.Name = "ProgressBar1"
+        Me.ProgressBar1.Size = New System.Drawing.Size(388, 16)
+        Me.ProgressBar1.TabIndex = 0
+        '
+        'Label1
+        '
+        Me.Label1.Location = New System.Drawing.Point(13, 10)
+        Me.Label1.Name = "Label1"
+        Me.Label1.Size = New System.Drawing.Size(388, 26)
+        Me.Label1.TabIndex = 1
+        Me.Label1.Text = "..."
+        Me.Label1.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
+        '
+        'Form_Work
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 15.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.ClientSize = New System.Drawing.Size(413, 68)
+        Me.ControlBox = False
+        Me.Controls.Add(Me.Label1)
+        Me.Controls.Add(Me.ProgressBar1)
+        Me.Font = New System.Drawing.Font("맑은 고딕", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
+        Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog
+        Me.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
+        Me.Name = "Form_Work"
+        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
+        Me.Text = "잠시만 기다려주세요."
+        Me.TopMost = True
+        Me.ResumeLayout(False)
+
+    End Sub
+    Friend WithEvents ProgressBar1 As System.Windows.Forms.ProgressBar
+    Friend WithEvents Label1 As System.Windows.Forms.Label
+End Class

Epole.fp13/Form_Work.resx

@@ -0,0 +1,120 @@
+<?xml version="1.0" encoding="utf-8"?>
+<root>
+  <!-- 
+    Microsoft ResX Schema 
+    
+    Version 2.0
+    
+    The primary goals of this format is to allow a simple XML format 
+    that is mostly human readable. The generation and parsing of the 
+    various data types are done through the TypeConverter classes 
+    associated with the data types.
+    
+    Example:
+    
+    ... ado.net/XML headers & schema ...
+    <resheader name="resmimetype">text/microsoft-resx</resheader>
+    <resheader name="version">2.0</resheader>
+    <resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
+    <resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
+    <data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
+    <data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
+    <data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
+        <value>[base64 mime encoded serialized .NET Framework object]</value>
+    </data>
+    <data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+        <value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
+        <comment>This is a comment</comment>
+    </data>
+                
+    There are any number of "resheader" rows that contain simple 
+    name/value pairs.
+    
+    Each data row contains a name, and value. The row also contains a 
+    type or mimetype. Type corresponds to a .NET class that support 
+    text/value conversion through the TypeConverter architecture. 
+    Classes that don't support this are serialized and stored with the 
+    mimetype set.
+    
+    The mimetype is used for serialized objects, and tells the 
+    ResXResourceReader how to depersist the object. This is currently not 
+    extensible. For a given mimetype the value must be set accordingly:
+    
+    Note - application/x-microsoft.net.object.binary.base64 is the format 
+    that the ResXResourceWriter will generate, however the reader can 
+    read any of the formats listed below.
+    
+    mimetype: application/x-microsoft.net.object.binary.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
+            : and then encoded with base64 encoding.
+    
+    mimetype: application/x-microsoft.net.object.soap.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Soap.SoapFormatter
+            : and then encoded with base64 encoding.
+
+    mimetype: application/x-microsoft.net.object.bytearray.base64
+    value   : The object must be serialized into a byte array 
+            : using a System.ComponentModel.TypeConverter
+            : and then encoded with base64 encoding.
+    -->
+  <xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
+    <xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
+    <xsd:element name="root" msdata:IsDataSet="true">
+      <xsd:complexType>
+        <xsd:choice maxOccurs="unbounded">
+          <xsd:element name="metadata">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" />
+              </xsd:sequence>
+              <xsd:attribute name="name" use="required" type="xsd:string" />
+              <xsd:attribute name="type" type="xsd:string" />
+              <xsd:attribute name="mimetype" type="xsd:string" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="assembly">
+            <xsd:complexType>
+              <xsd:attribute name="alias" type="xsd:string" />
+              <xsd:attribute name="name" type="xsd:string" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="data">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+                <xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
+              <xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
+              <xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="resheader">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" />
+            </xsd:complexType>
+          </xsd:element>
+        </xsd:choice>
+      </xsd:complexType>
+    </xsd:element>
+  </xsd:schema>
+  <resheader name="resmimetype">
+    <value>text/microsoft-resx</value>
+  </resheader>
+  <resheader name="version">
+    <value>2.0</value>
+  </resheader>
+  <resheader name="reader">
+    <value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <resheader name="writer">
+    <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+</root>

Epole.fp13/Form_Work.vb

@@ -0,0 +1,21 @@
+Public Class Form_Work
+
+    Public Sub Msg(ByVal t As String)
+        Me.Label1.Text = t
+        My.Application.DoEvents()
+    End Sub
+
+    Public Property pval() As Integer
+        Get
+            Return Me.ProgressBar1.Value
+        End Get
+        Set(ByVal value As Integer)
+            If value < Me.ProgressBar1.Maximum Then Me.ProgressBar1.Value = value
+        End Set
+    End Property
+
+    Private Sub Form_Work_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
+        Me.Show()
+        My.Application.DoEvents()
+    End Sub
+End Class

Epole.fp13/Frm_Main.Designer.vb

@@ -0,0 +1,970 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class Frm_Main
+    Inherits System.Windows.Forms.Form
+
+    'Form은 Dispose를 재정의하여 구성 요소 목록을 정리합니다.
+    <System.Diagnostics.DebuggerNonUserCode()> _
+    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
+        If disposing AndAlso components IsNot Nothing Then
+            components.Dispose()
+        End If
+        MyBase.Dispose(disposing)
+    End Sub
+
+    'Windows Form 디자이너에 필요합니다.
+    Private components As System.ComponentModel.IContainer
+
+    '참고: 다음 프로시저는 Windows Form 디자이너에 필요합니다.
+    '수정하려면 Windows Form 디자이너를 사용하십시오.  
+    '코드 편집기를 사용하여 수정하지 마십시오.
+    <System.Diagnostics.DebuggerStepThrough()> _
+    Private Sub InitializeComponent()
+        Me.components = New System.ComponentModel.Container()
+        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Frm_Main))
+        Dim CheckBoxCellType1 As FarPoint.Win.Spread.CellType.CheckBoxCellType = New FarPoint.Win.Spread.CellType.CheckBoxCellType()
+        Dim ButtonCellType1 As FarPoint.Win.Spread.CellType.ButtonCellType = New FarPoint.Win.Spread.CellType.ButtonCellType()
+        Dim ButtonCellType2 As FarPoint.Win.Spread.CellType.ButtonCellType = New FarPoint.Win.Spread.CellType.ButtonCellType()
+        Dim DateTimeCellType1 As FarPoint.Win.Spread.CellType.DateTimeCellType = New FarPoint.Win.Spread.CellType.DateTimeCellType()
+        Dim TextCellType1 As FarPoint.Win.Spread.CellType.TextCellType = New FarPoint.Win.Spread.CellType.TextCellType()
+        Dim NumberCellType1 As FarPoint.Win.Spread.CellType.NumberCellType = New FarPoint.Win.Spread.CellType.NumberCellType()
+        Dim CurrencyCellType1 As FarPoint.Win.Spread.CellType.CurrencyCellType = New FarPoint.Win.Spread.CellType.CurrencyCellType()
+        Dim CurrencyCellType2 As FarPoint.Win.Spread.CellType.CurrencyCellType = New FarPoint.Win.Spread.CellType.CurrencyCellType()
+        Dim ComboBoxCellType1 As FarPoint.Win.Spread.CellType.ComboBoxCellType = New FarPoint.Win.Spread.CellType.ComboBoxCellType()
+        Me.PRB1 = New System.Windows.Forms.ToolStripProgressBar()
+        Me.BindingNavigatorCountItem = New System.Windows.Forms.ToolStripLabel()
+        Me.BindingNavigatorMoveFirstItem = New System.Windows.Forms.ToolStripButton()
+        Me.BindingNavigatorMoveLastItem = New System.Windows.Forms.ToolStripButton()
+        Me.BindingNavigatorMoveNextItem = New System.Windows.Forms.ToolStripButton()
+        Me.BindingNavigatorMovePreviousItem = New System.Windows.Forms.ToolStripButton()
+        Me.BindingNavigatorPositionItem = New System.Windows.Forms.ToolStripTextBox()
+        Me.BindingNavigatorSeparator = New System.Windows.Forms.ToolStripSeparator()
+        Me.BindingNavigatorSeparator1 = New System.Windows.Forms.ToolStripSeparator()
+        Me.BindingNavigatorSeparator2 = New System.Windows.Forms.ToolStripSeparator()
+        Me.BindingNavigatorDeleteItem = New System.Windows.Forms.ToolStripButton()
+        Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator()
+        Me.bt_commit = New System.Windows.Forms.ToolStripButton()
+        Me.bt_cancel = New System.Windows.Forms.ToolStripButton()
+        Me.ToolStripSeparator2 = New System.Windows.Forms.ToolStripSeparator()
+        Me.ToolStripButton1 = New System.Windows.Forms.ToolStripButton()
+        Me.ToolTip1 = New System.Windows.Forms.ToolTip(Me.components)
+        Me.StatusStrip1 = New System.Windows.Forms.StatusStrip()
+        Me.lb_change = New System.Windows.Forms.ToolStripStatusLabel()
+        Me.lb_msg = New System.Windows.Forms.ToolStripStatusLabel()
+        Me.bn = New System.Windows.Forms.BindingNavigator(Me.components)
+        Me.bs = New System.Windows.Forms.BindingSource(Me.components)
+        Me.IreaDataSet1 = New EpoleNet.ireaDataSet()
+        Me.ToolStripLabel1 = New System.Windows.Forms.ToolStripLabel()
+        Me.ToolStripButton2 = New System.Windows.Forms.ToolStripButton()
+        Me.ToolStripButton3 = New System.Windows.Forms.ToolStripButton()
+        Me.ToolStripSeparator3 = New System.Windows.Forms.ToolStripSeparator()
+        Me.ToolStripTextBox1 = New System.Windows.Forms.ToolStripTextBox()
+        Me.ToolStripSeparator4 = New System.Windows.Forms.ToolStripSeparator()
+        Me.ToolStripButton4 = New System.Windows.Forms.ToolStripButton()
+        Me.ToolStripButton5 = New System.Windows.Forms.ToolStripButton()
+        Me.ToolStripSeparator5 = New System.Windows.Forms.ToolStripSeparator()
+        Me.ToolStripButton6 = New System.Windows.Forms.ToolStripButton()
+        Me.ToolStripSeparator6 = New System.Windows.Forms.ToolStripSeparator()
+        Me.ToolStripButton7 = New System.Windows.Forms.ToolStripButton()
+        Me.ToolStripButton8 = New System.Windows.Forms.ToolStripButton()
+        Me.ToolStripSeparator7 = New System.Windows.Forms.ToolStripSeparator()
+        Me.bt_close = New System.Windows.Forms.ToolStripButton()
+        Me.ToolStrip1 = New System.Windows.Forms.ToolStrip()
+        Me.bt_find = New System.Windows.Forms.ToolStripButton()
+        Me.ToolStripSeparator8 = New System.Windows.Forms.ToolStripSeparator()
+        Me.BT1 = New System.Windows.Forms.ToolStripDropDownButton()
+        Me.BT11 = New System.Windows.Forms.ToolStripMenuItem()
+        Me.BT12 = New System.Windows.Forms.ToolStripMenuItem()
+        Me.BT2 = New System.Windows.Forms.ToolStripDropDownButton()
+        Me.ToolStripMenuItem3 = New System.Windows.Forms.ToolStripMenuItem()
+        Me.ToolStripMenuItem6 = New System.Windows.Forms.ToolStripMenuItem()
+        Me.ToolStripMenuItem5 = New System.Windows.Forms.ToolStripMenuItem()
+        Me.ToolStripMenuItem4 = New System.Windows.Forms.ToolStripMenuItem()
+        Me.bt5 = New System.Windows.Forms.ToolStripButton()
+        Me.bt6 = New System.Windows.Forms.ToolStripButton()
+        Me.ContextMenuStrip1 = New System.Windows.Forms.ContextMenuStrip(Me.components)
+        Me.bt_savecolsize = New System.Windows.Forms.ToolStripMenuItem()
+        Me.MenuStrip1 = New System.Windows.Forms.MenuStrip()
+        Me.bt_programs = New System.Windows.Forms.ToolStripMenuItem()
+        Me.mbt_config = New System.Windows.Forms.ToolStripMenuItem()
+        Me.mbt_writeauth = New System.Windows.Forms.ToolStripMenuItem()
+        Me.ToolStripMenuItem1 = New System.Windows.Forms.ToolStripSeparator()
+        Me.mb_exit = New System.Windows.Forms.ToolStripMenuItem()
+        Me.bt_others = New System.Windows.Forms.ToolStripMenuItem()
+        Me.mbt_oldttonew = New System.Windows.Forms.ToolStripMenuItem()
+        Me.mbt_xlssync = New System.Windows.Forms.ToolStripMenuItem()
+        Me.bt_help = New System.Windows.Forms.ToolStripMenuItem()
+        Me.bt_aa = New System.Windows.Forms.ToolStripMenuItem()
+        Me.ToolStripMenuItem2 = New System.Windows.Forms.ToolStripSeparator()
+        Me.bt_howto = New System.Windows.Forms.ToolStripMenuItem()
+        Me.view1 = New NewFp()
+        Me.view1_Sheet1 = New FarPoint.Win.Spread.SheetView()
+        Me.TA_Main = New EpoleNet.ireaDataSetTableAdapters.MainTableTableAdapter()
+        Me.TA_JUNJU = New EpoleNet.ireaDataSetTableAdapters.jjutableTableAdapter()
+        Me.TA_ETC = New EpoleNet.ireaDataSetTableAdapters.EtcTableTableAdapter()
+        Me.TA_JIJUNG = New EpoleNet.ireaDataSetTableAdapters.jjungtableTableAdapter()
+        Me.TA_Cable2 = New EpoleNet.ireaDataSetTableAdapters.Detail_Cable2TableAdapter()
+        Me.TA_CableLabel = New EpoleNet.ireaDataSetTableAdapters.Detail_CableLabelTableAdapter()
+        Me.TA_Cable = New EpoleNet.ireaDataSetTableAdapters.Detail_CableTableAdapter()
+        Me.TA_Deung = New EpoleNet.ireaDataSetTableAdapters.Detail_DeungTableAdapter()
+        Me.TA_Karo = New EpoleNet.ireaDataSetTableAdapters.Detail_karoTableAdapter()
+        Me.TA_Kiki = New EpoleNet.ireaDataSetTableAdapters.Detail_kikiTableAdapter()
+        Me.StatusStrip1.SuspendLayout()
+        CType(Me.bn, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.bn.SuspendLayout()
+        CType(Me.bs, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.IreaDataSet1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.ToolStrip1.SuspendLayout()
+        Me.ContextMenuStrip1.SuspendLayout()
+        Me.MenuStrip1.SuspendLayout()
+        CType(Me.view1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.view1_Sheet1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SuspendLayout()
+        '
+        'PRB1
+        '
+        Me.PRB1.Name = "PRB1"
+        Me.PRB1.Size = New System.Drawing.Size(100, 16)
+        '
+        'BindingNavigatorCountItem
+        '
+        Me.BindingNavigatorCountItem.Enabled = False
+        Me.BindingNavigatorCountItem.Name = "BindingNavigatorCountItem"
+        Me.BindingNavigatorCountItem.Size = New System.Drawing.Size(29, 36)
+        Me.BindingNavigatorCountItem.Text = "/0"
+        Me.BindingNavigatorCountItem.ToolTipText = "전체 항목 수"
+        '
+        'BindingNavigatorMoveFirstItem
+        '
+        Me.BindingNavigatorMoveFirstItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
+        Me.BindingNavigatorMoveFirstItem.Enabled = False
+        Me.BindingNavigatorMoveFirstItem.Name = "BindingNavigatorMoveFirstItem"
+        Me.BindingNavigatorMoveFirstItem.RightToLeftAutoMirrorImage = True
+        Me.BindingNavigatorMoveFirstItem.Size = New System.Drawing.Size(23, 36)
+        Me.BindingNavigatorMoveFirstItem.Text = "처음으로 이동"
+        '
+        'BindingNavigatorMoveLastItem
+        '
+        Me.BindingNavigatorMoveLastItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
+        Me.BindingNavigatorMoveLastItem.Enabled = False
+        Me.BindingNavigatorMoveLastItem.Name = "BindingNavigatorMoveLastItem"
+        Me.BindingNavigatorMoveLastItem.RightToLeftAutoMirrorImage = True
+        Me.BindingNavigatorMoveLastItem.Size = New System.Drawing.Size(23, 36)
+        Me.BindingNavigatorMoveLastItem.Text = "마지막으로 이동"
+        '
+        'BindingNavigatorMoveNextItem
+        '
+        Me.BindingNavigatorMoveNextItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
+        Me.BindingNavigatorMoveNextItem.Enabled = False
+        Me.BindingNavigatorMoveNextItem.Name = "BindingNavigatorMoveNextItem"
+        Me.BindingNavigatorMoveNextItem.RightToLeftAutoMirrorImage = True
+        Me.BindingNavigatorMoveNextItem.Size = New System.Drawing.Size(23, 36)
+        Me.BindingNavigatorMoveNextItem.Text = "다음으로 이동"
+        '
+        'BindingNavigatorMovePreviousItem
+        '
+        Me.BindingNavigatorMovePreviousItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
+        Me.BindingNavigatorMovePreviousItem.Enabled = False
+        Me.BindingNavigatorMovePreviousItem.Image = CType(resources.GetObject("BindingNavigatorMovePreviousItem.Image"), System.Drawing.Image)
+        Me.BindingNavigatorMovePreviousItem.Name = "BindingNavigatorMovePreviousItem"
+        Me.BindingNavigatorMovePreviousItem.RightToLeftAutoMirrorImage = True
+        Me.BindingNavigatorMovePreviousItem.Size = New System.Drawing.Size(36, 36)
+        Me.BindingNavigatorMovePreviousItem.Text = "이전으로 이동"
+        '
+        'BindingNavigatorPositionItem
+        '
+        Me.BindingNavigatorPositionItem.AccessibleName = "위치"
+        Me.BindingNavigatorPositionItem.AutoSize = False
+        Me.BindingNavigatorPositionItem.Enabled = False
+        Me.BindingNavigatorPositionItem.Name = "BindingNavigatorPositionItem"
+        Me.BindingNavigatorPositionItem.Size = New System.Drawing.Size(25, 21)
+        Me.BindingNavigatorPositionItem.Text = "0"
+        Me.BindingNavigatorPositionItem.TextBoxTextAlign = System.Windows.Forms.HorizontalAlignment.Center
+        Me.BindingNavigatorPositionItem.ToolTipText = "현재 위치"
+        '
+        'BindingNavigatorSeparator
+        '
+        Me.BindingNavigatorSeparator.Name = "BindingNavigatorSeparator"
+        Me.BindingNavigatorSeparator.Size = New System.Drawing.Size(6, 39)
+        '
+        'BindingNavigatorSeparator1
+        '
+        Me.BindingNavigatorSeparator1.Name = "BindingNavigatorSeparator1"
+        Me.BindingNavigatorSeparator1.Size = New System.Drawing.Size(6, 39)
+        '
+        'BindingNavigatorSeparator2
+        '
+        Me.BindingNavigatorSeparator2.Name = "BindingNavigatorSeparator2"
+        Me.BindingNavigatorSeparator2.Size = New System.Drawing.Size(6, 39)
+        '
+        'BindingNavigatorDeleteItem
+        '
+        Me.BindingNavigatorDeleteItem.Name = "BindingNavigatorDeleteItem"
+        Me.BindingNavigatorDeleteItem.RightToLeftAutoMirrorImage = True
+        Me.BindingNavigatorDeleteItem.Size = New System.Drawing.Size(95, 36)
+        Me.BindingNavigatorDeleteItem.Text = "줄삭제(&D)"
+        Me.BindingNavigatorDeleteItem.ToolTipText = "현재 선퇙된 줄을 삭제합니다.(이것은 SHIFT+DELETE)와 같습니다"
+        '
+        'ToolStripSeparator1
+        '
+        Me.ToolStripSeparator1.Name = "ToolStripSeparator1"
+        Me.ToolStripSeparator1.Size = New System.Drawing.Size(6, 39)
+        '
+        'bt_commit
+        '
+        Me.bt_commit.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.bt_commit.Name = "bt_commit"
+        Me.bt_commit.Size = New System.Drawing.Size(99, 36)
+        Me.bt_commit.Text = "변경내용저장(&S)"
+        Me.bt_commit.ToolTipText = "변경된 내용을 데이터베이스에 저장합니다"
+        '
+        'bt_cancel
+        '
+        Me.bt_cancel.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.bt_cancel.Name = "bt_cancel"
+        Me.bt_cancel.Size = New System.Drawing.Size(100, 36)
+        Me.bt_cancel.Text = "변경내용취소(&C)"
+        Me.bt_cancel.ToolTipText = "변경된 내용을 모두 취소합니다"
+        '
+        'ToolStripSeparator2
+        '
+        Me.ToolStripSeparator2.Name = "ToolStripSeparator2"
+        Me.ToolStripSeparator2.Size = New System.Drawing.Size(6, 39)
+        '
+        'ToolStripButton1
+        '
+        Me.ToolStripButton1.BackColor = System.Drawing.Color.Transparent
+        Me.ToolStripButton1.Checked = True
+        Me.ToolStripButton1.CheckState = System.Windows.Forms.CheckState.Checked
+        Me.ToolStripButton1.Font = New System.Drawing.Font("굴림", 9.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
+        Me.ToolStripButton1.Image = Global.EpoleNet.My.Resources.Resources.stop_32
+        Me.ToolStripButton1.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.ToolStripButton1.Name = "ToolStripButton1"
+        Me.ToolStripButton1.Size = New System.Drawing.Size(88, 36)
+        Me.ToolStripButton1.Text = "닫기(&X)"
+        Me.ToolStripButton1.ToolTipText = "현재 창을 닫습니다"
+        '
+        'ToolTip1
+        '
+        Me.ToolTip1.ToolTipIcon = System.Windows.Forms.ToolTipIcon.Info
+        Me.ToolTip1.ToolTipTitle = "간편도움말"
+        '
+        'StatusStrip1
+        '
+        Me.StatusStrip1.Font = New System.Drawing.Font("굴림", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
+        Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.lb_change, Me.lb_msg})
+        Me.StatusStrip1.Location = New System.Drawing.Point(0, 580)
+        Me.StatusStrip1.Name = "StatusStrip1"
+        Me.StatusStrip1.Size = New System.Drawing.Size(1277, 22)
+        Me.StatusStrip1.TabIndex = 15
+        Me.StatusStrip1.Text = "StatusStrip1"
+        '
+        'lb_change
+        '
+        Me.lb_change.Name = "lb_change"
+        Me.lb_change.Size = New System.Drawing.Size(17, 17)
+        Me.lb_change.Text = "ㅁ"
+        '
+        'lb_msg
+        '
+        Me.lb_msg.Name = "lb_msg"
+        Me.lb_msg.Size = New System.Drawing.Size(29, 17)
+        Me.lb_msg.Text = "알림"
+        '
+        'bn
+        '
+        Me.bn.AddNewItem = Nothing
+        Me.bn.BindingSource = Me.bs
+        Me.bn.CountItem = Me.ToolStripLabel1
+        Me.bn.DeleteItem = Nothing
+        Me.bn.Dock = System.Windows.Forms.DockStyle.Bottom
+        Me.bn.Font = New System.Drawing.Font("굴림", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
+        Me.bn.ImageScalingSize = New System.Drawing.Size(32, 32)
+        Me.bn.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripButton2, Me.ToolStripButton3, Me.ToolStripSeparator3, Me.ToolStripTextBox1, Me.ToolStripLabel1, Me.ToolStripSeparator4, Me.ToolStripButton4, Me.ToolStripButton5, Me.ToolStripSeparator5, Me.ToolStripButton6, Me.ToolStripSeparator6, Me.ToolStripButton7, Me.ToolStripButton8, Me.ToolStripSeparator7, Me.bt_close})
+        Me.bn.Location = New System.Drawing.Point(0, 541)
+        Me.bn.MoveFirstItem = Me.ToolStripButton2
+        Me.bn.MoveLastItem = Me.ToolStripButton5
+        Me.bn.MoveNextItem = Me.ToolStripButton4
+        Me.bn.MovePreviousItem = Me.ToolStripButton3
+        Me.bn.Name = "bn"
+        Me.bn.PositionItem = Me.ToolStripTextBox1
+        Me.bn.Size = New System.Drawing.Size(1277, 39)
+        Me.bn.TabIndex = 17
+        Me.bn.Text = "BindingNavigator1"
+        '
+        'bs
+        '
+        Me.bs.DataMember = "maintable"
+        Me.bs.DataSource = Me.IreaDataSet1
+        Me.bs.Filter = ""
+        Me.bs.Sort = "날짜 DESC,id asc"
+        '
+        'IreaDataSet1
+        '
+        Me.IreaDataSet1.DataSetName = "ireaDataSet"
+        Me.IreaDataSet1.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema
+        '
+        'ToolStripLabel1
+        '
+        Me.ToolStripLabel1.Name = "ToolStripLabel1"
+        Me.ToolStripLabel1.Size = New System.Drawing.Size(29, 36)
+        Me.ToolStripLabel1.Text = "/{0}"
+        Me.ToolStripLabel1.ToolTipText = "전체 항목 수"
+        '
+        'ToolStripButton2
+        '
+        Me.ToolStripButton2.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
+        Me.ToolStripButton2.Image = Global.EpoleNet.My.Resources.Resources.skipb_32
+        Me.ToolStripButton2.Name = "ToolStripButton2"
+        Me.ToolStripButton2.RightToLeftAutoMirrorImage = True
+        Me.ToolStripButton2.Size = New System.Drawing.Size(36, 36)
+        Me.ToolStripButton2.Text = "처음으로 이동"
+        '
+        'ToolStripButton3
+        '
+        Me.ToolStripButton3.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
+        Me.ToolStripButton3.Image = Global.EpoleNet.My.Resources.Resources.back_32
+        Me.ToolStripButton3.Name = "ToolStripButton3"
+        Me.ToolStripButton3.RightToLeftAutoMirrorImage = True
+        Me.ToolStripButton3.Size = New System.Drawing.Size(36, 36)
+        Me.ToolStripButton3.Text = "이전으로 이동"
+        '
+        'ToolStripSeparator3
+        '
+        Me.ToolStripSeparator3.Name = "ToolStripSeparator3"
+        Me.ToolStripSeparator3.Size = New System.Drawing.Size(6, 39)
+        '
+        'ToolStripTextBox1
+        '
+        Me.ToolStripTextBox1.AccessibleName = "위치"
+        Me.ToolStripTextBox1.AutoSize = False
+        Me.ToolStripTextBox1.Name = "ToolStripTextBox1"
+        Me.ToolStripTextBox1.Size = New System.Drawing.Size(25, 21)
+        Me.ToolStripTextBox1.Text = "0"
+        Me.ToolStripTextBox1.TextBoxTextAlign = System.Windows.Forms.HorizontalAlignment.Center
+        Me.ToolStripTextBox1.ToolTipText = "현재 위치"
+        '
+        'ToolStripSeparator4
+        '
+        Me.ToolStripSeparator4.Name = "ToolStripSeparator4"
+        Me.ToolStripSeparator4.Size = New System.Drawing.Size(6, 39)
+        '
+        'ToolStripButton4
+        '
+        Me.ToolStripButton4.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
+        Me.ToolStripButton4.Image = Global.EpoleNet.My.Resources.Resources.forwd_32
+        Me.ToolStripButton4.Name = "ToolStripButton4"
+        Me.ToolStripButton4.RightToLeftAutoMirrorImage = True
+        Me.ToolStripButton4.Size = New System.Drawing.Size(36, 36)
+        Me.ToolStripButton4.Text = "다음으로 이동"
+        '
+        'ToolStripButton5
+        '
+        Me.ToolStripButton5.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
+        Me.ToolStripButton5.Image = Global.EpoleNet.My.Resources.Resources.skipf_32
+        Me.ToolStripButton5.Name = "ToolStripButton5"
+        Me.ToolStripButton5.RightToLeftAutoMirrorImage = True
+        Me.ToolStripButton5.Size = New System.Drawing.Size(36, 36)
+        Me.ToolStripButton5.Text = "마지막으로 이동"
+        '
+        'ToolStripSeparator5
+        '
+        Me.ToolStripSeparator5.Name = "ToolStripSeparator5"
+        Me.ToolStripSeparator5.Size = New System.Drawing.Size(6, 39)
+        '
+        'ToolStripButton6
+        '
+        Me.ToolStripButton6.Image = Global.EpoleNet.My.Resources.Resources.remov_32
+        Me.ToolStripButton6.Name = "ToolStripButton6"
+        Me.ToolStripButton6.RightToLeftAutoMirrorImage = True
+        Me.ToolStripButton6.Size = New System.Drawing.Size(95, 36)
+        Me.ToolStripButton6.Text = "줄삭제(&D)"
+        Me.ToolStripButton6.ToolTipText = "현재 선퇙된 줄을 삭제합니다.(이것은 SHIFT+DELETE)와 같습니다"
+        '
+        'ToolStripSeparator6
+        '
+        Me.ToolStripSeparator6.Name = "ToolStripSeparator6"
+        Me.ToolStripSeparator6.Size = New System.Drawing.Size(6, 39)
+        '
+        'ToolStripButton7
+        '
+        Me.ToolStripButton7.Image = Global.EpoleNet.My.Resources.Resources.save_32
+        Me.ToolStripButton7.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.ToolStripButton7.Name = "ToolStripButton7"
+        Me.ToolStripButton7.Size = New System.Drawing.Size(131, 36)
+        Me.ToolStripButton7.Text = "변경내용저장(&S)"
+        Me.ToolStripButton7.ToolTipText = "변경된 내용을 데이터베이스에 저장합니다"
+        '
+        'ToolStripButton8
+        '
+        Me.ToolStripButton8.Image = Global.EpoleNet.My.Resources.Resources.cancl_32
+        Me.ToolStripButton8.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.ToolStripButton8.Name = "ToolStripButton8"
+        Me.ToolStripButton8.Size = New System.Drawing.Size(132, 36)
+        Me.ToolStripButton8.Text = "변경내용취소(&C)"
+        Me.ToolStripButton8.ToolTipText = "변경된 내용을 모두 취소합니다"
+        '
+        'ToolStripSeparator7
+        '
+        Me.ToolStripSeparator7.Name = "ToolStripSeparator7"
+        Me.ToolStripSeparator7.Size = New System.Drawing.Size(6, 39)
+        '
+        'bt_close
+        '
+        Me.bt_close.BackColor = System.Drawing.Color.Transparent
+        Me.bt_close.Checked = True
+        Me.bt_close.CheckState = System.Windows.Forms.CheckState.Checked
+        Me.bt_close.Font = New System.Drawing.Font("굴림", 9.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
+        Me.bt_close.Image = Global.EpoleNet.My.Resources.Resources.stop_32
+        Me.bt_close.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.bt_close.Name = "bt_close"
+        Me.bt_close.Size = New System.Drawing.Size(140, 36)
+        Me.bt_close.Text = "프로그램종료(&X)"
+        Me.bt_close.ToolTipText = "현재 창을 닫습니다"
+        '
+        'ToolStrip1
+        '
+        Me.ToolStrip1.Font = New System.Drawing.Font("굴림", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
+        Me.ToolStrip1.ImageScalingSize = New System.Drawing.Size(40, 40)
+        Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.bt_find, Me.ToolStripSeparator8, Me.BT1, Me.BT2, Me.bt5, Me.bt6})
+        Me.ToolStrip1.Location = New System.Drawing.Point(0, 24)
+        Me.ToolStrip1.Name = "ToolStrip1"
+        Me.ToolStrip1.Size = New System.Drawing.Size(1277, 47)
+        Me.ToolStrip1.TabIndex = 19
+        Me.ToolStrip1.Text = "ToolStrip1"
+        '
+        'bt_find
+        '
+        Me.bt_find.Image = Global.EpoleNet.My.Resources.Resources.srch_32
+        Me.bt_find.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.bt_find.Name = "bt_find"
+        Me.bt_find.Size = New System.Drawing.Size(114, 44)
+        Me.bt_find.Text = "목록갱신(&F)"
+        Me.bt_find.ToolTipText = "데이터베이스의 내용을 다시 조회합니다"
+        '
+        'ToolStripSeparator8
+        '
+        Me.ToolStripSeparator8.Name = "ToolStripSeparator8"
+        Me.ToolStripSeparator8.Size = New System.Drawing.Size(6, 47)
+        '
+        'BT1
+        '
+        Me.BT1.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.BT11, Me.BT12})
+        Me.BT1.Image = Global.EpoleNet.My.Resources.Resources.splay_32
+        Me.BT1.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.BT1.Name = "BT1"
+        Me.BT1.Size = New System.Drawing.Size(134, 44)
+        Me.BT1.Text = "가공번호찰(&1)"
+        Me.BT1.ToolTipText = "새로운 가공번호찰을 제작합니다"
+        '
+        'BT11
+        '
+        Me.BT11.Name = "BT11"
+        Me.BT11.Size = New System.Drawing.Size(170, 22)
+        Me.BT11.Text = "일반번호찰"
+        '
+        'BT12
+        '
+        Me.BT12.Name = "BT12"
+        Me.BT12.Size = New System.Drawing.Size(170, 22)
+        Me.BT12.Text = "자동화기기 번호찰"
+        '
+        'BT2
+        '
+        Me.BT2.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripMenuItem3, Me.ToolStripMenuItem6, Me.ToolStripMenuItem5, Me.ToolStripMenuItem4})
+        Me.BT2.Image = Global.EpoleNet.My.Resources.Resources.splay_32
+        Me.BT2.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.BT2.Name = "BT2"
+        Me.BT2.Size = New System.Drawing.Size(134, 44)
+        Me.BT2.Text = "지중번호찰(&2)"
+        Me.BT2.ToolTipText = "새로운 가공번호찰을 제작합니다"
+        '
+        'ToolStripMenuItem3
+        '
+        Me.ToolStripMenuItem3.Name = "ToolStripMenuItem3"
+        Me.ToolStripMenuItem3.Size = New System.Drawing.Size(266, 22)
+        Me.ToolStripMenuItem3.Text = "일반번호찰"
+        '
+        'ToolStripMenuItem6
+        '
+        Me.ToolStripMenuItem6.Name = "ToolStripMenuItem6"
+        Me.ToolStripMenuItem6.Size = New System.Drawing.Size(266, 22)
+        Me.ToolStripMenuItem6.Text = "지상기기 선로표시찰"
+        '
+        'ToolStripMenuItem5
+        '
+        Me.ToolStripMenuItem5.Name = "ToolStripMenuItem5"
+        Me.ToolStripMenuItem5.Size = New System.Drawing.Size(266, 22)
+        Me.ToolStripMenuItem5.Text = "케이블 표시라벨"
+        '
+        'ToolStripMenuItem4
+        '
+        Me.ToolStripMenuItem4.Name = "ToolStripMenuItem4"
+        Me.ToolStripMenuItem4.Size = New System.Drawing.Size(266, 22)
+        Me.ToolStripMenuItem4.Text = "맨홀용 선로표시찰 및 케이블 계통도"
+        '
+        'bt5
+        '
+        Me.bt5.Image = Global.EpoleNet.My.Resources.Resources.splay_32
+        Me.bt5.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.bt5.Name = "bt5"
+        Me.bt5.Size = New System.Drawing.Size(189, 44)
+        Me.bt5.Text = "중요및 고압수용번호찰(&3)"
+        Me.bt5.ToolTipText = "새로운 중요수용번호찰을 제작합니다"
+        '
+        'bt6
+        '
+        Me.bt6.Image = Global.EpoleNet.My.Resources.Resources.splay_32
+        Me.bt6.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.bt6.Name = "bt6"
+        Me.bt6.Size = New System.Drawing.Size(137, 44)
+        Me.bt6.Text = "정액등번호찰(&4)"
+        '
+        'ContextMenuStrip1
+        '
+        Me.ContextMenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.bt_savecolsize})
+        Me.ContextMenuStrip1.Name = "ContextMenuStrip1"
+        Me.ContextMenuStrip1.Size = New System.Drawing.Size(159, 26)
+        '
+        'bt_savecolsize
+        '
+        Me.bt_savecolsize.Name = "bt_savecolsize"
+        Me.bt_savecolsize.Size = New System.Drawing.Size(158, 22)
+        Me.bt_savecolsize.Text = "현재뷰상태저장"
+        '
+        'MenuStrip1
+        '
+        Me.MenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.bt_programs, Me.bt_others, Me.bt_help})
+        Me.MenuStrip1.Location = New System.Drawing.Point(0, 0)
+        Me.MenuStrip1.Name = "MenuStrip1"
+        Me.MenuStrip1.Size = New System.Drawing.Size(1277, 24)
+        Me.MenuStrip1.TabIndex = 20
+        Me.MenuStrip1.Text = "MenuStrip1"
+        '
+        'bt_programs
+        '
+        Me.bt_programs.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.mbt_config, Me.mbt_writeauth, Me.ToolStripMenuItem1, Me.mb_exit})
+        Me.bt_programs.Name = "bt_programs"
+        Me.bt_programs.Size = New System.Drawing.Size(43, 20)
+        Me.bt_programs.Text = "메뉴"
+        '
+        'mbt_config
+        '
+        Me.mbt_config.Name = "mbt_config"
+        Me.mbt_config.Size = New System.Drawing.Size(150, 22)
+        Me.mbt_config.Text = "환경설정"
+        '
+        'mbt_writeauth
+        '
+        Me.mbt_writeauth.Name = "mbt_writeauth"
+        Me.mbt_writeauth.Size = New System.Drawing.Size(150, 22)
+        Me.mbt_writeauth.Text = "인증번호 변경"
+        '
+        'ToolStripMenuItem1
+        '
+        Me.ToolStripMenuItem1.Name = "ToolStripMenuItem1"
+        Me.ToolStripMenuItem1.Size = New System.Drawing.Size(147, 6)
+        '
+        'mb_exit
+        '
+        Me.mb_exit.Name = "mb_exit"
+        Me.mb_exit.Size = New System.Drawing.Size(150, 22)
+        Me.mb_exit.Text = "종료"
+        '
+        'bt_others
+        '
+        Me.bt_others.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.mbt_oldttonew, Me.mbt_xlssync})
+        Me.bt_others.Name = "bt_others"
+        Me.bt_others.Size = New System.Drawing.Size(91, 20)
+        Me.bt_others.Text = "기타프로그램"
+        Me.bt_others.Visible = False
+        '
+        'mbt_oldttonew
+        '
+        Me.mbt_oldttonew.Name = "mbt_oldttonew"
+        Me.mbt_oldttonew.Size = New System.Drawing.Size(239, 22)
+        Me.mbt_oldttonew.Text = "구전산화번호 -> 신전산화번호"
+        '
+        'mbt_xlssync
+        '
+        Me.mbt_xlssync.Name = "mbt_xlssync"
+        Me.mbt_xlssync.Size = New System.Drawing.Size(239, 22)
+        Me.mbt_xlssync.Text = "엑셀파일 동기화"
+        '
+        'bt_help
+        '
+        Me.bt_help.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
+        Me.bt_help.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.bt_aa, Me.ToolStripMenuItem2, Me.bt_howto})
+        Me.bt_help.Name = "bt_help"
+        Me.bt_help.Size = New System.Drawing.Size(55, 20)
+        Me.bt_help.Text = "도움말"
+        '
+        'bt_aa
+        '
+        Me.bt_aa.Name = "bt_aa"
+        Me.bt_aa.Size = New System.Drawing.Size(146, 22)
+        Me.bt_aa.Text = "프로그램정보"
+        '
+        'ToolStripMenuItem2
+        '
+        Me.ToolStripMenuItem2.Name = "ToolStripMenuItem2"
+        Me.ToolStripMenuItem2.Size = New System.Drawing.Size(143, 6)
+        '
+        'bt_howto
+        '
+        Me.bt_howto.Enabled = False
+        Me.bt_howto.Name = "bt_howto"
+        Me.bt_howto.Size = New System.Drawing.Size(146, 22)
+        Me.bt_howto.Text = "사용설명서"
+        '
+        'view1
+        '
+        Me.view1.AAutoAddrowInLast = Nothing
+        Me.view1.AccessibleDescription = "view1, Sheet1"
+        Me.view1.ACellImeLabel = Nothing
+        Me.view1.ACellposLabel = Nothing
+        Me.view1.ACheckBox_ColIndex = CType(-1, Short)
+        Me.view1.ADeleteCell = True
+        Me.view1.ADeleteRow = False
+        Me.view1.AEditFromSpace = True
+        Me.view1.AEditStatusLabel = Nothing
+        Me.view1.AFirstColumn_Index = 4
+        Me.view1.AllowDragFill = True
+        Me.view1.AllowUserFormulas = True
+        Me.view1.AMessageLabel = Nothing
+        Me.view1.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
+            Or System.Windows.Forms.AnchorStyles.Left) _
+            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.view1.ANextRow_ColIndex = -1
+        Me.view1.ASameRowheight = True
+        Me.view1.BackColor = System.Drawing.Color.Transparent
+        Me.view1.ButtonDrawMode = FarPoint.Win.Spread.ButtonDrawModes.CurrentCell
+        Me.view1.ContextMenuStrip = Me.ContextMenuStrip1
+        Me.view1.EditModeReplace = True
+        Me.view1.EnableCrossSheetReference = False
+        Me.view1.Font = New System.Drawing.Font("굴림", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
+        Me.view1.HorizontalScrollBarPolicy = FarPoint.Win.Spread.ScrollBarPolicy.AsNeeded
+        Me.view1.Location = New System.Drawing.Point(1, 73)
+        Me.view1.Name = "view1"
+        Me.view1.RightToLeft = System.Windows.Forms.RightToLeft.No
+        Me.view1.Sheets.AddRange(New FarPoint.Win.Spread.SheetView() {Me.view1_Sheet1})
+        Me.view1.Size = New System.Drawing.Size(1277, 464)
+        Me.view1.TabIndex = 18
+        Me.view1.VerticalScrollBarPolicy = FarPoint.Win.Spread.ScrollBarPolicy.AsNeeded
+        Me.view1.SetActiveViewport(0, -1, -1)
+        '
+        'view1_Sheet1
+        '
+        Me.view1_Sheet1.Reset()
+        Me.view1_Sheet1.SheetName = "Sheet1"
+        'Formulas and custom names must be loaded with R1C1 reference style
+        Me.view1_Sheet1.ReferenceStyle = FarPoint.Win.Spread.Model.ReferenceStyle.R1C1
+        view1_Sheet1.ColumnCount = 16
+        Me.view1_Sheet1.ActiveColumnIndex = -1
+        Me.view1_Sheet1.ActiveRowIndex = -1
+        Me.view1_Sheet1.AllowNoteEdit = False
+        Me.view1_Sheet1.AutoGenerateColumns = False
+        Me.view1_Sheet1.ColumnHeader.Cells.Get(0, 0).Value = "제작ID"
+        Me.view1_Sheet1.ColumnHeader.Cells.Get(0, 1).Value = "선택"
+        Me.view1_Sheet1.ColumnHeader.Cells.Get(0, 2).Value = "보기"
+        Me.view1_Sheet1.ColumnHeader.Cells.Get(0, 3).Value = "그림"
+        Me.view1_Sheet1.ColumnHeader.Cells.Get(0, 4).Value = "날짜"
+        Me.view1_Sheet1.ColumnHeader.Cells.Get(0, 5).Value = "거래처명"
+        Me.view1_Sheet1.ColumnHeader.Cells.Get(0, 6).Value = "작업내용"
+        Me.view1_Sheet1.ColumnHeader.Cells.Get(0, 7).Value = "총수량"
+        Me.view1_Sheet1.ColumnHeader.Cells.Get(0, 8).Value = "단가"
+        Me.view1_Sheet1.ColumnHeader.Cells.Get(0, 9).Value = "금액"
+        Me.view1_Sheet1.ColumnHeader.Cells.Get(0, 10).Value = "종류"
+        Me.view1_Sheet1.ColumnHeader.Cells.Get(0, 11).Value = "시공자"
+        Me.view1_Sheet1.ColumnHeader.Cells.Get(0, 12).Value = "홈페이지"
+        Me.view1_Sheet1.ColumnHeader.Cells.Get(0, 13).Value = "관리"
+        Me.view1_Sheet1.ColumnHeader.Cells.Get(0, 14).Value = "관리1"
+        Me.view1_Sheet1.ColumnHeader.Cells.Get(0, 15).Value = "관리2"
+        Me.view1_Sheet1.ColumnHeader.Rows.Get(0).Height = 37.0!
+        Me.view1_Sheet1.ColumnHeader.VerticalGridLine = New FarPoint.Win.Spread.GridLine(FarPoint.Win.Spread.GridLineType.Raised, System.Drawing.Color.LightGray, System.Drawing.SystemColors.ControlLightLight, System.Drawing.SystemColors.ControlDark, 3)
+        Me.view1_Sheet1.Columns.Get(0).BackColor = System.Drawing.Color.Silver
+        Me.view1_Sheet1.Columns.Get(0).DataField = "ID"
+        Me.view1_Sheet1.Columns.Get(0).Label = "제작ID"
+        Me.view1_Sheet1.Columns.Get(0).Locked = False
+        Me.view1_Sheet1.Columns.Get(0).Visible = False
+        Me.view1_Sheet1.Columns.Get(0).Width = 50.0!
+        Me.view1_Sheet1.Columns.Get(1).CellType = CheckBoxCellType1
+        Me.view1_Sheet1.Columns.Get(1).HorizontalAlignment = FarPoint.Win.Spread.CellHorizontalAlignment.Center
+        Me.view1_Sheet1.Columns.Get(1).Label = "선택"
+        Me.view1_Sheet1.Columns.Get(1).VerticalAlignment = FarPoint.Win.Spread.CellVerticalAlignment.Center
+        Me.view1_Sheet1.Columns.Get(1).Width = 39.0!
+        ButtonCellType1.ButtonColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(128, Byte), Integer))
+        ButtonCellType1.ButtonColor2 = System.Drawing.SystemColors.ButtonFace
+        ButtonCellType1.Picture = CType(resources.GetObject("ButtonCellType1.Picture"), System.Drawing.Image)
+        Me.view1_Sheet1.Columns.Get(2).CellType = ButtonCellType1
+        Me.view1_Sheet1.Columns.Get(2).Label = "보기"
+        Me.view1_Sheet1.Columns.Get(2).Width = 39.0!
+        ButtonCellType2.ButtonColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(128, Byte), Integer))
+        ButtonCellType2.ButtonColor2 = System.Drawing.SystemColors.ButtonFace
+        ButtonCellType2.Picture = CType(resources.GetObject("ButtonCellType2.Picture"), System.Drawing.Image)
+        Me.view1_Sheet1.Columns.Get(3).CellType = ButtonCellType2
+        Me.view1_Sheet1.Columns.Get(3).HorizontalAlignment = FarPoint.Win.Spread.CellHorizontalAlignment.Center
+        Me.view1_Sheet1.Columns.Get(3).Label = "그림"
+        Me.view1_Sheet1.Columns.Get(3).VerticalAlignment = FarPoint.Win.Spread.CellVerticalAlignment.Center
+        Me.view1_Sheet1.Columns.Get(3).Width = 39.0!
+        Me.view1_Sheet1.Columns.Get(4).AllowAutoSort = True
+        DateTimeCellType1.Calendar = CType(resources.GetObject("DateTimeCellType1.Calendar"), System.Globalization.Calendar)
+        DateTimeCellType1.CalendarDayFont = New System.Drawing.Font("Microsoft Sans Serif", 8.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        DateTimeCellType1.CalendarSurroundingDaysColor = System.Drawing.SystemColors.GrayText
+        DateTimeCellType1.DateDefault = New Date(2007, 7, 15, 11, 18, 31, 0)
+        DateTimeCellType1.DateTimeFormat = FarPoint.Win.Spread.CellType.DateTimeFormat.UserDefined
+        DateTimeCellType1.MaximumTime = System.TimeSpan.Parse("23:59:59.9999999")
+        DateTimeCellType1.TimeDefault = New Date(2007, 7, 15, 11, 18, 31, 0)
+        DateTimeCellType1.UserDefinedFormat = "yyyy-MM-dd"
+        Me.view1_Sheet1.Columns.Get(4).CellType = DateTimeCellType1
+        Me.view1_Sheet1.Columns.Get(4).DataField = "날짜"
+        Me.view1_Sheet1.Columns.Get(4).HorizontalAlignment = FarPoint.Win.Spread.CellHorizontalAlignment.Center
+        Me.view1_Sheet1.Columns.Get(4).Label = "날짜"
+        Me.view1_Sheet1.Columns.Get(4).VerticalAlignment = FarPoint.Win.Spread.CellVerticalAlignment.Center
+        Me.view1_Sheet1.Columns.Get(4).Width = 55.0!
+        Me.view1_Sheet1.Columns.Get(5).AllowAutoSort = True
+        Me.view1_Sheet1.Columns.Get(5).DataField = "거래처명"
+        Me.view1_Sheet1.Columns.Get(5).HorizontalAlignment = FarPoint.Win.Spread.CellHorizontalAlignment.Center
+        Me.view1_Sheet1.Columns.Get(5).Label = "거래처명"
+        Me.view1_Sheet1.Columns.Get(5).VerticalAlignment = FarPoint.Win.Spread.CellVerticalAlignment.Center
+        Me.view1_Sheet1.Columns.Get(5).Width = 79.0!
+        Me.view1_Sheet1.Columns.Get(6).CellType = TextCellType1
+        Me.view1_Sheet1.Columns.Get(6).DataField = "비고"
+        Me.view1_Sheet1.Columns.Get(6).HorizontalAlignment = FarPoint.Win.Spread.CellHorizontalAlignment.Left
+        Me.view1_Sheet1.Columns.Get(6).Label = "작업내용"
+        Me.view1_Sheet1.Columns.Get(6).VerticalAlignment = FarPoint.Win.Spread.CellVerticalAlignment.Center
+        Me.view1_Sheet1.Columns.Get(6).Width = 63.0!
+        NumberCellType1.DecimalPlaces = 0
+        NumberCellType1.ReadOnly = True
+        NumberCellType1.Separator = ","
+        NumberCellType1.ShowSeparator = True
+        Me.view1_Sheet1.Columns.Get(7).CellType = NumberCellType1
+        Me.view1_Sheet1.Columns.Get(7).DataField = "총수량"
+        Me.view1_Sheet1.Columns.Get(7).HorizontalAlignment = FarPoint.Win.Spread.CellHorizontalAlignment.Right
+        Me.view1_Sheet1.Columns.Get(7).Label = "총수량"
+        Me.view1_Sheet1.Columns.Get(7).Locked = True
+        Me.view1_Sheet1.Columns.Get(7).VerticalAlignment = FarPoint.Win.Spread.CellVerticalAlignment.Center
+        Me.view1_Sheet1.Columns.Get(7).Width = 50.0!
+        CurrencyCellType1.Separator = ","
+        CurrencyCellType1.ShowCurrencySymbol = False
+        CurrencyCellType1.ShowSeparator = True
+        Me.view1_Sheet1.Columns.Get(8).CellType = CurrencyCellType1
+        Me.view1_Sheet1.Columns.Get(8).DataField = "단가"
+        Me.view1_Sheet1.Columns.Get(8).HorizontalAlignment = FarPoint.Win.Spread.CellHorizontalAlignment.Right
+        Me.view1_Sheet1.Columns.Get(8).Label = "단가"
+        Me.view1_Sheet1.Columns.Get(8).Locked = True
+        Me.view1_Sheet1.Columns.Get(8).VerticalAlignment = FarPoint.Win.Spread.CellVerticalAlignment.Center
+        Me.view1_Sheet1.Columns.Get(8).Width = 40.0!
+        CurrencyCellType2.Separator = ","
+        CurrencyCellType2.ShowCurrencySymbol = False
+        CurrencyCellType2.ShowSeparator = True
+        Me.view1_Sheet1.Columns.Get(9).CellType = CurrencyCellType2
+        Me.view1_Sheet1.Columns.Get(9).DataField = "금액"
+        Me.view1_Sheet1.Columns.Get(9).Formula = "RC[-2]*RC[-1]"
+        Me.view1_Sheet1.Columns.Get(9).HorizontalAlignment = FarPoint.Win.Spread.CellHorizontalAlignment.Right
+        Me.view1_Sheet1.Columns.Get(9).Label = "금액"
+        Me.view1_Sheet1.Columns.Get(9).Locked = True
+        Me.view1_Sheet1.Columns.Get(9).VerticalAlignment = FarPoint.Win.Spread.CellVerticalAlignment.Center
+        Me.view1_Sheet1.Columns.Get(9).Width = 39.0!
+        ComboBoxCellType1.ButtonAlign = FarPoint.Win.ButtonAlign.Right
+        ComboBoxCellType1.EditorValue = FarPoint.Win.Spread.CellType.EditorValue.ItemData
+        ComboBoxCellType1.ItemData = New String() {"0", "9", "1", "2", "3", "4", "6", "7", "8"}
+        ComboBoxCellType1.Items = New String() {"가공(일반)", "중요수용", "지중(일반)", "정액등", "가로등", "가공(기기)", "지중(맨홀표시찰및계통도)", "지중(케이블표시라벨)", "지중(기기표시찰)"}
+        Me.view1_Sheet1.Columns.Get(10).CellType = ComboBoxCellType1
+        Me.view1_Sheet1.Columns.Get(10).DataField = "번호찰구분"
+        Me.view1_Sheet1.Columns.Get(10).HorizontalAlignment = FarPoint.Win.Spread.CellHorizontalAlignment.Left
+        Me.view1_Sheet1.Columns.Get(10).Label = "종류"
+        Me.view1_Sheet1.Columns.Get(10).Locked = True
+        Me.view1_Sheet1.Columns.Get(10).VerticalAlignment = FarPoint.Win.Spread.CellVerticalAlignment.Center
+        Me.view1_Sheet1.Columns.Get(10).Width = 39.0!
+        Me.view1_Sheet1.Columns.Get(11).DataField = "시공자"
+        Me.view1_Sheet1.Columns.Get(11).HorizontalAlignment = FarPoint.Win.Spread.CellHorizontalAlignment.Left
+        Me.view1_Sheet1.Columns.Get(11).Label = "시공자"
+        Me.view1_Sheet1.Columns.Get(11).Locked = True
+        Me.view1_Sheet1.Columns.Get(11).VerticalAlignment = FarPoint.Win.Spread.CellVerticalAlignment.Center
+        Me.view1_Sheet1.Columns.Get(11).Width = 63.0!
+        Me.view1_Sheet1.Columns.Get(12).DataField = "홈페이지"
+        Me.view1_Sheet1.Columns.Get(12).HorizontalAlignment = FarPoint.Win.Spread.CellHorizontalAlignment.Left
+        Me.view1_Sheet1.Columns.Get(12).Label = "홈페이지"
+        Me.view1_Sheet1.Columns.Get(12).Locked = True
+        Me.view1_Sheet1.Columns.Get(12).VerticalAlignment = FarPoint.Win.Spread.CellVerticalAlignment.Center
+        Me.view1_Sheet1.Columns.Get(12).Width = 63.0!
+        Me.view1_Sheet1.Columns.Get(13).DataField = "관리"
+        Me.view1_Sheet1.Columns.Get(13).HorizontalAlignment = FarPoint.Win.Spread.CellHorizontalAlignment.Left
+        Me.view1_Sheet1.Columns.Get(13).Label = "관리"
+        Me.view1_Sheet1.Columns.Get(13).VerticalAlignment = FarPoint.Win.Spread.CellVerticalAlignment.Center
+        Me.view1_Sheet1.Columns.Get(13).Width = 63.0!
+        Me.view1_Sheet1.Columns.Get(14).DataField = "관리1"
+        Me.view1_Sheet1.Columns.Get(14).HorizontalAlignment = FarPoint.Win.Spread.CellHorizontalAlignment.Left
+        Me.view1_Sheet1.Columns.Get(14).Label = "관리1"
+        Me.view1_Sheet1.Columns.Get(14).VerticalAlignment = FarPoint.Win.Spread.CellVerticalAlignment.Center
+        Me.view1_Sheet1.Columns.Get(14).Width = 63.0!
+        Me.view1_Sheet1.Columns.Get(15).DataField = "관리2"
+        Me.view1_Sheet1.Columns.Get(15).HorizontalAlignment = FarPoint.Win.Spread.CellHorizontalAlignment.Left
+        Me.view1_Sheet1.Columns.Get(15).Label = "관리2"
+        Me.view1_Sheet1.Columns.Get(15).VerticalAlignment = FarPoint.Win.Spread.CellVerticalAlignment.Center
+        Me.view1_Sheet1.Columns.Get(15).Width = 61.0!
+        Me.view1_Sheet1.DataAutoCellTypes = False
+        Me.view1_Sheet1.DataAutoHeadings = False
+        Me.view1_Sheet1.DataAutoSizeColumns = False
+        Me.view1_Sheet1.DataSource = Me.bs
+        Me.view1_Sheet1.OperationMode = FarPoint.Win.Spread.OperationMode.RowMode
+        Me.view1_Sheet1.Protect = False
+        Me.view1_Sheet1.RowHeader.Columns.Default.Resizable = False
+        Me.view1_Sheet1.RowHeader.Columns.Get(0).Width = 42.0!
+        Me.view1_Sheet1.SelectionBackColor = System.Drawing.Color.Transparent
+        Me.view1_Sheet1.SelectionForeColor = System.Drawing.Color.Black
+        Me.view1_Sheet1.ReferenceStyle = FarPoint.Win.Spread.Model.ReferenceStyle.A1
+        '
+        'TA_Main
+        '
+        Me.TA_Main.ClearBeforeFill = True
+        '
+        'TA_JUNJU
+        '
+        Me.TA_JUNJU.ClearBeforeFill = True
+        '
+        'TA_ETC
+        '
+        Me.TA_ETC.ClearBeforeFill = True
+        '
+        'TA_JIJUNG
+        '
+        Me.TA_JIJUNG.ClearBeforeFill = True
+        '
+        'TA_Cable2
+        '
+        Me.TA_Cable2.ClearBeforeFill = True
+        '
+        'TA_CableLabel
+        '
+        Me.TA_CableLabel.ClearBeforeFill = True
+        '
+        'TA_Cable
+        '
+        Me.TA_Cable.ClearBeforeFill = True
+        '
+        'TA_Deung
+        '
+        Me.TA_Deung.ClearBeforeFill = True
+        '
+        'TA_Karo
+        '
+        Me.TA_Karo.ClearBeforeFill = True
+        '
+        'TA_Kiki
+        '
+        Me.TA_Kiki.ClearBeforeFill = True
+        '
+        'Frm_Main
+        '
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.None
+        Me.ClientSize = New System.Drawing.Size(1277, 602)
+        Me.Controls.Add(Me.ToolStrip1)
+        Me.Controls.Add(Me.view1)
+        Me.Controls.Add(Me.bn)
+        Me.Controls.Add(Me.StatusStrip1)
+        Me.Controls.Add(Me.MenuStrip1)
+        Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
+        Me.KeyPreview = True
+        Me.MainMenuStrip = Me.MenuStrip1
+        Me.Name = "Frm_Main"
+        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
+        Me.Text = "제작목록"
+        Me.WindowState = System.Windows.Forms.FormWindowState.Maximized
+        Me.StatusStrip1.ResumeLayout(False)
+        Me.StatusStrip1.PerformLayout()
+        CType(Me.bn, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.bn.ResumeLayout(False)
+        Me.bn.PerformLayout()
+        CType(Me.bs, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.IreaDataSet1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.ToolStrip1.ResumeLayout(False)
+        Me.ToolStrip1.PerformLayout()
+        Me.ContextMenuStrip1.ResumeLayout(False)
+        Me.MenuStrip1.ResumeLayout(False)
+        Me.MenuStrip1.PerformLayout()
+        CType(Me.view1, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.view1_Sheet1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.ResumeLayout(False)
+        Me.PerformLayout()
+
+    End Sub
+    Friend WithEvents IreaDataSet1 As EpoleNet.ireaDataSet
+    Friend WithEvents TA_Main As EpoleNet.ireaDataSetTableAdapters.MainTableTableAdapter
+    Friend WithEvents bs As System.Windows.Forms.BindingSource
+    Friend WithEvents TA_JUNJU As EpoleNet.ireaDataSetTableAdapters.jjutableTableAdapter
+    Friend WithEvents BindingNavigatorCountItem As System.Windows.Forms.ToolStripLabel
+    Friend WithEvents BindingNavigatorDeleteItem As System.Windows.Forms.ToolStripButton
+    Friend WithEvents BindingNavigatorMoveFirstItem As System.Windows.Forms.ToolStripButton
+    Friend WithEvents BindingNavigatorMovePreviousItem As System.Windows.Forms.ToolStripButton
+    Friend WithEvents BindingNavigatorSeparator As System.Windows.Forms.ToolStripSeparator
+    Friend WithEvents BindingNavigatorPositionItem As System.Windows.Forms.ToolStripTextBox
+    Friend WithEvents BindingNavigatorSeparator1 As System.Windows.Forms.ToolStripSeparator
+    Friend WithEvents BindingNavigatorMoveNextItem As System.Windows.Forms.ToolStripButton
+    Friend WithEvents BindingNavigatorMoveLastItem As System.Windows.Forms.ToolStripButton
+    Friend WithEvents BindingNavigatorSeparator2 As System.Windows.Forms.ToolStripSeparator
+    Friend WithEvents bt_commit As System.Windows.Forms.ToolStripButton
+    Friend WithEvents bt_cancel As System.Windows.Forms.ToolStripButton
+    Friend WithEvents ToolStripSeparator1 As System.Windows.Forms.ToolStripSeparator
+    Friend WithEvents ToolTip1 As System.Windows.Forms.ToolTip
+    Friend WithEvents PRB1 As System.Windows.Forms.ToolStripProgressBar
+    Friend WithEvents TA_ETC As EpoleNet.ireaDataSetTableAdapters.etctableTableAdapter
+    Friend WithEvents ToolStripButton1 As System.Windows.Forms.ToolStripButton
+    Friend WithEvents ToolStripSeparator2 As System.Windows.Forms.ToolStripSeparator
+    Friend WithEvents TA_JIJUNG As EpoleNet.ireaDataSetTableAdapters.jjungtableTableAdapter
+    Friend WithEvents StatusStrip1 As System.Windows.Forms.StatusStrip
+    Friend WithEvents lb_change As System.Windows.Forms.ToolStripStatusLabel
+    Friend WithEvents lb_msg As System.Windows.Forms.ToolStripStatusLabel
+    Friend WithEvents bn As System.Windows.Forms.BindingNavigator
+    Friend WithEvents ToolStripLabel1 As System.Windows.Forms.ToolStripLabel
+    Friend WithEvents ToolStripButton2 As System.Windows.Forms.ToolStripButton
+    Friend WithEvents ToolStripButton3 As System.Windows.Forms.ToolStripButton
+    Friend WithEvents ToolStripSeparator3 As System.Windows.Forms.ToolStripSeparator
+    Friend WithEvents ToolStripTextBox1 As System.Windows.Forms.ToolStripTextBox
+    Friend WithEvents ToolStripSeparator4 As System.Windows.Forms.ToolStripSeparator
+    Friend WithEvents ToolStripButton4 As System.Windows.Forms.ToolStripButton
+    Friend WithEvents ToolStripButton5 As System.Windows.Forms.ToolStripButton
+    Friend WithEvents ToolStripSeparator5 As System.Windows.Forms.ToolStripSeparator
+    Friend WithEvents ToolStripButton6 As System.Windows.Forms.ToolStripButton
+    Friend WithEvents ToolStripSeparator6 As System.Windows.Forms.ToolStripSeparator
+    Friend WithEvents ToolStripButton7 As System.Windows.Forms.ToolStripButton
+    Friend WithEvents ToolStripButton8 As System.Windows.Forms.ToolStripButton
+    Friend WithEvents ToolStripSeparator7 As System.Windows.Forms.ToolStripSeparator
+    Friend WithEvents bt_close As System.Windows.Forms.ToolStripButton
+    Friend WithEvents view1 As NewFp
+    Friend WithEvents view1_Sheet1 As FarPoint.Win.Spread.SheetView
+    Friend WithEvents ToolStrip1 As System.Windows.Forms.ToolStrip
+    Friend WithEvents bt_find As System.Windows.Forms.ToolStripButton
+    Friend WithEvents ToolStripSeparator8 As System.Windows.Forms.ToolStripSeparator
+    Friend WithEvents bt5 As System.Windows.Forms.ToolStripButton
+    Friend WithEvents ContextMenuStrip1 As System.Windows.Forms.ContextMenuStrip
+    Friend WithEvents bt_savecolsize As System.Windows.Forms.ToolStripMenuItem
+    Friend WithEvents MenuStrip1 As System.Windows.Forms.MenuStrip
+    Friend WithEvents bt_programs As System.Windows.Forms.ToolStripMenuItem
+    Friend WithEvents mbt_config As System.Windows.Forms.ToolStripMenuItem
+    Friend WithEvents ToolStripMenuItem1 As System.Windows.Forms.ToolStripSeparator
+    Friend WithEvents mb_exit As System.Windows.Forms.ToolStripMenuItem
+    Friend WithEvents bt_others As System.Windows.Forms.ToolStripMenuItem
+    Friend WithEvents mbt_oldttonew As System.Windows.Forms.ToolStripMenuItem
+    Friend WithEvents mbt_xlssync As System.Windows.Forms.ToolStripMenuItem
+    Friend WithEvents mbt_writeauth As System.Windows.Forms.ToolStripMenuItem
+    Friend WithEvents bt6 As System.Windows.Forms.ToolStripButton
+    Friend WithEvents bt_help As System.Windows.Forms.ToolStripMenuItem
+    Friend WithEvents bt_aa As System.Windows.Forms.ToolStripMenuItem
+    Friend WithEvents ToolStripMenuItem2 As System.Windows.Forms.ToolStripSeparator
+    Friend WithEvents bt_howto As System.Windows.Forms.ToolStripMenuItem
+    Friend WithEvents BT1 As System.Windows.Forms.ToolStripDropDownButton
+    Friend WithEvents BT11 As System.Windows.Forms.ToolStripMenuItem
+    Friend WithEvents BT12 As System.Windows.Forms.ToolStripMenuItem
+    Friend WithEvents BT2 As System.Windows.Forms.ToolStripDropDownButton
+    Friend WithEvents ToolStripMenuItem3 As System.Windows.Forms.ToolStripMenuItem
+    Friend WithEvents ToolStripMenuItem6 As System.Windows.Forms.ToolStripMenuItem
+    Friend WithEvents ToolStripMenuItem5 As System.Windows.Forms.ToolStripMenuItem
+    Friend WithEvents ToolStripMenuItem4 As System.Windows.Forms.ToolStripMenuItem
+    Friend WithEvents TA_Cable2 As EpoleNet.ireaDataSetTableAdapters.Detail_Cable2TableAdapter
+    Friend WithEvents TA_CableLabel As EpoleNet.ireaDataSetTableAdapters.Detail_CableLabelTableAdapter
+    Friend WithEvents TA_Cable As EpoleNet.ireaDataSetTableAdapters.Detail_CableTableAdapter
+    Friend WithEvents TA_Deung As EpoleNet.ireaDataSetTableAdapters.Detail_DeungTableAdapter
+    Friend WithEvents TA_Karo As EpoleNet.ireaDataSetTableAdapters.Detail_karoTableAdapter
+    Friend WithEvents TA_Kiki As EpoleNet.ireaDataSetTableAdapters.Detail_kikiTableAdapter
+End Class

Epole.fp13/Frm_Main.resx

@@ -0,0 +1,294 @@
+<?xml version="1.0" encoding="utf-8"?>
+<root>
+  <!-- 
+    Microsoft ResX Schema 
+    
+    Version 2.0
+    
+    The primary goals of this format is to allow a simple XML format 
+    that is mostly human readable. The generation and parsing of the 
+    various data types are done through the TypeConverter classes 
+    associated with the data types.
+    
+    Example:
+    
+    ... ado.net/XML headers & schema ...
+    <resheader name="resmimetype">text/microsoft-resx</resheader>
+    <resheader name="version">2.0</resheader>
+    <resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
+    <resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
+    <data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
+    <data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
+    <data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
+        <value>[base64 mime encoded serialized .NET Framework object]</value>
+    </data>
+    <data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+        <value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
+        <comment>This is a comment</comment>
+    </data>
+                
+    There are any number of "resheader" rows that contain simple 
+    name/value pairs.
+    
+    Each data row contains a name, and value. The row also contains a 
+    type or mimetype. Type corresponds to a .NET class that support 
+    text/value conversion through the TypeConverter architecture. 
+    Classes that don't support this are serialized and stored with the 
+    mimetype set.
+    
+    The mimetype is used for serialized objects, and tells the 
+    ResXResourceReader how to depersist the object. This is currently not 
+    extensible. For a given mimetype the value must be set accordingly:
+    
+    Note - application/x-microsoft.net.object.binary.base64 is the format 
+    that the ResXResourceWriter will generate, however the reader can 
+    read any of the formats listed below.
+    
+    mimetype: application/x-microsoft.net.object.binary.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
+            : and then encoded with base64 encoding.
+    
+    mimetype: application/x-microsoft.net.object.soap.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Soap.SoapFormatter
+            : and then encoded with base64 encoding.
+
+    mimetype: application/x-microsoft.net.object.bytearray.base64
+    value   : The object must be serialized into a byte array 
+            : using a System.ComponentModel.TypeConverter
+            : and then encoded with base64 encoding.
+    -->
+  <xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
+    <xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
+    <xsd:element name="root" msdata:IsDataSet="true">
+      <xsd:complexType>
+        <xsd:choice maxOccurs="unbounded">
+          <xsd:element name="metadata">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" />
+              </xsd:sequence>
+              <xsd:attribute name="name" use="required" type="xsd:string" />
+              <xsd:attribute name="type" type="xsd:string" />
+              <xsd:attribute name="mimetype" type="xsd:string" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="assembly">
+            <xsd:complexType>
+              <xsd:attribute name="alias" type="xsd:string" />
+              <xsd:attribute name="name" type="xsd:string" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="data">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+                <xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
+              <xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
+              <xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="resheader">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" />
+            </xsd:complexType>
+          </xsd:element>
+        </xsd:choice>
+      </xsd:complexType>
+    </xsd:element>
+  </xsd:schema>
+  <resheader name="resmimetype">
+    <value>text/microsoft-resx</value>
+  </resheader>
+  <resheader name="version">
+    <value>2.0</value>
+  </resheader>
+  <resheader name="reader">
+    <value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <resheader name="writer">
+    <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
+  <data name="BindingNavigatorMovePreviousItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAACBjSFJNAAB6
+        JgAAgIQAAPoAAACA6AAAdTAAAOpgAAA6mAAAF3CculE8AAADyklEQVRYR72WSUsjQRTHxatbFBfEKCIK
+        atQxqIGADR48eBHUcUFQFA0i4oKIiiBIwAGhD3MUjbvR25gP4L7virvGfd8+RM17Bd10p6uTKJlp+NFV
+        r96r/z9Jve54EUK+DFzeLS0txq6uLmtPTw9BcIwxXGPVqMEMOgMF6urquLa2tqnJyUny9PREWVtbI+3t
+        7X9g3YdVpwYzqAaK19bWcvBJbRMTE1R4enqaguPu7m5M0rJq1WAGWaB4TU0N19zcbLNarTJxwYDZbMZE
+        HateDWbQERQ3mUxcU1OTbXx8XBSfmZkRwRicA0z+wdpDDWZQCopXVVVx9fX1VPz5+ZnMzs4qwHhnZ6dn
+        DaB4RUUFB4fONjY2RkXm5uaY4FpHR4fnDKB4WVkZB7+7KL6wsECZn5+nCHPk5eWFtLa2uqShocFaXV0t
+        tquqeGlpKQeJttHRUbr54uIiZWlpSRw7xjBPyuvrq4gQW15eJnCexHZlipeUlHCVlZVUHIuxyBOgUbw3
+        NjaiEG1XhXhhYSFXXl5Oxd/e3sjKyoqM1dVVBY7rankIrsGZQjHarjLxvLw8Dr5628jICHl/f6dPt/X1
+        ddldAOcCjnnSuBQhDucKBelhFcVzc3O54uJiUXxzc5OysbGhepfCylED2lphwKegoGBqeHiYfHx8kK2t
+        LbK9vf0t3KmFn1hhQAtfPfn8/CS7u7tO2dnZYca/Amo5GtAVFRWR/f39/wJqKQxkZmbuDQ0NkYODg29x
+        eHjIjLPIz89XGNBGRkaaDQaDfXBwkBwdHTnl+PiYGXcXOPAKAz5Aenh4OJ+WlkZNnJycMDk9PXU6dwXm
+        5+TkKAx4AxrAEBYWxqemptoHBgbI2dmZjPPzc9lYOneFNDc7O1tuwNFEaGgon5ycTE1cXFx4nKysLKUB
+        RxMhISF8YmKi3WKxkMvLS4+B+yUlJe2BhvxRzDIRHBzMx8fHUxNXV1fk+vpahDU3Go0uwf3gw5lhf+XL
+        SEBqIigoiI+Li7P39/eTm5sbJre3t/SekZGBxRbgtwq/ABOgB9ivYwG4RBOBgYF8TEwMNXF3d6eKXq/H
+        wp/ADxV0gBbArlP/QyKASQA1odFo+OjoaHtfXx+5v79nkpKSgkX0cLkLMyhFaiIgIICPioqiJh4eHmQ8
+        Pj4SnU7neQOI1IS/vz8PT01qAkWlJCQk/BsDiNSEn58fHxERYe/t7RXFcazVasX2chdmUA2pCV9fXx4e
+        3fbY2FiC4BiMie3lLsygMyQm0gFsKWwtRXu5CzPoCrjQBLYSthS2lqK93IN4/QUjgLsVXMNmNAAAAABJ
+        RU5ErkJggg==
+</value>
+  </data>
+  <metadata name="ToolTip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>560, 17</value>
+  </metadata>
+  <metadata name="StatusStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>546, 65</value>
+  </metadata>
+  <metadata name="bn.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>691, 56</value>
+  </metadata>
+  <metadata name="bs.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>783, 17</value>
+  </metadata>
+  <metadata name="IreaDataSet1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>660, 17</value>
+  </metadata>
+  <metadata name="ToolStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>144, 56</value>
+  </metadata>
+  <metadata name="ContextMenuStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>253, 56</value>
+  </metadata>
+  <metadata name="MenuStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>413, 56</value>
+  </metadata>
+  <metadata name="view1_Sheet1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>17, 56</value>
+  </metadata>
+  <data name="ButtonCellType1.Picture" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAACBjSFJNAAB6
+        JgAAgIQAAPoAAACA6AAAdTAAAOpgAAA6mAAAF3CculE8AAABcElEQVQ4T52RP2sCQRTE/TD5aoIBG1Pk
+        IHhNrGxiEwuFSCSmzNnf2eaEmIiiF3KBaPBsbLTQ4gTDZOft+i8WEh/8bnYeOwPHJgAkqtV7HOPc+RZ4
+        f5dNwbFheGBUzWkFpVcclMinUrnjAqufFXz/WeHvwf264G+JFJTLJRrEcYwoGimijY5GI8TLpQTOrtw9
+        mJWCYvGWBovFYstc63yHl1Zrg8nogkLhhgbT6Qye58L1PKWeVteV81qns5ncNRldkM/naTCZTBC8B0I/
+        UErod868wzEZXZDLXdMgGo/N/yvlWbzZidfKMRldYNtZGgwGQ9QdB46i7jzBqfOslDtz/hryDQA7a1N0
+        gWVd0iAMQ/hNPl1z7xmb3Mnex8dnKHcty6LogsxFhga9oC/w/4V+gJ5CVPYKdeZkMpLRBel0mgadbhe1
+        2sOWR1KTvaYjcExGF6RSKRq8tdtoNBoHcL8Lx2R0QTKZpPnXmMy24BQAJH4B0qBEm6dSDJUAAAAASUVO
+        RK5CYII=
+</value>
+  </data>
+  <data name="ButtonCellType2.Picture" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAACBjSFJNAAB6
+        JgAAgIQAAPoAAACA6AAAdTAAAOpgAAA6mAAAF3CculE8AAABh0lEQVQ4T6WSTUsCURSG76If52pmMRJY
+        CwPBIQJt48eiaaVtVAI3Co0wezcxWeoiRZzIkPykhWAItbJd0aLanM45d0YlIcgOvLz3uXOeC4LCsiwb
+        AxvGpgdg0yFXmKbJUC7P/xSaErqiWCwwVKuv0OvBWq5alTU+yG2xUygWQeTzeYZG4x1GI+CMxzJ1Ry7X
+        sMd4T018/rjNDrkim8kwdLsfMJkAXN9VFu0tU6+y90AmmwWRTqUYZjOA1r1cavVkV59CUMNQE9O59hyC
+        y4tddsgVhmEw3Ayl5LwkuNvYlEZ9H++SfN+eJ6CJbPt87JAr4rEYA0mDtxxn6HanmeTlTjPBfOsyhMPs
+        xOMxEJFIhGH6ZXEGzglMPy3oY/Ny9JB7yVEZHHJFOKwzkNx30rz00DmVy/TzjCOAY8NlPHvB0XUdRDC4
+        x+DJkMsu+tfgkCt2AgEGlkr4r/wZ82yFvTM2TgBdofk1hk1G0/wgVEW1MaBguFVsVcEsmb7Je/ebokhW
+        FFvgQ/8IiG/vQQ/RNOn8sQAAAABJRU5ErkJggg==
+</value>
+  </data>
+  <data name="DateTimeCellType1.Calendar" mimetype="application/x-microsoft.net.object.binary.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAEAQAAACZTeXN0ZW0uR2xvYmFsaXphdGlvbi5HcmVnb3JpYW5DYWxlbmRh
+        cgYAAAAGbV90eXBlEW1fY3VycmVudEVyYVZhbHVlD3R3b0RpZ2l0WWVhck1heBpDYWxlbmRhcittX2N1
+        cnJlbnRFcmFWYWx1ZRVDYWxlbmRhcittX2lzUmVhZE9ubHkYQ2FsZW5kYXIrdHdvRGlnaXRZZWFyTWF4
+        AwAAAAAAK1N5c3RlbS5HbG9iYWxpemF0aW9uLkdyZWdvcmlhbkNhbGVuZGFyVHlwZXMICAgBCAT+////
+        K1N5c3RlbS5HbG9iYWxpemF0aW9uLkdyZWdvcmlhbkNhbGVuZGFyVHlwZXMBAAAAB3ZhbHVlX18ACAEA
+        AAD///////////////8A/////ws=
+</value>
+  </data>
+  <metadata name="TA_Main.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>17, 17</value>
+  </metadata>
+  <metadata name="TA_JUNJU.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>147, 17</value>
+  </metadata>
+  <metadata name="TA_ETC.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>286, 17</value>
+  </metadata>
+  <metadata name="TA_JIJUNG.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>436, 17</value>
+  </metadata>
+  <metadata name="TA_Cable2.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>757, 56</value>
+  </metadata>
+  <metadata name="TA_CableLabel.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>17, 95</value>
+  </metadata>
+  <metadata name="TA_Cable.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>149, 95</value>
+  </metadata>
+  <metadata name="TA_Deung.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>252, 95</value>
+  </metadata>
+  <metadata name="TA_Karo.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>361, 95</value>
+  </metadata>
+  <metadata name="TA_Kiki.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>458, 95</value>
+  </metadata>
+  <metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
+    <value>131</value>
+  </metadata>
+  <data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAABAAIAICAQAAAAAADoAgAAJgAAACAgAAAAAAAAqAgAAA4DAAAoAAAAIAAAAEAAAAABAAQAAAAAAIAC
+        AAAAAAAAAAAAABAAAAAAAAAAAAAAAAAAgAAAgAAAAICAAIAAAACAAIAAgIAAAMDAwACAgIAAAAD/AAD/
+        AAAA//8A/wAAAP8A/wD//wAA////AAAAAAAAAERAQEBAAAAAAAAAAAAABEREREREBAQAAAAAAAAABESE
+        hISEhIRAQAAAAAAAAEiIiEhISEhIRIQAAAAAAASIiIiIiIiEhICIQAAAAABIiIiEBAQEBAhEiIQAAAAE
+        iIh4dH///3cEgHiIQAAASIiHh4hC//cgiESHiIQAAEiIeHh4dH/3CIiEeHiEAASIh4eHh4R/9wiIhHeH
+        iEAEiHh4eHh0f/cIeIR3eHhABIeHh4eHhH/3CIiEd3eIQEh4eHd3d3R/9wh4gnd3eIRHh4d3d3d0f/cI
+        iEd3d4eESHh3d3d3dH/3CIhHd3d4hEeHd3d3d3R/9wiCh3d3d4RId3d3d3d0f/cIhHd3d3h0R3d3d3dy
+        Qn/3CEd3d3d3hEh3d3d3dP//9wiHd3d3eHRHd3d3d3dEf/cEd3d3d3eEBHd3d3d3d0f3B/d3d3d3gAR3
+        d3d/f3dwB093d3d3d0AEd3d3d3d4RASH93d3d3dAAEd3f39/dPd4T3d3d3d0AABHd/f3dE//9wf3d3d3
+        dAAABHd/dEcP//cPd3d3d0AAAABEREf/B//3B/d3d3QAAAAABHf/f3B/cI93d3dAAAAAAABHf//3AAj3
+        d3d0AAAAAAAAAAd3//9/d3d0QAAAAAAAAAAAAIf393dEQAAAAAAAAAAAAAAAAAAAAAAAAAAA//AAD/+A
+        AAf+AAAP/AAAP/gAAB/wAAAP4AAAB8AAAAPAAAADgAAAAYAAAAGAAAABAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAACAAAABgAAAAYAAAAHAAAADwAAAA+AAAAfwAAAP+AAAH/wAAD/+AAB//4AB///w
+        D/8oAAAAIAAAAEAAAAABAAgAAAAAAIAEAAAAAAAAAAAAAAAAAAAAAAAA////AP///wD///8A////AP//
+        /wD///8Azv//AM7//wDO//8Azv//AM7//wAA//8AAP//AAD//wAA//8AAP//AJzO/wCczv8AnM7/AJzO
+        /wCczv8AzmP/AM5j/wDOY/8AzmP/AM5j/wDv7+8A7+/vAO/v7wDv7+8A7+/vAN7e3gDe3t4A3t7eAN7e
+        3gDe3t4A///OAP//zgD//84A///OAP//zgD/zs4A/87OAP/OzgD/zs4A/87OAM7OzgDOzs4Azs7OAM7O
+        zgDOzs4AY5zOAGOczgBjnM4AY5zOAGOczgC9vb0Avb29AL29vQC9vb0Avb29AK2trQCtra0Ara2tAK2t
+        rQCtra0A//+cAP//nAD//5wA//+cAP//nAD/nJwA/5ycAP+cnAD/nJwA/5ycAJycnACcnJwAnJycAJyc
+        nACcnJwAjIyMAIyMjACMjIwAjIyMAIyMjABzc3MAc3NzAHNzcwBzc3MAc3NzAHNzcwDOY2MAzmNjAM5j
+        YwDOY2MAzmNjAGNjYwBjY2MAY2NjAGNjYwBjY2MAUlJSAFJSUgBSUlIAUlJSAFJSUgBCQkIAQkJCAEJC
+        QgBCQkIAQkJCAGOcMQBjnDEAY5wxAGOcMQBjnDEAY2MxAGNjMQBjYzEAY2MxAGNjMQCcMTEAnDExAJwx
+        MQCcMTEAnDExAGMxMQBjMTEAYzExAGMxMQBjMTEAMTExADExMQAxMTEAMTExADExMQAAMTEAADExAAAx
+        MQAAMTEAADExAJwAMQCcADEAnAAxAJwAMQCcADEAMQAxADEAMQAxADEAMQAxADEAMQAAADEAAAAxAAAA
+        MQAAADEAAAAxACEhIQAhISEAISEhACEhIQAhISEAAAAhAAAAIQAAACEAAAAhAAAAIQAQEBAAEBAQABAQ
+        EAAQEBAAEBAQAAAAEAAAABAAAAAQAAAAEAAAABAAAL0AAAC9AAAAvQAAAL0AAAC9AAD/nAAA/5wAAP+c
+        AAD/nAAA/5wAAP+cAACcYwAAnGMAAJxjAACcYwAAnGMAAGNjAABjYwAAY2MAAGNjAABjYwAAnDEAAJwx
+        AACcMQAAnDEAAJwxAABjMQAAYzEAAGMxAABjMQAAYzEAADExAAAxMQAAMTEAADExAAAxMQAAABAAAAAQ
+        AAAAEAAAABAAAAAQAAAAEAAAcwAAAHMAAABzAAAAcwAAAHMAAABSAAAAUgAAAFIAAABSAAAAUgAAAEIA
+        AABCAAAAQgAAAEIAAABCAAAAMQAAADEAAAAxAAAAMQAAADEAAAAhAAAAIQAAACEAAAAhAAAAIQAAABAA
+        AAAQAAAAEAAAABAAAAAQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAPv7+/v7+/v7+/v7+39/
+        f/l/+X/5f/n5+fn5+fn7+/v7+/v7+/v7+/v7f39/f39/f39/f3/5f/l/+fn5+fn7+/v7+/v7+/v7f39/
+        XH9cf1x/XH9cf1x/f/l/+fn5+/v7+/v7+/v7+39cXFxcXH9cf1x/XH9cf1x/f1x/+/v7+/v7+/v7+/t/
+        XFxcXFxcXFxcXFxcXH9cf1z5XFx/+/v7+/v7+/v7f1xcXFxcXI75f/l/+X/5f/lcf39cXGZ/+/v7+/v7
+        +39cXFxcR1xHji4AABoaGi49+X9c+UdcXGZ/+/v7+/t/XFxcXEdcR1xcjmsAABo4a/lcXH9/XEdcXGZ/
+        +/v7+39cXFxHXEdcR1xHji4AAD35XFxcXH9HXEdcXH/7+/t/XFxcR1xHXEdcR1yOLgAAOJ1mXFxcf0c9
+        XEdcZn/7+39cXEdcR1xHXEdcR44uAAA9+VxHXFx/R0c9XEdcf/v7f1xHXEdcR1xHXEdcji4AADidZlxc
+        XH9HPUc9XFx/+39cR1xHXEdHR0dHR0eOLgAAPflcR1xcazhHPUdHXGZ/f0dcR1xHR0dHR0dHR44uAAA4
+        nWZcXH9HRzhHPVxHZn9/XEdcR0dHR0cpRylHji4AAD35XFxcf0c4RzhHPVxcf45HXEdHR0cpR0cpRymO
+        LgAAOJ1mXGtcKUc4RzhHR1x/f1xHR0dHKUcpRykpKY4uAAA9+VxcfylHLkc4Rz1cR3+OR0dHRylHKUcp
+        KWuOay4AADidZn8uRy5HLkc4R0dcf39cR0cpRykpKSkpjgAAAAAAPflcXCkuRy5HLkc9XEd/jkdHKUcp
+        KSkpKSkpjo4uAAA4nX8pKSkuRy5HOEdHXH/7jilHKSkpKSkpKSkpKX8uAD35KRopLikuRy5HPUdc+/uO
+        RykpKSkpKRopGikpKZ2dOH8aKSkpLkcuRzhHR3/7+45HRykpKSkpKSkpKVF/f51/USkaKS4pLkcuR0dH
+        f/v7+44pKSkpGikaKRopfxouPVF/GikpKS5HLkc4R3/7+/v7jkcpKRopGikpf38aGgAaPfkpGikpKSlH
+        LkdHf/v7+/v7jkcpKRopjn8p+RoAGhounRopKSkpRy5HR3/7+/v7+/v7jn+Of44pGhr5OBoAAC75KRop
+        KUcuR0d/+/v7+/v7+/v7fykpGhopGin5OBou+VEaKSkpKUdHf/v7+/v7+/v7+/v7fykpGhoaGin5+flR
+        GikpKUdHR3/7+/v7+/v7+/v7+/v7+fkpKSkaGhoaKRopKSlHR45/+/v7+/v7+/v7+/v7+/v7+/n5+VEp
+        GikaKSlHjo6O+/v7+/v7+/v7+/v7+/v7+/v7+/v7+fn5+fn5+fn7+/v7+/v7+/v7+/v/8AAP/4AAB/4A
+        AA/8AAA/+AAAH/AAAA/gAAAHwAAAA8AAAAOAAAABgAAAAYAAAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAIAAAAGAAAABgAAAAcAAAAPAAAAD4AAAB/AAAA/4AAAf/AAAP/4AAH//gAH///AP/w==
+</value>
+  </data>
+</root>

Epole.fp13/Frm_Main.vb

@@ -0,0 +1,700 @@
+Public Class Frm_Main
+    Private Function Terminate() As Boolean
+        Dim Msg As New System.Text.StringBuilder("프로그램을 종료하시겠습니까?")
+        If MsgBox(Msg.ToString, MsgBoxStyle.Information + MsgBoxStyle.OkCancel, "종료") = MsgBoxResult.Ok Then
+            End
+        Else
+            Return True
+        End If
+    End Function
+
+    Private Sub MakeList_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
+        Me.CHk_Modify()
+        e.Cancel = Me.Terminate
+        'If Not Me.IreaDataSet1.HasChanges Then Return '//변경된게 없으면 바로 나간다.
+        'If MsgBox("변경된 데이터를 저장하시겠습니까?", MsgBoxStyle.Information + MsgBoxStyle.OkCancel, "저장확인") <> MsgBoxResult.Ok Then
+        '    Me.IreaDataSet1.RejectChanges()
+        'Else
+        '    Try
+        '        Me.BindingSource1.EndEdit()
+        '        Me.ssableAdapter.Update(Me.IreaDataSet1.Maintable)
+        '        IreaDataSet1.AcceptChanges()
+        '        view1.ActiveSheet.GetDataView(True)
+        '    Catch ex As Exception
+        '        MsgBox("데이터베이스 업데이트중 오류가 발생했습니다" & vbCrLf & vbCrLf & ex.ToString, MsgBoxStyle.Critical, "ERROR")
+        '        Me.BindingSource1.CancelEdit()
+        '        IreaDataSet1.RejectChanges()
+        '        view1.ActiveSheet.GetDataView(True)
+        '    End Try
+        'End If
+    End Sub
+
+    Private Sub MakeList_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
+        If e.KeyCode = Keys.F12 AndAlso e.Control Then
+            If ETCLOGIN.ShowDialog = System.Windows.Forms.DialogResult.OK Then
+                Me.bt_others.Visible = True
+                IsPro = True
+            Else
+                IsPro = False
+            End If
+        End If
+    End Sub
+
+    Private Sub MakeList_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
+        Me.view1.ASetting_Load(False)
+        Me.Text = My.Application.Info.ProductName & " Ver. {0}.{1:00}.{2}.{3}"
+        Me.Text = System.String.Format(Me.Text, My.Application.Info.Version.Major, My.Application.Info.Version.Minor, My.Application.Info.Version.Build, My.Application.Info.Version.Revision)
+
+        Me.view1.Font = New Font(ViewFont.FontName, ViewFont.FontSize, Me.Font.Style)   '//글자정보 불러오기
+        ' Me.ToolStrip1.Font = New Font(MenuFont.FontName, MenuFont.FontSize, Me.Font.Style)   '//글자정보 불러오기
+        Me.bn.Font = New Font(MenuFont.FontName, MenuFont.FontSize, Me.Font.Style)   '//글자정보 불러오기
+        Me.StatusStrip1.Font = New Font(MenuFont.FontName, MenuFont.FontSize, Me.Font.Style)   '//글자정보 불러오기
+        Me.Display_Data()    '//데이터를 보여준다.
+        Me.SETTOOLTIP()
+        Me.SetFarPoint()
+    End Sub
+    Private Sub SETTOOLTIP()
+        Dim TMSG As New System.Text.StringBuilder()
+        TMSG.AppendLine()
+        TMSG.AppendLine("더블클릭시에는 세부내역을 표시합니다")
+        TMSG.AppendLine("[총수량] 은 세부내역의 갯수로 자동변경되므로 수정이 불가능합니다.")
+        TMSG.AppendLine()
+        TMSG.AppendLine("<단축키 : ENTER:다음칸 , SHIFT+TAB:이전칸 , ALT+ENTER:윗칸복사>")
+        TMSG.AppendLine("<단축키 : DELETE:현재칸 지우기 , SHIFT+DELETE 현재줄 삭제>")
+        TMSG.AppendLine("<단축키 : SPACE-BAR:현재칸 편집>")
+        TMSG.AppendLine("<단축키 : CTRL + 마우스휠 : 화면크기를 조절합니다>")
+        TMSG.AppendLine()
+        Me.ToolTip1.SetToolTip(Me.view1, TMSG.ToString)
+
+        'TMSG = New System.Text.StringBuilder()
+        'TMSG.AppendLine()
+        'TMSG.AppendLine("데이터베이스의 내용을 다시 조회합니다.")
+        'Me.bt_find.ToolTipText = TMSG.ToString
+        'Me.ToolTip1.SetToolTip(Me.SortGroup1, TMSG.ToString)
+
+        'TMSG = New System.Text.StringBuilder()
+        'TMSG.AppendLine()
+        'TMSG.AppendLine("검색문자의 우선순위 : 숫자->영문자->한글")
+        'TMSG.AppendLine("    ->0  은 000 보다 우선순위가 높습니다.")
+        'Me.ToolTip1.SetToolTip(Me.SerchGroup1, TMSG.ToString)
+    End Sub
+
+    Private Sub SetFarPoint()
+        Me.view1.AEnterToNextItem()
+    End Sub
+
+    Private Sub CHk_Modify(Optional ByVal prompt As Boolean = True)
+        Dim Cnt As Integer = 0
+        Me.bs.EndEdit()
+        If Not Me.IreaDataSet1.HasChanges Then
+            NOTICE("변경된 내용이 없습니다", Me.lb_msg)
+            Return
+        End If
+        If prompt Then
+            If MsgBox("변경된 데이터를 저장하시겠습니까?", MsgBoxStyle.Information + MsgBoxStyle.OkCancel, "저장확인") <> MsgBoxResult.Ok Then Return
+        End If
+        NOTICE("잠시만 기다려주세요...(적용하는중)", Color.Blue, Me.lb_msg)
+        Me.Refresh()
+
+        Try
+            Cnt = Me.TA_Main.Update(Me.IreaDataSet1.MainTable)
+            Me.TA_JUNJU.Update(Me.IreaDataSet1.jjutable)
+            Me.TA_ETC.Update(Me.IreaDataSet1.EtcTable)
+            Me.TA_JIJUNG.Update(Me.IreaDataSet1.jjungtable)
+            Me.TA_Cable2.Update(Me.IreaDataSet1.Detail_Cable2)
+            Me.TA_CableLabel.Update(Me.IreaDataSet1.Detail_CableLabel)
+            Me.TA_Cable.Update(Me.IreaDataSet1.Detail_Cable)
+            Me.TA_Deung.Update(Me.IreaDataSet1.Detail_Deung)
+            Me.TA_Karo.Update(Me.IreaDataSet1.Detail_karo)
+            Me.TA_Kiki.Update(Me.IreaDataSet1.Detail_kiki)
+            Me.IreaDataSet1.AcceptChanges()
+            NOTICE(Cnt & "개의 데이터가 적용되었습니다", Color.Green, Me.lb_msg)
+        Catch ex As Exception
+            MsgBox("데이터베이스 변경중 오류가 발생했습니다" & vbCrLf & vbCrLf & ex.ToString, MsgBoxStyle.Critical, "ERROR-")
+            Me.bs.CancelEdit()
+            Me.IreaDataSet1.RejectChanges()
+            NOTICE("적용오류 : " & ex.ToString, Color.Tomato, Me.lb_msg)
+        End Try
+
+
+    End Sub
+
+    Public Sub Display_Data()   '//뷰에데이터를 표시한다.
+        NOTICE("데이터 조회중...", Me.lb_msg)
+        Dim I As Integer = 0
+        Me.TA_Main.Fill(Me.IreaDataSet1.MainTable)
+        'Dim Dv As New DataView(Me.IreaDataSet1.Maintable, Me.SerchGroup1.GetWhere(False, False, False), Me.SortGroup1.GetSort(False), DataViewRowState.CurrentRows)
+
+        Me.bs.DataSource = Me.IreaDataSet1.MainTable 'Dv
+        NOTICE(Me.view1.ActiveSheet.RowCount & "개의 목록이 검색되었습니다", Me.lb_msg)
+    End Sub
+
+    Private Sub Delete_itm(Optional ByVal prompt As Boolean = True)
+
+        If Me.bs.Current Is Nothing Then Return
+
+        Dim DRv As DataRowView = bs.Current
+        If DRv("id") <= 6 Then
+            MsgBox("샘플데이터는 삭제할 수 없습니다", MsgBoxStyle.Information, "확인")
+            Return
+        End If
+
+        Dim V_Type As Int16
+        Dim A As New System.Text.StringBuilder("경고 : 해당데이터와 하위데이터가 삭제됩니다")
+        A.AppendLine()
+        A.AppendLine("계속하시겠습니까?-취소불가")
+
+        If prompt Then
+            If MsgBox(A.ToString, MsgBoxStyle.Information + MsgBoxStyle.OkCancel, "삭제확인") <> MsgBoxResult.Ok Then Exit Sub
+        End If
+
+        Dim DelIDX As Integer   '//관리Id이다.
+        With Me.view1
+            DelIDX = .Cells(.ActiveRowindex, "ID").Value '//0번째값은 관리id이다
+            V_Type = .Cells(.ActiveRowindex, "번호찰구분").Value
+        End With
+
+        'MsgBox(DelIDX)
+        'MsgBox(V_Type)
+
+        'Return
+
+        CHk_Modify(False)
+        'Me.bs.RemoveCurrent()    '//현재템을 삭제한다.
+        '전주세부테이블에서 전부 죽인다.
+
+        Dim Cmd As New OleDbCommand("delete from 전주관리  where id=" & DelIDX, Me.TA_JUNJU.Connection)
+        If Cmd.Connection.State <> ConnectionState.Open Then Cmd.Connection.Open()
+        Cmd.ExecuteNonQuery()
+
+        Dim DelCnt As Integer = 0
+        Select Case V_Type
+            Case 0
+                'Me.Text = "가공(일반) 가져오기"
+                Cmd = New OleDbCommand("delete from  전주세부  where 관리id=" & DelIDX, Me.TA_JUNJU.Connection)
+                If Cmd.Connection.State <> ConnectionState.Open Then Cmd.Connection.Open()
+                Cmd.ExecuteNonQuery()
+
+                'Me.TA_JUNJU.Fill(Me.IreaDataSet1.jjutable, DelIDX)
+                'Me.PRB1.Minimum = 0
+                'If Me.IreaDataSet1.jjutable.Rows.Count > 0 Then
+                '    Me.PRB1.Maximum = Me.IreaDataSet1.jjutable.Rows.Count - 1
+                '    Me.PRB1.Value = 0
+                '    For Each Z As DataRow In Me.IreaDataSet1.jjutable.Rows
+                '        Z.Delete()
+                '        DelCnt += 1
+                '        If PRB1.Value < Me.PRB1.Maximum Then Me.PRB1.Value += 1
+                '    Next
+                'End If
+                'NOTICE(DelCnt & "개의 세부데이터가 삭제되었습니다", Color.Red, Me.lb_msg)
+            Case 1
+                'Me.Text = "지중(일반) 가져오기"
+                Cmd = New OleDbCommand("delete from  지중세부  where 관리id=" & DelIDX, Me.TA_JUNJU.Connection)
+                If Cmd.Connection.State <> ConnectionState.Open Then Cmd.Connection.Open()
+                Cmd.ExecuteNonQuery()
+
+            Case 9
+                'Me.Text = "중요수용 가져오기"
+                Cmd = New OleDbCommand("delete from  기타세부  where 관리id=" & DelIDX, Me.TA_JUNJU.Connection)
+                If Cmd.Connection.State <> ConnectionState.Open Then Cmd.Connection.Open()
+                Cmd.ExecuteNonQuery()
+
+            Case 2
+                'Me.Text = "정액등 가져오기"
+                Cmd = New OleDbCommand("delete from  Detail_Deung  where 관리id=" & DelIDX, Me.TA_JUNJU.Connection)
+                If Cmd.Connection.State <> ConnectionState.Open Then Cmd.Connection.Open()
+                Cmd.ExecuteNonQuery()
+
+
+            Case 4
+                'Me.Text = "가공(기기) 가져오기"
+                Cmd = New OleDbCommand("delete from  기기세부  where 관리id=" & DelIDX, Me.TA_JUNJU.Connection)
+                If Cmd.Connection.State <> ConnectionState.Open Then Cmd.Connection.Open()
+                Cmd.ExecuteNonQuery()
+
+            Case 6
+                'Me.Text = "지중(맨홀표시찰및계통도) 가져오기"
+                Cmd = New OleDbCommand("delete from  Detail_cable  where 관리id=" & DelIDX, Me.TA_JUNJU.Connection)
+                If Cmd.Connection.State <> ConnectionState.Open Then Cmd.Connection.Open()
+                Cmd.ExecuteNonQuery()
+
+
+            Case 7
+                'Me.Text = "지중(케이블표시라벨) 가져오기"
+                Cmd = New OleDbCommand("delete from  Detail_CableLabel  where 관리id=" & DelIDX, Me.TA_JUNJU.Connection)
+                If Cmd.Connection.State <> ConnectionState.Open Then Cmd.Connection.Open()
+                Cmd.ExecuteNonQuery()
+
+
+
+            Case 8
+                'Me.Text = "지중(기기표시찰) 가져오기"
+
+                Cmd = New OleDbCommand("delete from  Detail_Cable2  where 관리id=" & DelIDX, Me.TA_JUNJU.Connection)
+                If Cmd.Connection.State <> ConnectionState.Open Then Cmd.Connection.Open()
+                Cmd.ExecuteNonQuery()
+
+            Case Else
+                'Me.Text = "번호찰 가져오기(" & 관리구분 & ")"
+        End Select
+        Display_Data()
+    End Sub
+
+    Private Sub CustFP1_ButtonClicked(ByVal sender As Object, ByVal e As FarPoint.Win.Spread.EditorNotifyEventArgs) Handles view1.ButtonClicked
+        Dim Active As Boolean = False
+        With Me.view1
+
+            If e.Column = .ColIndex2("그림") Then    '//그림연결메뉴이다
+                '//가공번호찰만 그림연결을 한다.
+                If IsPro = False Then
+                    MsgBox("이 기능은 더이상 사용할 수 없습니다", MsgBoxStyle.Critical, "확인")
+                Else
+                    If .Cells("번호찰구분").Value = 0 Then  '//번호찰 종류 0은 일반 9는 기타번호찰                  
+                        Dim A As New PicList(Me.view1.ActiveSheet.Cells(Me.view1.ActiveSheet.ActiveRowIndex, 0).Value)
+                        A.MdiParent = Me.ParentForm
+                        A.Show()
+                    Else    '//
+                        NOTICE("그림연결은 [가공]번호찰만 가능합니다", Color.Red, Me.lb_msg)
+                        'MsgBox("지원되지 않는 기능입니다", MsgBoxStyle.Information, "확인")
+                    End If
+                End If
+            End If
+        End With
+    End Sub
+
+    Private Sub view_detail()
+        CHk_Modify()   '//변경여부를 묻늗느. 종료한다.    'qr코드  --가공일반만 적용됨
+
+        Dim Rowindex As Short = Me.view1.ActiveSheet.ActiveRow.Index
+        Dim ID, NAME, BIGO, DAN, V_DATE, si, hom, kwan, kwan1, kwan2 As String
+        Dim V_Type As Int16 = 0
+
+
+        '//데이터를 가져온다.
+        Dim Dr As System.Data.DataRowView = Me.bs.Current
+        ID = Dr("ID") '.Cells(Rowindex, 0).Value
+
+        If Dr("날짜") Is DBNull.Value Then
+            V_DATE = ""
+        Else
+            V_DATE = Dr("날짜") '.Cells(Rowindex, 4).Value
+        End If
+
+        If Dr("거래처명") Is DBNull.Value Then
+            NAME = ""
+        Else
+            NAME = Dr("거래처명") '.Cells(Rowindex, 4).Value
+        End If
+
+        If Dr("비고") Is DBNull.Value Then
+            BIGO = ""
+        Else
+            BIGO = Dr("비고") '.Cells(Rowindex, 4).Value
+        End If
+
+        If Dr("단가") Is DBNull.Value Then
+            DAN = ""
+        Else
+            DAN = Dr("단가") '.Cells(Rowindex, 4).Value
+        End If
+
+        If Dr("시공자") Is DBNull.Value Then
+            si = ""
+        Else
+            si = Dr("시공자") '.Cells(Rowindex, 4).Value
+        End If
+
+        If Dr("홈페이지") Is DBNull.Value Then
+            hom = ""
+        Else
+            hom = Dr("홈페이지") '.Cells(Rowindex, 4).Value
+        End If
+
+        If Dr("관리") Is DBNull.Value Then
+            kwan = ""
+        Else
+            kwan = Dr("관리") '.Cells(Rowindex, 4).Value
+        End If
+
+        If Dr("관리1") Is DBNull.Value Then
+            kwan1 = ""
+        Else
+            kwan1 = Dr("관리1") '.Cells(Rowindex, 4).Value
+        End If
+
+        If Dr("관리2") Is DBNull.Value Then
+            kwan2 = ""
+        Else
+            kwan2 = Dr("관리2") '.Cells(Rowindex, 4).Value
+        End If
+
+
+        V_Type = (Me.view1.ActiveSheet.Cells(Rowindex, 10).Value) '//번호찰 종류 0은 일반 9는 기타번호찰
+        'MsgBox(V_Type)
+
+        If V_Type = 0 Then   '//일반가공번호찰이다.
+            '            Dim A As New AddEpole(ID, V_DATE, NAME, BIGO, DAN, si, hom, kwan, kwan1, kwan2)
+            Dim A As New AddEpole(ID, V_DATE, NAME, BIGO, DAN, si, hom, kwan, kwan1, kwan2)
+            A.Show()
+        ElseIf V_Type = 9 Then '//기타번호찰(현재로서는 고압중요수용표찰
+            Dim A As New AddEpoleETC(ID, V_DATE, NAME, BIGO, DAN)
+            A.Show()
+        ElseIf V_Type = 1 Then '//지중번호찰(현재로서는 고압중요수용표찰
+            Dim A As New AddEpoleJJ(ID, V_DATE, NAME, BIGO, DAN)
+            A.Show()
+        ElseIf V_Type = 2 Then '//정액등
+            Dim A As New AddEpoleDung(ID, V_DATE, NAME, BIGO, DAN)
+            A.Show()
+        ElseIf V_Type = 4 Then '//기기용
+            Dim A As New AddEpolekiki(ID, V_DATE, NAME, BIGO, DAN)
+            A.Show()
+        ElseIf V_Type = 6 Then '//지중(케이블)
+            Dim A As New AddEpoleCable(ID, V_DATE, NAME, BIGO, DAN)
+            A.Show()
+        ElseIf V_Type = 8 Then '//지중(케이블)
+            Dim A As New AddEpoleCable2(ID, V_DATE, NAME, BIGO, DAN)
+            A.Show()
+        ElseIf V_Type = 7 Then '//지중(케이블선로표시라벨)
+            Dim A As New AddEpoleCableLabel(ID, V_DATE, NAME, BIGO, DAN)
+            A.Show()
+        End If
+        'If A.ShowDialog = System.Windows.Forms.DialogResult.OK Then Me.bt_find.PerformClick()
+    End Sub
+
+
+    Private Sub CustFP1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles view1.KeyDown
+        e.Handled = True
+        e.SuppressKeyPress = False
+        If e.Shift AndAlso e.KeyCode = Keys.Delete Then '/delete
+            e.Handled = True
+            Delete_itm(True)
+        End If
+    End Sub
+
+    Private Sub BindingNavigatorDeleteItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BindingNavigatorDeleteItem.Click
+        Delete_itm(True)
+    End Sub
+
+    Private Sub bt_commit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bt_commit.Click
+        If Not Me.IreaDataSet1.HasChanges Then
+            NOTICE("변경된 데이터가 없습니다", Color.Red, Me.lb_msg)
+            Return
+        Else
+            CHk_Modify()
+        End If
+    End Sub
+
+    Private Sub bt_cancel_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bt_cancel.Click
+        If Not Me.IreaDataSet1.HasChanges Then
+            NOTICE("변경된 데이터가 없습니다", Color.Red, Me.lb_msg)
+            Return
+        Else
+            Me.IreaDataSet1.RejectChanges()
+            NOTICE("변경된 데이터가 복원되었습니다", Color.Blue, Me.lb_msg)
+        End If
+    End Sub
+
+    Private Sub ToolStripButton1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButton1.Click
+        Me.Close()
+    End Sub
+    Private Sub ToolStripButton6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButton6.Click
+        Delete_itm(True)
+    End Sub
+
+    Private Sub ToolStripButton7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButton7.Click
+        CHk_Modify()
+    End Sub
+
+    Private Sub ToolStripButton8_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButton8.Click
+        If Not Me.IreaDataSet1.HasChanges Then
+            NOTICE("변경된 데이터가 없습니다", Color.Red, Me.lb_msg)
+            Return
+        Else
+            Me.IreaDataSet1.RejectChanges()
+            NOTICE("변경된 데이터가 복원되었습니다", Color.Blue, Me.lb_msg)
+        End If
+    End Sub
+
+    Private Sub bt_close_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bt_close.Click
+        Me.Close()
+    End Sub
+
+    Private Sub view1_CellDoubleClick(ByVal sender As Object, ByVal e As FarPoint.Win.Spread.CellClickEventArgs) Handles view1.CellDoubleClick
+        view_detail()
+        e.Cancel = True
+    End Sub
+
+    Private Sub view1_Enter(ByVal sender As Object, ByVal e As System.EventArgs) Handles view1.Enter
+        NOTICE("목록을 더블클릭하면 세부내역을 볼 수 있습니다", Me.lb_msg)
+    End Sub
+
+    Private Sub view1_CellClick(ByVal sender As System.Object, ByVal e As FarPoint.Win.Spread.CellClickEventArgs) Handles view1.CellClick
+
+    End Sub
+
+    Private Sub ToolStripButton9_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bt_find.Click
+        CHk_Modify()   '//변경여부를 묻늗느. 종료한다.
+        Display_Data()
+    End Sub
+
+    Private Sub ToolStripButton9_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs)
+
+    End Sub
+
+    Private Sub ToolStripButton11_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
+
+    End Sub
+
+    Private Sub ToolStripButton10_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bt5.Click
+        Dim A() As DataRow = Me.IreaDataSet1.MainTable.Select(vbNullString, "ID desc")
+        Dim MaxId As Integer
+        Try
+            MaxId = A(0)(0).ToString
+        Catch ex As Exception
+            MaxId = 0
+        End Try
+        Dim f As New AddEpoleETC(MaxId + 1)
+        f.MdiParent = Me.ParentForm
+        Select Case PoleEtcState.ToUpper    'picstate 는 ini 파일에 정의되어잇다
+            Case "MAX"
+                f.WindowState = FormWindowState.Maximized
+            Case "MIN"
+                f.WindowState = FormWindowState.Minimized
+            Case Else
+                f.WindowState = FormWindowState.Normal
+        End Select
+        f.Show() '  If f.ShowDialog = System.Windows.Forms.DialogResult.OK Then Me.bt_find.PerformClick()
+    End Sub
+
+    'Private Function GetPAss2() As Boolean
+    '    If Admin Then Return True
+    '    Dim A As DialogResult = LoginForm2.ShowDialog
+    '    Dim TExt As String = LoginForm2.PasswordTextBox.Text
+    '    If A = System.Windows.Forms.DialogResult.OK Then
+    '        If TExt = "haegwang" Then
+    '            Return True
+    '        Else
+    '            Return False
+    '        End If
+    '    Else
+    '        Return False
+    '    End If
+
+    'End Function
+
+    Private Sub bt_jongak_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
+
+        Dim A() As DataRow = Me.IreaDataSet1.MainTable.Select(vbNullString, "ID desc")
+        Dim MaxId As Integer
+        Try
+            MaxId = A(0)(0).ToString
+        Catch ex As Exception
+            MaxId = 0
+        End Try
+        Dim f As New AddEpoleDung(MaxId + 1)
+        'f.MdiParent = Me.ParentForm
+        'Select Case PoleEtcState.ToUpper    'picstate 는 ini 파일에 정의되어잇다
+        '    Case "MAX"
+        '        f.WindowState = FormWindowState.Maximized
+        '    Case "MIN"
+        '        f.WindowState = FormWindowState.Minimized
+        '    Case Else
+        '        f.WindowState = FormWindowState.Normal
+        'End Select
+        f.Show() '  If f.ShowDialog = System.Windows.Forms.DialogResult.OK Then Me.bt_find.PerformClick()
+
+    End Sub
+
+    Private Sub bt_savecolsize_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bt_savecolsize.Click
+        Me.view1.ASetting_Save(False)
+    End Sub
+
+    Private Sub bt_etcprog1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
+        'XLSOldtonew.Show()
+    End Sub
+
+    Private Sub bt_etcprog2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
+        XLSSync.Show()
+    End Sub
+
+    Private Sub mbt_configStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mbt_config.Click
+        Config.ShowDialog()
+    End Sub
+
+    Private Sub mbt_oldttonew_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mbt_oldttonew.Click
+        ' If IsPro Then XLSOldtonew.Show()
+    End Sub
+
+    Private Sub mbt_xlssync_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mbt_xlssync.Click
+        If IsPro Then XLSSync.Show()
+    End Sub
+
+    Private Sub mbt_writeauth_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mbt_writeauth.Click
+        Dim auth As New MyAuth
+
+        Dim NewKey As String = InputBox("인증번호를 입력하세요 (인증번호는 숫자로만 이루어져 있습니다)")
+        If IsNumeric(NewKey) = False Then
+            MsgBox("프로그램을 재실행 하세요", MsgBoxStyle.Information, "확인")
+            End
+        End If
+        auth.SetAuth(NewKey, My.Application.Info.DirectoryPath & "\epole.ini")
+        MsgBox("프로그램을 재실행 하세요", MsgBoxStyle.Information, "확인")
+        End
+    End Sub
+
+    Private Sub bt_etc_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bt6.Click
+        Dim A() As DataRow = Me.IreaDataSet1.MainTable.Select(vbNullString, "ID desc")
+        Dim MaxId As Integer
+        Try
+            MaxId = A(0)(0).ToString
+        Catch ex As Exception
+            MaxId = 0
+        End Try
+        Dim f As New AddEpoleDung(MaxId + 1)
+        'f.MdiParent = Me.ParentForm
+        'Select Case PoleEtcState.ToUpper    'picstate 는 ini 파일에 정의되어잇다
+        '    Case "MAX"
+        '        f.WindowState = FormWindowState.Maximized
+        '    Case "MIN"
+        '        f.WindowState = FormWindowState.Minimized
+        '    Case Else
+        '        f.WindowState = FormWindowState.Normal
+        'End Select
+        f.Show() '  If f.ShowDialog = System.Windows.Forms.DialogResult.OK Then Me.bt_find.PerformClick()
+    End Sub
+
+    Private Sub bt_aa_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bt_aa.Click
+        AboutBox1.ShowDialog()
+    End Sub
+
+    Private Sub BT11MenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BT11.Click
+        Dim A() As DataRow = Me.IreaDataSet1.MainTable.Select(vbNullString, "ID desc")
+        Dim MaxId As Integer
+        Try
+            MaxId = A(0)(0).ToString
+        Catch ex As Exception
+            MaxId = 0
+        End Try
+        Dim f As New AddEpole(MaxId + 1)
+        f.MdiParent = Me.ParentForm
+        Select Case PoleState.ToUpper    'picstate 는 ini 파일에 정의되어잇다
+            Case "MAX"
+                f.WindowState = FormWindowState.Maximized
+            Case "MIN"
+                f.WindowState = FormWindowState.Minimized
+            Case Else
+                f.WindowState = FormWindowState.Normal
+        End Select
+        f.Show() 'Dialog()
+        '        If f.ShowDialog = System.Windows.Forms.DialogResult.OK Then Me.bt_find.PerformClick()
+    End Sub
+
+    Private Sub BT12olStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BT12.Click
+        Dim A() As DataRow = Me.IreaDataSet1.MainTable.Select(vbNullString, "ID desc")
+        Dim MaxId As Integer
+        Try
+            MaxId = A(0)(0).ToString
+        Catch ex As Exception
+            MaxId = 0
+        End Try
+        Dim f As New AddEpolekiki(MaxId + 1)
+        f.MdiParent = Me.ParentForm
+        Select Case PoleEtcState.ToUpper    'picstate 는 ini 파일에 정의되어잇다
+            Case "MAX"
+                f.WindowState = FormWindowState.Maximized
+            Case "MIN"
+                f.WindowState = FormWindowState.Minimized
+            Case Else
+                f.WindowState = FormWindowState.Normal
+        End Select
+        f.Show()
+    End Sub
+
+    Private Sub ToolStripMenuItem4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripMenuItem4.Click
+        Dim A() As DataRow = Me.IreaDataSet1.MainTable.Select(vbNullString, "ID desc")
+        Dim MaxId As Integer
+        Try
+            MaxId = A(0)(0).ToString
+        Catch ex As Exception
+            MaxId = 0
+        End Try
+        Dim f As New AddEpoleCable(MaxId + 1)
+        f.MdiParent = Me.ParentForm
+
+        Select Case PoleState.ToUpper    'picstate 는 ini 파일에 정의되어잇다
+            Case "MAX"
+                f.WindowState = FormWindowState.Maximized
+            Case "MIN"
+                f.WindowState = FormWindowState.Minimized
+            Case Else
+                f.WindowState = FormWindowState.Normal
+        End Select
+        f.Show() 'Dialog()
+    End Sub
+
+    Private Sub ToolStripMenuItem5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripMenuItem5.Click
+        Dim A() As DataRow = Me.IreaDataSet1.MainTable.Select(vbNullString, "ID desc")
+        Dim MaxId As Integer
+        Try
+            MaxId = A(0)(0).ToString
+        Catch ex As Exception
+            MaxId = 0
+        End Try
+        Dim f As New AddEpoleCableLabel(MaxId + 1)
+        f.MdiParent = Me.ParentForm
+
+        Select Case PoleState.ToUpper    'picstate 는 ini 파일에 정의되어잇다
+            Case "MAX"
+                f.WindowState = FormWindowState.Maximized
+            Case "MIN"
+                f.WindowState = FormWindowState.Minimized
+            Case Else
+                f.WindowState = FormWindowState.Normal
+        End Select
+        f.Show() 'Dialog()
+    End Sub
+
+    Private Sub ToolStripMenuItem3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripMenuItem3.Click
+        Dim A() As DataRow = Me.IreaDataSet1.MainTable.Select(vbNullString, "ID desc")
+        Dim MaxId As Integer
+        Try
+            MaxId = A(0)(0).ToString
+        Catch ex As Exception
+            MaxId = 0
+        End Try
+        Dim f As New AddEpoleJJ(MaxId + 1)
+        f.MdiParent = Me.ParentForm
+
+        Select Case PoleState.ToUpper    'picstate 는 ini 파일에 정의되어잇다
+            Case "MAX"
+                f.WindowState = FormWindowState.Maximized
+            Case "MIN"
+                f.WindowState = FormWindowState.Minimized
+            Case Else
+                f.WindowState = FormWindowState.Normal
+        End Select
+        f.Show() 'Dialog()
+    End Sub
+
+    Private Sub ToolStripMenuItem6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripMenuItem6.Click
+        Dim A() As DataRow = Me.IreaDataSet1.MainTable.Select(vbNullString, "ID desc")
+        Dim MaxId As Integer
+        Try
+            MaxId = A(0)(0).ToString
+        Catch ex As Exception
+            MaxId = 0
+        End Try
+        Dim f As New AddEpoleCable2(MaxId + 1)
+        f.MdiParent = Me.ParentForm
+
+        Select Case PoleState.ToUpper    'picstate 는 ini 파일에 정의되어잇다
+            Case "MAX"
+                f.WindowState = FormWindowState.Maximized
+            Case "MIN"
+                f.WindowState = FormWindowState.Minimized
+            Case Else
+                f.WindowState = FormWindowState.Normal
+        End Select
+        f.Show() 'Dialog()
+    End Sub
+End Class

Epole.fp13/Log.Designer.vb

@@ -0,0 +1,49 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class Log
+    Inherits System.Windows.Forms.Form
+
+    'Form은 Dispose를 재정의하여 구성 요소 목록을 정리합니다.
+    <System.Diagnostics.DebuggerNonUserCode()> _
+    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
+        Try
+            If disposing AndAlso components IsNot Nothing Then
+                components.Dispose()
+            End If
+        Finally
+            MyBase.Dispose(disposing)
+        End Try
+    End Sub
+
+    'Windows Form 디자이너에 필요합니다.
+    Private components As System.ComponentModel.IContainer
+
+    '참고: 다음 프로시저는 Windows Form 디자이너에 필요합니다.
+    '수정하려면 Windows Form 디자이너를 사용하십시오.  
+    '코드 편집기를 사용하여 수정하지 마십시오.
+    <System.Diagnostics.DebuggerStepThrough()> _
+    Private Sub InitializeComponent()
+        Me.RichTextBox1 = New System.Windows.Forms.RichTextBox
+        Me.SuspendLayout()
+        '
+        'RichTextBox1
+        '
+        Me.RichTextBox1.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.RichTextBox1.Location = New System.Drawing.Point(0, 0)
+        Me.RichTextBox1.Name = "RichTextBox1"
+        Me.RichTextBox1.Size = New System.Drawing.Size(525, 511)
+        Me.RichTextBox1.TabIndex = 0
+        Me.RichTextBox1.Text = ""
+        '
+        'Log
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 12.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.ClientSize = New System.Drawing.Size(525, 511)
+        Me.Controls.Add(Me.RichTextBox1)
+        Me.Name = "Log"
+        Me.Text = "Log"
+        Me.ResumeLayout(False)
+
+    End Sub
+    Friend WithEvents RichTextBox1 As System.Windows.Forms.RichTextBox
+End Class

Epole.fp13/Log.resx

@@ -0,0 +1,120 @@
+<?xml version="1.0" encoding="utf-8"?>
+<root>
+  <!-- 
+    Microsoft ResX Schema 
+    
+    Version 2.0
+    
+    The primary goals of this format is to allow a simple XML format 
+    that is mostly human readable. The generation and parsing of the 
+    various data types are done through the TypeConverter classes 
+    associated with the data types.
+    
+    Example:
+    
+    ... ado.net/XML headers & schema ...
+    <resheader name="resmimetype">text/microsoft-resx</resheader>
+    <resheader name="version">2.0</resheader>
+    <resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
+    <resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
+    <data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
+    <data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
+    <data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
+        <value>[base64 mime encoded serialized .NET Framework object]</value>
+    </data>
+    <data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+        <value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
+        <comment>This is a comment</comment>
+    </data>
+                
+    There are any number of "resheader" rows that contain simple 
+    name/value pairs.
+    
+    Each data row contains a name, and value. The row also contains a 
+    type or mimetype. Type corresponds to a .NET class that support 
+    text/value conversion through the TypeConverter architecture. 
+    Classes that don't support this are serialized and stored with the 
+    mimetype set.
+    
+    The mimetype is used for serialized objects, and tells the 
+    ResXResourceReader how to depersist the object. This is currently not 
+    extensible. For a given mimetype the value must be set accordingly:
+    
+    Note - application/x-microsoft.net.object.binary.base64 is the format 
+    that the ResXResourceWriter will generate, however the reader can 
+    read any of the formats listed below.
+    
+    mimetype: application/x-microsoft.net.object.binary.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
+            : and then encoded with base64 encoding.
+    
+    mimetype: application/x-microsoft.net.object.soap.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Soap.SoapFormatter
+            : and then encoded with base64 encoding.
+
+    mimetype: application/x-microsoft.net.object.bytearray.base64
+    value   : The object must be serialized into a byte array 
+            : using a System.ComponentModel.TypeConverter
+            : and then encoded with base64 encoding.
+    -->
+  <xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
+    <xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
+    <xsd:element name="root" msdata:IsDataSet="true">
+      <xsd:complexType>
+        <xsd:choice maxOccurs="unbounded">
+          <xsd:element name="metadata">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" />
+              </xsd:sequence>
+              <xsd:attribute name="name" use="required" type="xsd:string" />
+              <xsd:attribute name="type" type="xsd:string" />
+              <xsd:attribute name="mimetype" type="xsd:string" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="assembly">
+            <xsd:complexType>
+              <xsd:attribute name="alias" type="xsd:string" />
+              <xsd:attribute name="name" type="xsd:string" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="data">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+                <xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
+              <xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
+              <xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="resheader">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" />
+            </xsd:complexType>
+          </xsd:element>
+        </xsd:choice>
+      </xsd:complexType>
+    </xsd:element>
+  </xsd:schema>
+  <resheader name="resmimetype">
+    <value>text/microsoft-resx</value>
+  </resheader>
+  <resheader name="version">
+    <value>2.0</value>
+  </resheader>
+  <resheader name="reader">
+    <value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <resheader name="writer">
+    <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+</root>

Epole.fp13/Log.vb

@@ -0,0 +1,3 @@
+Public Class Log
+
+End Class

Epole.fp13/MsgForm.Designer.vb

@@ -0,0 +1,81 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class MsgForm
+    Inherits System.Windows.Forms.Form
+
+    'Form은 Dispose를 재정의하여 구성 요소 목록을 정리합니다.
+    <System.Diagnostics.DebuggerNonUserCode()> _
+    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
+        If disposing AndAlso components IsNot Nothing Then
+            components.Dispose()
+        End If
+        MyBase.Dispose(disposing)
+    End Sub
+
+    'Windows Form 디자이너에 필요합니다.
+    Private components As System.ComponentModel.IContainer
+
+    '참고: 다음 프로시저는 Windows Form 디자이너에 필요합니다.
+    '수정하려면 Windows Form 디자이너를 사용하십시오.  
+    '코드 편집기를 사용하여 수정하지 마십시오.
+    <System.Diagnostics.DebuggerStepThrough()> _
+    Private Sub InitializeComponent()
+        Me.components = New System.ComponentModel.Container
+        Me.RichTextBox1 = New System.Windows.Forms.RichTextBox
+        Me.ContextMenuStrip1 = New System.Windows.Forms.ContextMenuStrip(Me.components)
+        Me.bt_clear = New System.Windows.Forms.ToolStripMenuItem
+        Me.ToolStripMenuItem1 = New System.Windows.Forms.ToolStripSeparator
+        Me.bt_savelist = New System.Windows.Forms.ToolStripMenuItem
+        Me.ContextMenuStrip1.SuspendLayout()
+        Me.SuspendLayout()
+        '
+        'RichTextBox1
+        '
+        Me.RichTextBox1.ContextMenuStrip = Me.ContextMenuStrip1
+        Me.RichTextBox1.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.RichTextBox1.Location = New System.Drawing.Point(0, 0)
+        Me.RichTextBox1.Name = "RichTextBox1"
+        Me.RichTextBox1.Size = New System.Drawing.Size(776, 648)
+        Me.RichTextBox1.TabIndex = 0
+        Me.RichTextBox1.Text = ""
+        '
+        'ContextMenuStrip1
+        '
+        Me.ContextMenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.bt_clear, Me.ToolStripMenuItem1, Me.bt_savelist})
+        Me.ContextMenuStrip1.Name = "ContextMenuStrip1"
+        Me.ContextMenuStrip1.Size = New System.Drawing.Size(153, 76)
+        '
+        'bt_clear
+        '
+        Me.bt_clear.Name = "bt_clear"
+        Me.bt_clear.Size = New System.Drawing.Size(152, 22)
+        Me.bt_clear.Text = "모두지우기"
+        '
+        'ToolStripMenuItem1
+        '
+        Me.ToolStripMenuItem1.Name = "ToolStripMenuItem1"
+        Me.ToolStripMenuItem1.Size = New System.Drawing.Size(149, 6)
+        '
+        'bt_savelist
+        '
+        Me.bt_savelist.Name = "bt_savelist"
+        Me.bt_savelist.Size = New System.Drawing.Size(152, 22)
+        Me.bt_savelist.Text = "저장"
+        '
+        'MsgForm
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 12.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.ClientSize = New System.Drawing.Size(776, 648)
+        Me.Controls.Add(Me.RichTextBox1)
+        Me.Name = "MsgForm"
+        Me.Text = "메세지폼"
+        Me.ContextMenuStrip1.ResumeLayout(False)
+        Me.ResumeLayout(False)
+
+    End Sub
+    Friend WithEvents RichTextBox1 As System.Windows.Forms.RichTextBox
+    Friend WithEvents ContextMenuStrip1 As System.Windows.Forms.ContextMenuStrip
+    Friend WithEvents bt_savelist As System.Windows.Forms.ToolStripMenuItem
+    Friend WithEvents bt_clear As System.Windows.Forms.ToolStripMenuItem
+    Friend WithEvents ToolStripMenuItem1 As System.Windows.Forms.ToolStripSeparator
+End Class

Epole.fp13/MsgForm.resx

@@ -0,0 +1,123 @@
+<?xml version="1.0" encoding="utf-8"?>
+<root>
+  <!-- 
+    Microsoft ResX Schema 
+    
+    Version 2.0
+    
+    The primary goals of this format is to allow a simple XML format 
+    that is mostly human readable. The generation and parsing of the 
+    various data types are done through the TypeConverter classes 
+    associated with the data types.
+    
+    Example:
+    
+    ... ado.net/XML headers & schema ...
+    <resheader name="resmimetype">text/microsoft-resx</resheader>
+    <resheader name="version">2.0</resheader>
+    <resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
+    <resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
+    <data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
+    <data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
+    <data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
+        <value>[base64 mime encoded serialized .NET Framework object]</value>
+    </data>
+    <data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+        <value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
+        <comment>This is a comment</comment>
+    </data>
+                
+    There are any number of "resheader" rows that contain simple 
+    name/value pairs.
+    
+    Each data row contains a name, and value. The row also contains a 
+    type or mimetype. Type corresponds to a .NET class that support 
+    text/value conversion through the TypeConverter architecture. 
+    Classes that don't support this are serialized and stored with the 
+    mimetype set.
+    
+    The mimetype is used for serialized objects, and tells the 
+    ResXResourceReader how to depersist the object. This is currently not 
+    extensible. For a given mimetype the value must be set accordingly:
+    
+    Note - application/x-microsoft.net.object.binary.base64 is the format 
+    that the ResXResourceWriter will generate, however the reader can 
+    read any of the formats listed below.
+    
+    mimetype: application/x-microsoft.net.object.binary.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
+            : and then encoded with base64 encoding.
+    
+    mimetype: application/x-microsoft.net.object.soap.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Soap.SoapFormatter
+            : and then encoded with base64 encoding.
+
+    mimetype: application/x-microsoft.net.object.bytearray.base64
+    value   : The object must be serialized into a byte array 
+            : using a System.ComponentModel.TypeConverter
+            : and then encoded with base64 encoding.
+    -->
+  <xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
+    <xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
+    <xsd:element name="root" msdata:IsDataSet="true">
+      <xsd:complexType>
+        <xsd:choice maxOccurs="unbounded">
+          <xsd:element name="metadata">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" />
+              </xsd:sequence>
+              <xsd:attribute name="name" use="required" type="xsd:string" />
+              <xsd:attribute name="type" type="xsd:string" />
+              <xsd:attribute name="mimetype" type="xsd:string" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="assembly">
+            <xsd:complexType>
+              <xsd:attribute name="alias" type="xsd:string" />
+              <xsd:attribute name="name" type="xsd:string" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="data">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+                <xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
+              <xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
+              <xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="resheader">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" />
+            </xsd:complexType>
+          </xsd:element>
+        </xsd:choice>
+      </xsd:complexType>
+    </xsd:element>
+  </xsd:schema>
+  <resheader name="resmimetype">
+    <value>text/microsoft-resx</value>
+  </resheader>
+  <resheader name="version">
+    <value>2.0</value>
+  </resheader>
+  <resheader name="reader">
+    <value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <resheader name="writer">
+    <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <metadata name="ContextMenuStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>17, 17</value>
+  </metadata>
+</root>

Epole.fp13/MsgForm.vb

@@ -0,0 +1,17 @@
+Public Class MsgForm
+
+    Private Sub bt_clearStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bt_clear.Click
+        Me.RichTextBox1.Clear()
+    End Sub
+
+    Private Sub bt_savelist_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bt_savelist.Click
+        Dim SD As New SaveFileDialog
+        SD.FileName = "log" & Format(Now, "yyyyMMdd") & ".txt"
+        If SD.ShowDialog() <> System.Windows.Forms.DialogResult.OK Then
+            MsgBox("취소되었습니다", MsgBoxStyle.Critical, "사용자취소")
+        Else
+            Me.RichTextBox1.SaveFile(SD.FileName, RichTextBoxStreamType.PlainText)
+            MsgBox("저장완료", MsgBoxStyle.Information, "확인")
+        End If
+    End Sub
+End Class

Epole.fp13/My Project/Application.Designer.vb

@@ -0,0 +1,38 @@
+'------------------------------------------------------------------------------
+' <auto-generated>
+'     이 코드는 도구를 사용하여 생성되었습니다.
+'     런타임 버전:4.0.30319.18408
+'
+'     파일 내용을 변경하면 잘못된 동작이 발생할 수 있으며, 코드를 다시 생성하면
+'     이러한 변경 내용이 손실됩니다.
+' </auto-generated>
+'------------------------------------------------------------------------------
+
+Option Strict On
+Option Explicit On
+
+
+Namespace My
+    
+    '참고: 자동으로 생성되므로 직접 이 파일을 수정하지 마십시오.  변경할 사항이 있거나
+    ' 파일에서 빌드 오류가 발생하는 경우 프로젝트 디자이너로
+    ' 이동([프로젝트 속성]으로 이동하거나 솔루션 탐색기에서 My Project 노드를
+    ' 두 번 클릭)한 다음 [응용 프로그램] 탭에서 변경하십시오.
+    '
+    Partial Friend Class MyApplication
+        
+        <Global.System.Diagnostics.DebuggerStepThroughAttribute()>  _
+        Public Sub New()
+            MyBase.New(Global.Microsoft.VisualBasic.ApplicationServices.AuthenticationMode.Windows)
+            Me.IsSingleInstance = false
+            Me.EnableVisualStyles = true
+            Me.SaveMySettingsOnExit = false
+            Me.ShutDownStyle = Global.Microsoft.VisualBasic.ApplicationServices.ShutdownMode.AfterAllFormsClose
+        End Sub
+        
+        <Global.System.Diagnostics.DebuggerStepThroughAttribute()>  _
+        Protected Overrides Sub OnCreateMainForm()
+            Me.MainForm = Global.EpoleNet.SplashScreen
+        End Sub
+    End Class
+End Namespace

Epole.fp13/My Project/Application.myapp

@@ -0,0 +1,10 @@
+<?xml version="1.0" encoding="utf-8"?>
+<MyApplicationData xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
+  <MySubMain>true</MySubMain>
+  <MainForm>SplashScreen</MainForm>
+  <SingleInstance>false</SingleInstance>
+  <ShutdownMode>1</ShutdownMode>
+  <EnableVisualStyles>true</EnableVisualStyles>
+  <AuthenticationMode>0</AuthenticationMode>
+  <SaveMySettingsOnExit>false</SaveMySettingsOnExit>
+</MyApplicationData>

Epole.fp13/My Project/AssemblyInfo.vb

@@ -0,0 +1,35 @@
+Imports System
+Imports System.Reflection
+Imports System.Runtime.InteropServices
+
+' 어셈블리의 일반 정보는 다음 특성 집합을 통해 제어됩니다.
+' 어셈블리와 관련된 정보를 수정하려면
+' 이 특성 값을 변경하십시오.
+
+' 어셈블리 특성 값을 검토합니다.
+
+<Assembly: AssemblyTitle("한전번호찰 통합프로그램")> 
+<Assembly: AssemblyDescription("전주번호목록 작성 및 출력을 하는 프로그램")> 
+<Assembly: AssemblyCompany("제공 : 해광기획")>
+<Assembly: AssemblyProduct("한전번호찰 통합프로그램(FP13)")>
+<Assembly: AssemblyCopyright("Copyright (C) SIMP 2019")>
+<Assembly: AssemblyTrademark("SIMP")> 
+
+<Assembly: ComVisible(False)>
+
+'이 프로젝트가 COM에 노출되는 경우 다음 GUID는 typelib의 ID를 나타냅니다.
+<Assembly: Guid("e9e36afe-eab6-4c3b-a22e-2bbb3d42e000")>
+
+' 어셈블리의 버전 정보는 다음 네 가지 값으로 구성됩니다.
+'
+'      주 버전
+'      부 버전
+'      빌드 번호
+'      수정 버전
+'
+' 모든 값을 지정하거나 아래와 같이 '*'를 사용하여 빌드 번호 및 수정 버전이 자동으로
+' 지정되도록 할 수 있습니다.
+' <Assembly: AssemblyVersion("1.0.*")> 
+
+<Assembly: AssemblyVersion("20.05.24.1600")>
+<Assembly: AssemblyFileVersion("20.05.24.1600")>

Epole.fp13/My Project/Resources.Designer.vb

@@ -0,0 +1,553 @@
+'------------------------------------------------------------------------------
+' <auto-generated>
+'     이 코드는 도구를 사용하여 생성되었습니다.
+'     런타임 버전:4.0.30319.34014
+'
+'     파일 내용을 변경하면 잘못된 동작이 발생할 수 있으며, 코드를 다시 생성하면
+'     이러한 변경 내용이 손실됩니다.
+' </auto-generated>
+'------------------------------------------------------------------------------
+
+Option Strict On
+Option Explicit On
+
+Imports System
+
+Namespace My.Resources
+    
+    '이 클래스는 ResGen 또는 Visual Studio와 같은 도구를 통해 StronglyTypedResourceBuilder
+    '클래스에서 자동으로 생성되었습니다.
+    '멤버를 추가하거나 제거하려면 .ResX 파일을 편집한 다음 /str 옵션을 사용하여 ResGen을
+    '다시 실행하거나 VS 프로젝트를 다시 빌드하십시오.
+    '''<summary>
+    '''  지역화된 문자열 등을 찾기 위한 강력한 형식의 리소스 클래스입니다.
+    '''</summary>
+    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "4.0.0.0"),  _
+     Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+     Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(),  _
+     Global.Microsoft.VisualBasic.HideModuleNameAttribute()>  _
+    Friend Module Resources
+        
+        Private resourceMan As Global.System.Resources.ResourceManager
+        
+        Private resourceCulture As Global.System.Globalization.CultureInfo
+        
+        '''<summary>
+        '''  이 클래스에서 사용하는 캐시된 ResourceManager 인스턴스를 반환합니다.
+        '''</summary>
+        <Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)>  _
+        Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
+            Get
+                If Object.ReferenceEquals(resourceMan, Nothing) Then
+                    Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("EpoleNet.Resources", GetType(Resources).Assembly)
+                    resourceMan = temp
+                End If
+                Return resourceMan
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  이 강력한 형식의 리소스 클래스를 사용하여 모든 리소스 조회에 대한 현재 스레드의 CurrentUICulture
+        '''  속성을 재정의합니다.
+        '''</summary>
+        <Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)>  _
+        Friend Property Culture() As Global.System.Globalization.CultureInfo
+            Get
+                Return resourceCulture
+            End Get
+            Set
+                resourceCulture = value
+            End Set
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property about_16() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("about_16", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property about_161() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("about_161", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property about_24() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("about_24", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property about_32() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("about_32", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property apps_32() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("apps_32", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property back_16() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("back_16", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property back_24() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("back_24", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property back_32() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("back_32", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property calc_16() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("calc_16", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property cancl_16() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("cancl_16", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property cancl_32() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("cancl_32", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property confg_32() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("confg_32", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property down_16() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("down_16", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property down_24() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("down_24", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property down_32() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("down_32", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property edit_32() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("edit_32", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property excel() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("excel", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property forwd_16() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("forwd_16", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property forwd_32() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("forwd_32", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property go_32() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("go_32", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property image_32() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("image_32", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property lgicn_32() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("lgicn_32", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property new_32() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("new_32", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property new_321() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("new_321", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property open_32() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("open_32", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property opts_24() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("opts_24", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property opts_32() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("opts_32", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  (아이콘)과(와) 유사한 System.Drawing.Icon 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property Picasa() As System.Drawing.Icon
+            Get
+                Dim obj As Object = ResourceManager.GetObject("Picasa", resourceCulture)
+                Return CType(obj,System.Drawing.Icon)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property play_32() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("play_32", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property prefs_32() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("prefs_32", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property print_32() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("print_32", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property print_321() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("print_321", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property prtpv_32() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("prtpv_32", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property redo_32() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("redo_32", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property ref_24() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("ref_24", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property ref_32() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("ref_32", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property remov_32() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("remov_32", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property save_16() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("save_16", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property save_32() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("save_32", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property skipb_32() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("skipb_32", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property skipf_32() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("skipf_32", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property smicn_24() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("smicn_24", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property smicn_32() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("smicn_32", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property splay_32() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("splay_32", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property srch_32() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("srch_32", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property start() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("start", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property stop_32() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("stop_32", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property up_16() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("up_16", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  System.Drawing.Bitmap 형식의 지역화된 리소스를 찾습니다.
+        '''</summary>
+        Friend ReadOnly Property up_32() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("up_32", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+    End Module
+End Namespace

Epole.fp13/My Project/Resources.resx

@@ -0,0 +1,268 @@
+<?xml version="1.0" encoding="utf-8"?>
+<root>
+  <!-- 
+    Microsoft ResX Schema 
+    
+    Version 2.0
+    
+    The primary goals of this format is to allow a simple XML format 
+    that is mostly human readable. The generation and parsing of the 
+    various data types are done through the TypeConverter classes 
+    associated with the data types.
+    
+    Example:
+    
+    ... ado.net/XML headers & schema ...
+    <resheader name="resmimetype">text/microsoft-resx</resheader>
+    <resheader name="version">2.0</resheader>
+    <resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
+    <resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
+    <data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
+    <data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
+    <data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
+        <value>[base64 mime encoded serialized .NET Framework object]</value>
+    </data>
+    <data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+        <value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
+        <comment>This is a comment</comment>
+    </data>
+                
+    There are any number of "resheader" rows that contain simple 
+    name/value pairs.
+    
+    Each data row contains a name, and value. The row also contains a 
+    type or mimetype. Type corresponds to a .NET class that support 
+    text/value conversion through the TypeConverter architecture. 
+    Classes that don't support this are serialized and stored with the 
+    mimetype set.
+    
+    The mimetype is used for serialized objects, and tells the 
+    ResXResourceReader how to depersist the object. This is currently not 
+    extensible. For a given mimetype the value must be set accordingly:
+    
+    Note - application/x-microsoft.net.object.binary.base64 is the format 
+    that the ResXResourceWriter will generate, however the reader can 
+    read any of the formats listed below.
+    
+    mimetype: application/x-microsoft.net.object.binary.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
+            : and then encoded with base64 encoding.
+    
+    mimetype: application/x-microsoft.net.object.soap.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Soap.SoapFormatter
+            : and then encoded with base64 encoding.
+
+    mimetype: application/x-microsoft.net.object.bytearray.base64
+    value   : The object must be serialized into a byte array 
+            : using a System.ComponentModel.TypeConverter
+            : and then encoded with base64 encoding.
+    -->
+  <xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
+    <xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
+    <xsd:element name="root" msdata:IsDataSet="true">
+      <xsd:complexType>
+        <xsd:choice maxOccurs="unbounded">
+          <xsd:element name="metadata">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" />
+              </xsd:sequence>
+              <xsd:attribute name="name" use="required" type="xsd:string" />
+              <xsd:attribute name="type" type="xsd:string" />
+              <xsd:attribute name="mimetype" type="xsd:string" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="assembly">
+            <xsd:complexType>
+              <xsd:attribute name="alias" type="xsd:string" />
+              <xsd:attribute name="name" type="xsd:string" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="data">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+                <xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
+              <xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
+              <xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="resheader">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" />
+            </xsd:complexType>
+          </xsd:element>
+        </xsd:choice>
+      </xsd:complexType>
+    </xsd:element>
+  </xsd:schema>
+  <resheader name="resmimetype">
+    <value>text/microsoft-resx</value>
+  </resheader>
+  <resheader name="version">
+    <value>2.0</value>
+  </resheader>
+  <resheader name="reader">
+    <value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <resheader name="writer">
+    <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <assembly alias="System.Windows.Forms" name="System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
+  <data name="up_32" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\up_32.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="start" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\start.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="stop_32" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\stop_32.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="open_32" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\open_32.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="forwd_32" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\forwd_32.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="new_32" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\new_32.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="apps_32" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\apps_32.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="up_16" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\up_16.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="opts_24" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\opts_24.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="print_321" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\print_321.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="Picasa" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Picasa .ico;System.Drawing.Icon, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="edit_32" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\edit_32.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="srch_32" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\srch_32.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="skipb_32" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\skipb_32.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="redo_32" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\redo_32.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="play_32" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\play_32.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="back_24" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\back_24.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="down_16" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\down_16.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="remov_32" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\remov_32.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="confg_32" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\confg_32.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="print_32" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\print_32.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="prtpv_32" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\prtpv_32.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="about_161" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\about_161.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="save_32" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\save_32.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="image_32" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\image_32.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="ref_24" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\ref_24.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="cancl_16" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\cancl_16.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="down_32" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\down_32.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="smicn_24" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\smicn_24.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="about_24" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\about_24.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="back_32" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\back_32.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="back_16" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\back_16.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="excel" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\excel.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="forwd_16" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\forwd_16.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="cancl_32" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\cancl_32.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="ref_32" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\ref_32.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="save_16" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\save_16.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="smicn_32" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\smicn_32.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="prefs_32" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\prefs_32.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="down_24" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\down_24.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="skipf_32" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\skipf_32.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="lgicn_32" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\lgicn_32.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="new_321" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\new_321.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="go_32" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\go_32.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="splay_32" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\splay_32.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="about_32" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\about_32.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="calc_16" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\calc_16.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="about_16" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\about_16.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="opts_32" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\opts_32.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+</root>

Epole.fp13/My Project/Settings.Designer.vb

@@ -0,0 +1,84 @@
+'------------------------------------------------------------------------------
+' <auto-generated>
+'     이 코드는 도구를 사용하여 생성되었습니다.
+'     런타임 버전:4.0.30319.42000
+'
+'     파일 내용을 변경하면 잘못된 동작이 발생할 수 있으며, 코드를 다시 생성하면
+'     이러한 변경 내용이 손실됩니다.
+' </auto-generated>
+'------------------------------------------------------------------------------
+
+Option Strict On
+Option Explicit On
+
+
+Namespace My
+    
+    <Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(),  _
+     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "12.0.0.0"),  _
+     Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)>  _
+    Partial Friend NotInheritable Class MySettings
+        Inherits Global.System.Configuration.ApplicationSettingsBase
+        
+        Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings)
+        
+#Region "My.Settings 자동 저장 기능"
+#If _MyType = "WindowsForms" Then
+    Private Shared addedHandler As Boolean
+
+    Private Shared addedHandlerLockObject As New Object
+
+    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
+    Private Shared Sub AutoSaveSettings(ByVal sender As Global.System.Object, ByVal e As Global.System.EventArgs)
+        If My.Application.SaveMySettingsOnExit Then
+            My.Settings.Save()
+        End If
+    End Sub
+#End If
+#End Region
+        
+        Public Shared ReadOnly Property [Default]() As MySettings
+            Get
+                
+#If _MyType = "WindowsForms" Then
+               If Not addedHandler Then
+                    SyncLock addedHandlerLockObject
+                        If Not addedHandler Then
+                            AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
+                            addedHandler = True
+                        End If
+                    End SyncLock
+                End If
+#End If
+                Return defaultInstance
+            End Get
+        End Property
+        
+        <Global.System.Configuration.ApplicationScopedSettingAttribute(),  _
+         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.Configuration.SpecialSettingAttribute(Global.System.Configuration.SpecialSetting.ConnectionString),  _
+         Global.System.Configuration.DefaultSettingValueAttribute("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=|DataDirectory|\bin\Debug\DataBase\i"& _ 
+            "rea.mdb")>  _
+        Public ReadOnly Property ireaConnectionString() As String
+            Get
+                Return CType(Me("ireaConnectionString"),String)
+            End Get
+        End Property
+    End Class
+End Namespace
+
+Namespace My
+    
+    <Global.Microsoft.VisualBasic.HideModuleNameAttribute(),  _
+     Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+     Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute()>  _
+    Friend Module MySettingsProperty
+        
+        <Global.System.ComponentModel.Design.HelpKeywordAttribute("My.Settings")>  _
+        Friend ReadOnly Property Settings() As Global.EpoleNet.My.MySettings
+            Get
+                Return Global.EpoleNet.My.MySettings.Default
+            End Get
+        End Property
+    End Module
+End Namespace

Epole.fp13/My Project/Settings.settings

@@ -0,0 +1,14 @@
+<?xml version='1.0' encoding='utf-8'?>
+<SettingsFile xmlns="http://schemas.microsoft.com/VisualStudio/2004/01/settings" CurrentProfile="(Default)" GeneratedClassNamespace="My" GeneratedClassName="MySettings" UseMySettingsClassName="true">
+  <Profiles />
+  <Settings>
+    <Setting Name="ireaConnectionString" Type="(Connection string)" Scope="Application">
+      <DesignTimeValue Profile="(Default)">&lt;?xml version="1.0" encoding="utf-16"?&gt;
+&lt;SerializableConnectionString xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema"&gt;
+  &lt;ConnectionString&gt;Provider=Microsoft.Jet.OLEDB.4.0;Data Source=|DataDirectory|\bin\Debug\DataBase\irea.mdb&lt;/ConnectionString&gt;
+  &lt;ProviderName&gt;System.Data.OleDb&lt;/ProviderName&gt;
+&lt;/SerializableConnectionString&gt;</DesignTimeValue>
+      <Value Profile="(Default)">Provider=Microsoft.Jet.OLEDB.4.0;Data Source=|DataDirectory|\bin\Debug\DataBase\irea.mdb</Value>
+    </Setting>
+  </Settings>
+</SettingsFile>

Epole.fp13/My Project/app.manifest

@@ -0,0 +1,11 @@
+<?xml version="1.0" encoding="utf-8"?>
+<asmv1:assembly manifestVersion="1.0" xmlns="urn:schemas-microsoft-com:asm.v1" xmlns:asmv1="urn:schemas-microsoft-com:asm.v1" xmlns:asmv2="urn:schemas-microsoft-com:asm.v2" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
+  <trustInfo xmlns="urn:schemas-microsoft-com:asm.v2">
+    <security>
+      <applicationRequestMinimum>
+        <defaultAssemblyRequest permissionSetReference="Custom" />
+        <PermissionSet class="System.Security.PermissionSet" version="1" Unrestricted="true" ID="Custom" SameSite="site" />
+      </applicationRequestMinimum>
+    </security>
+  </trustInfo>
+</asmv1:assembly>

Epole.fp13/My Project/licenses.licx

@@ -0,0 +1 @@
+FarPoint.Win.Spread.FpSpread, FarPoint.Win.Spread, Version=13.45.20191.0, Culture=neutral, PublicKeyToken=327c3516b1b18457

Epole.fp13/MyAuth.vb

@@ -0,0 +1,72 @@
+Imports MyControlOLEDBv2
+
+Public Class MyAuth  '//각종인증방법을 이용한다.
+    Public Function GetDateAuth(ByVal 만기일자 As Date) As Boolean  '//날짜인증시 사용가능한지
+        '//사용가능한 날짜인지 확인하고 만약 날짜정보가 없으면은 날짜를 setdataeauth 를 실행합니다
+        '//인터넷에 연결되어있을시 현재 시간정보를 인터넷에서 받아온ㄷ
+        '//콘솔의 현재날짜가 설치된 날짜보다 더 뒤일경우 사용중지
+        '//레지 파일의 기록날짜가 서로다를경우 사용중지
+        '//레지,파일의 기록날짜가 동일하고 콘솔의 현재날짜가 기한을 넘지않았을경우에만 true 한다.
+        Dim isAvailable As Boolean = My.Computer.Network.IsAvailable  '//인터넷사용여부
+        Dim CurrentDate As Date
+
+        If isAvailable Then '//인터넷에서 날짜정보를 가져온다 기록된 날짜와 오늘의 날짜를 확인한다.
+            Dim Itime As Date
+            Try
+                CurrentDate = Itime
+            Catch ex As Exception   '//에러발생시 콘솔날짜로 세팅한다.
+                CurrentDate = Now
+            End Try
+        Else
+            MsgBox("인터넷사용불가")
+            CurrentDate = Now
+        End If
+
+        If 만기일자 > CurrentDate Then Return False
+        Return True
+    End Function
+
+    Public Sub SetAuth(ByVal Newkey As Long, ByVal Fn As String)
+        ' Dim auth As New ARINCLASS
+        Dim Arinini As New MyINI2(Fn)
+        Arinini.Write("main", "install2", Newkey)
+        Arinini.Write("main", "installkey2", Newkey.GetHashCode)
+
+        Dim A As New System.Text.StringBuilder
+        A.AppendLine("인증정보가 파일에 기록되었습니다")
+        A.AppendLine("만기일 : " & Date.FromFileTimeUtc(Newkey))
+        MsgBox(A.ToString, MsgBoxStyle.Information, "기록완료")
+    End Sub
+
+
+    ''' <summary>
+    ''' 미지원 함수
+    ''' </summary>
+    ''' <returns></returns>
+    ''' <remarks></remarks>
+    Public Function SetDateAuth() As Boolean  '//레지와 파일에 해당 인증정보를 기록합니다
+        Return True
+    End Function
+
+    ''' <summary>
+    ''' 미지원함수
+    ''' </summary>
+    ''' <returns></returns>
+    ''' <remarks></remarks>
+    Public Function GetCurrentDate() As Date  '//오늘날짜를 가져옵니다
+        Return Now
+    End Function
+
+    Public Function GetDateNumber(ByVal 시작일 As Date) As Long
+        Return 시작일.ToFileTimeUtc
+    End Function
+
+    Public Function GetDateNumberEnc(ByVal 시작일 As Date) As String
+        Return 시작일.ToFileTimeUtc.ToString.GetHashCode  '//날짜로 들어가면 날짜의 해쉬코드를 넘겨준다.
+    End Function
+
+    Public Function GetDateNumberEnc(ByVal 시작일 As Long) As String
+        Return 시작일.ToString.GetHashCode
+    End Function
+
+End Class

Epole.fp13/MyINI.vb

@@ -0,0 +1,287 @@
+Imports System.IO
+
+Public Class tinyIni
+    Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As String, ByVal lpDefault As String, ByVal lpReturnedString As String, ByVal nSize As Integer, ByVal lpFileName As String) As Integer
+    Declare Function WritePrivateProfileString Lib "kernel32" Alias "WritePrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As String, ByVal lpString As String, ByVal lpDownFileName As String) As Integer
+    'Private Aname As String
+    Public FileName As String = vbNullString
+    Private FileNameBuf As String
+    Private m_sPath As String
+    Private m_sKey As String
+    Private m_sSection As String
+    Private m_sDefault As String
+    Private m_lLastReturnCode As Integer
+
+    Public Sub New(ByVal File As String)
+        FileName = File
+        FileNameBuf = File
+        Me.Create()
+
+        'MsgBox("New 1=" & FileName & vbCrLf & "2=" & FileNameBuf)
+
+        ' If Not System.IO.File.Exists(File) Then System.IO.File.Create(File)
+    End Sub
+    Public Sub Create()
+        If Exist() = True Then Return
+        Dim A As New IO.FileInfo(FileName)
+        A.Directory.Create()
+        Dim FS As IO.FileStream = A.Create()
+        Dim SW As New IO.StreamWriter(FS, System.Text.Encoding.Default)
+        SW.WriteLine("//Myini 로부터 자동생성된 파일입니다")
+        SW.WriteLine("//생성일자 : " & Now.ToString)
+        SW.Flush()
+        SW.Close()
+        FS.Close()
+        SW = Nothing
+        FS = Nothing
+        FileName = FileNameBuf
+    End Sub
+    Public Function Exist() As Boolean
+        Return System.IO.File.Exists(FileName)
+    End Function
+
+    Public Function Read(ByVal appkey As String, ByVal subkey As String, Optional ByVal DefaultValue As String = vbNullString) As String '//변수초기화
+        'MsgBox("Read 1=" & FileName & vbCrLf & "2=" & FileNameBuf)
+
+        Dim tempstr As Integer 'ini파일에서 읽어온 값을 임시저장하는 변수
+        Dim strtemp As String = New String(Chr(0), 2000) 'ini파일의 임시 변수
+        Dim Tempbuf As String
+
+        If Not Exist() Then
+            MsgBox("환경파일이 존재하지 않습니다" & vbCrLf & "APP=" & appkey & vbCrLf & "subkey=" & subkey & vbCrLf & "파일명=" & FileName, MsgBoxStyle.Critical, "Error")
+            Return vbNullString
+        End If
+        Try
+            tempstr = GetPrivateProfileString(appkey, subkey, "", strtemp, Len(strtemp), FileName)
+            Tempbuf = strtemp.Substring(0, tempstr)
+            Tempbuf = Tempbuf.Trim(Chr(0))
+
+            FileName = FileNameBuf
+
+            If Tempbuf.Trim = vbNullString AndAlso DefaultValue <> vbNullString Then
+                Return DefaultValue
+            Else
+                Return Tempbuf
+            End If
+        Catch ex As Exception
+            FileName = FileNameBuf
+            Return vbNullString
+        End Try
+
+    End Function
+    Public Function ReadFile(ByVal appkey As String, ByVal subkey As String, ByVal filename2 As String, Optional ByVal DefaultValue As String = vbNullString) As String '//변수초기화
+        'MsgBox("ReadFile 1=" & FileName & vbCrLf & "2=" & FileNameBuf)
+        Dim tempstr As Integer 'ini파일에서 읽어온 값을 임시저장하는 변수
+        Dim strtemp As String = New String(Chr(0), 2000) 'ini파일의 임시 변수
+        Dim Tempbuf As String
+
+        If Not System.IO.File.Exists(filename2) Then
+            MsgBox("환경파일이 존재하지 않습니다" & vbCrLf & "파일명=" & FileName, MsgBoxStyle.Critical, "Error")
+            Return vbNullString
+        End If
+
+        Try
+            tempstr = GetPrivateProfileString(appkey, subkey, "", strtemp, Len(strtemp), filename2)
+            Tempbuf = strtemp.Substring(0, tempstr)
+            If Tempbuf.Trim = vbNullString AndAlso DefaultValue <> vbNullString Then
+                Return DefaultValue
+            Else
+                Return Tempbuf
+            End If
+        Catch ex As Exception
+            Return vbNullString
+        End Try
+        FileName = FileNameBuf
+    End Function
+
+    Public Function Write(ByVal appkey As String, ByVal subkey As String, ByVal WriteVal As Object) As Integer
+        Dim RetVal As Integer
+        'MsgBox("Write1 1=" & FileName & vbCrLf & "2=" & FileNameBuf)
+        If Not Exist() Then
+            MsgBox("환경파일이 존재하지 않습니다" & vbCrLf & "파일을 생성합니다." & vbCrLf & "파일명=" & FileName, MsgBoxStyle.Information, "확인")
+            Me.Create()
+        End If
+        ' FileName = Aname
+        RetVal = (WritePrivateProfileString(appkey, subkey, WriteVal, FileName))
+        FileName = FileNameBuf
+        Return RetVal
+
+    End Function
+    Public Sub Write(ByVal appkey As String, ByVal subkey As String, ByVal WriteVal As Object, ByVal fileName2 As String)
+        'MsgBox("Write2 1=" & FileName & vbCrLf & "2=" & FileNameBuf)
+        If Not System.IO.File.Exists(fileName2) Then
+            MsgBox("[D] 환경파일이 존재하지 않습니다" & vbCrLf & "파일을 생성합니다." & vbCrLf & "파일명=" & fileName2, MsgBoxStyle.Information, "확인")
+            System.IO.File.Create(fileName2)
+        End If
+        WritePrivateProfileString(appkey, subkey, WriteVal, fileName2)
+        FileName = FileNameBuf
+    End Sub
+
+
+
+    Public Sub EnumerateCurrentSection(ByRef sKey() As String, ByRef iCount As Integer)
+        Dim sSection As String
+        Dim iPos As Integer
+        Dim iNextPos As Integer
+        Dim sCur As String
+
+        iCount = 0
+        Erase sKey
+        sSection = INISection
+        If (Len(sSection) > 0) Then
+            iPos = 1
+            iNextPos = InStr(iPos, sSection, Chr(0))
+            Do While iNextPos <> 0
+                sCur = Mid(sSection, iPos, iNextPos - iPos)
+                If (sCur <> Chr(0)) Then
+                    iCount = iCount + 1
+                    'UPGRADE_WARNING: sKey 배열의 하한이 1에서 0(으)로 변경되었습니다. 자세한 내용은 다음을 참조하십시오. 'ms-help://MS.VSCC.v80/dv_commoner/local/redirect.htm?keyword="0F1C9BE1-AF9D-476E-83B1-17D43BECFF20"'
+                    ReDim Preserve sKey(iCount)
+                    sKey(iCount) = Mid(sSection, iPos, iNextPos - iPos)
+                    iPos = iNextPos + 1
+                    iNextPos = InStr(iPos, sSection, Chr(0))
+                End If
+            Loop
+        End If
+    End Sub
+
+
+    Public Sub GetAllsection(ByVal key As String, ByRef Section As ArrayList, ByRef Value As ArrayList)
+        Dim FS As New System.IO.FileStream(FileName, FileMode.Open)
+        Dim SR As New StreamReader(FS, System.Text.Encoding.Default)
+        Dim Findkey As String = "[" & key & "]"
+        Dim Line As String
+        Dim KeyPos As Integer = -1
+        Dim Seppos As Integer = -1
+        While SR.Peek > -1
+            Line = SR.ReadLine
+            If KeyPos = -1 Then '//키를 못찻았으면 
+                If Line.ToUpper.IndexOf(Findkey.ToUpper) > -1 Then KeyPos = Line.ToUpper.IndexOf(Findkey.ToUpper)
+            Else    '//찾앗으면
+                If Line.IndexOf("[") = -1 Then  '//그다음 키가 오기전까지 모두 추가한다.
+                    Seppos = Line.IndexOf("=")
+                    Section.Add(Line.Substring(0, Seppos))
+                    Value.Add(Line.Substring(Seppos + 1))
+                Else
+                    Exit While
+                End If
+            End If
+        End While
+
+        SR.Close()
+        FS.Close()
+
+
+    End Sub
+
+    Public Sub EnumerateAllSections(ByRef sSections() As String, ByRef iCount As Integer)
+        Dim sIniFile As String
+        Dim iPos As Integer
+        Dim iNextPos As Integer
+        Dim sCur As String
+
+        iCount = 0
+        Erase sSections
+        sIniFile = Sections
+        If (Len(sIniFile) > 0) Then
+            iPos = 1
+            iNextPos = InStr(iPos, sIniFile, Chr(0))
+            Do While iNextPos <> 0
+                If (iNextPos <> iPos) Then
+                    sCur = Mid(sIniFile, iPos, iNextPos - iPos)
+                    iCount = iCount + 1
+                    'UPGRADE_WARNING: sSections 배열의 하한이 1에서 0(으)로 변경되었습니다. 자세한 내용은 다음을 참조하십시오. 'ms-help://MS.VSCC.v80/dv_commoner/local/redirect.htm?keyword="0F1C9BE1-AF9D-476E-83B1-17D43BECFF20"'
+                    ReDim Preserve sSections(iCount)
+                    sSections(iCount) = sCur
+                End If
+                iPos = iNextPos + 1
+                iNextPos = InStr(iPos, sIniFile, Chr(0))
+            Loop
+        End If
+
+    End Sub
+
+    Property INISection() As String
+        Get
+            Dim sBuf As String
+            Dim iSize As String
+            Dim iRetCode As Short
+
+            sBuf = Space(8192)
+            iSize = CStr(Len(sBuf))
+            iRetCode = GetPrivateProfileString(m_sSection, 0, m_sDefault, sBuf, CInt(iSize), m_sPath)
+            If (CDbl(iSize) > 0) Then
+                INISection = Left(sBuf, iRetCode)
+            Else
+                INISection = ""
+            End If
+
+        End Get
+        Set(ByVal Value As String)
+            m_lLastReturnCode = WritePrivateProfileString(m_sSection, 0, Value, m_sPath)
+        End Set
+    End Property
+    ReadOnly Property Sections() As String
+        Get
+            Dim sBuf As String
+            Dim iSize As String
+            Dim iRetCode As Short
+
+            sBuf = Space(8192)
+            iSize = CStr(Len(sBuf))
+            iRetCode = GetPrivateProfileString(0, 0, m_sDefault, sBuf, CInt(iSize), m_sPath)
+            If (CDbl(iSize) > 0) Then
+                Sections = Left(sBuf, iRetCode)
+            Else
+                Sections = ""
+            End If
+
+        End Get
+    End Property
+
+    ReadOnly Property LastReturnCode() As Integer
+        Get
+            LastReturnCode = m_lLastReturnCode
+        End Get
+    End Property
+    ReadOnly Property Success() As Boolean
+        Get
+            Success = (m_lLastReturnCode <> 0)
+        End Get
+    End Property
+    'UPGRADE_NOTE: Default이(가) Default_Renamed(으)로 업그레이드되었습니다. 자세한 내용은 다음을 참조하십시오. 'ms-help://MS.VSCC.v80/dv_commoner/local/redirect.htm?keyword="A9E4979A-37FA-4718-9994-97DD76ED70A7"'
+    Property Default_Renamed() As String
+        Get
+            Default_Renamed = m_sDefault
+        End Get
+        Set(ByVal Value As String)
+            m_sDefault = Value
+        End Set
+    End Property
+    Property Path() As String
+        Get
+            Path = m_sPath
+        End Get
+        Set(ByVal Value As String)
+            m_sPath = Value
+        End Set
+    End Property
+    Property Key() As String
+        Get
+            Key = m_sKey
+        End Get
+        Set(ByVal Value As String)
+            m_sKey = Value
+        End Set
+    End Property
+    Property Section() As String
+        Get
+            Section = m_sSection
+        End Get
+        Set(ByVal Value As String)
+            m_sSection = Value
+        End Set
+    End Property
+
+
+End Class

Epole.fp13/MyPath.vb

@@ -0,0 +1,35 @@
+Public Class MyPath
+    Public Shared Function Current() As String
+        Return My.Application.Info.DirectoryPath
+    End Function
+    Public Shared Function Windows() As String
+        Dim SYSTEMD As String = (System.Environment.GetFolderPath(Environment.SpecialFolder.System))
+        Dim DI As System.IO.DirectoryInfo = New System.IO.DirectoryInfo(SYSTEMD)
+        Return DI.Parent.FullName
+    End Function
+    Public Shared Function System32() As String
+        Return System.Environment.GetFolderPath(Environment.SpecialFolder.System).ToString
+    End Function
+    Public Shared Function Desktop() As String
+        Return System.Environment.GetFolderPath(Environment.SpecialFolder.Desktop)
+    End Function
+    Public Shared Function DesktopPath() As String
+        Return System.Environment.GetFolderPath(Environment.SpecialFolder.DesktopDirectory)
+    End Function
+    Public Shared Function Mycomputer() As String
+        Return System.Environment.GetFolderPath(Environment.SpecialFolder.MyComputer)
+    End Function
+    Public Shared Function Mydocument() As String
+        Return System.Environment.GetFolderPath(Environment.SpecialFolder.MyDocuments)
+    End Function
+    Public Shared Function Programfiles() As String
+        Return System.Environment.GetFolderPath(Environment.SpecialFolder.ProgramFiles)
+    End Function
+    Public Shared Function StartMenu() As String
+        Return System.Environment.GetFolderPath(Environment.SpecialFolder.StartMenu)
+    End Function
+    Public Shared Function StartUp() As String
+        Return System.Environment.GetFolderPath(Environment.SpecialFolder.Startup)
+    End Function
+
+End Class

Epole.fp13/NewFp.Designer.vb

@@ -0,0 +1,36 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class NewFp
+    Inherits FarPoint.Win.Spread.FpSpread
+
+    'UserControl1은 Dispose를 재정의하여 구성 요소 목록을 정리합니다.
+    <System.Diagnostics.DebuggerNonUserCode()> _
+    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
+        Try
+            If disposing AndAlso components IsNot Nothing Then
+                components.Dispose()
+            End If
+        Finally
+            MyBase.Dispose(disposing)
+        End Try
+    End Sub
+
+    'Windows Form 디자이너에 필요합니다.
+    Private components As System.ComponentModel.IContainer
+
+    '참고: 다음 프로시저는 Windows Form 디자이너에 필요합니다.
+    '수정하려면 Windows Form 디자이너를 사용하십시오.  
+    '코드 편집기를 사용하여 수정하지 마십시오.
+    <System.Diagnostics.DebuggerStepThrough()> _
+    Private Sub InitializeComponent()
+        CType(Me, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SuspendLayout()
+        '
+        'NewFp
+        '
+        Me.ActiveSheetIndex = -1
+        CType(Me, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.ResumeLayout(False)
+
+    End Sub
+
+End Class

Epole.fp13/NewFp.resx

@@ -0,0 +1,123 @@
+<?xml version="1.0" encoding="utf-8"?>
+<root>
+  <!-- 
+    Microsoft ResX Schema 
+    
+    Version 2.0
+    
+    The primary goals of this format is to allow a simple XML format 
+    that is mostly human readable. The generation and parsing of the 
+    various data types are done through the TypeConverter classes 
+    associated with the data types.
+    
+    Example:
+    
+    ... ado.net/XML headers & schema ...
+    <resheader name="resmimetype">text/microsoft-resx</resheader>
+    <resheader name="version">2.0</resheader>
+    <resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
+    <resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
+    <data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
+    <data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
+    <data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
+        <value>[base64 mime encoded serialized .NET Framework object]</value>
+    </data>
+    <data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+        <value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
+        <comment>This is a comment</comment>
+    </data>
+                
+    There are any number of "resheader" rows that contain simple 
+    name/value pairs.
+    
+    Each data row contains a name, and value. The row also contains a 
+    type or mimetype. Type corresponds to a .NET class that support 
+    text/value conversion through the TypeConverter architecture. 
+    Classes that don't support this are serialized and stored with the 
+    mimetype set.
+    
+    The mimetype is used for serialized objects, and tells the 
+    ResXResourceReader how to depersist the object. This is currently not 
+    extensible. For a given mimetype the value must be set accordingly:
+    
+    Note - application/x-microsoft.net.object.binary.base64 is the format 
+    that the ResXResourceWriter will generate, however the reader can 
+    read any of the formats listed below.
+    
+    mimetype: application/x-microsoft.net.object.binary.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
+            : and then encoded with base64 encoding.
+    
+    mimetype: application/x-microsoft.net.object.soap.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Soap.SoapFormatter
+            : and then encoded with base64 encoding.
+
+    mimetype: application/x-microsoft.net.object.bytearray.base64
+    value   : The object must be serialized into a byte array 
+            : using a System.ComponentModel.TypeConverter
+            : and then encoded with base64 encoding.
+    -->
+  <xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
+    <xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
+    <xsd:element name="root" msdata:IsDataSet="true">
+      <xsd:complexType>
+        <xsd:choice maxOccurs="unbounded">
+          <xsd:element name="metadata">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" />
+              </xsd:sequence>
+              <xsd:attribute name="name" use="required" type="xsd:string" />
+              <xsd:attribute name="type" type="xsd:string" />
+              <xsd:attribute name="mimetype" type="xsd:string" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="assembly">
+            <xsd:complexType>
+              <xsd:attribute name="alias" type="xsd:string" />
+              <xsd:attribute name="name" type="xsd:string" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="data">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+                <xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
+              <xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
+              <xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="resheader">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" />
+            </xsd:complexType>
+          </xsd:element>
+        </xsd:choice>
+      </xsd:complexType>
+    </xsd:element>
+  </xsd:schema>
+  <resheader name="resmimetype">
+    <value>text/microsoft-resx</value>
+  </resheader>
+  <resheader name="version">
+    <value>2.0</value>
+  </resheader>
+  <resheader name="reader">
+    <value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <resheader name="writer">
+    <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <metadata name="$this.TrayLargeIcon" type="System.Boolean, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
+    <value>False</value>
+  </metadata>
+</root>

Epole.fp13/ReadMe.txt

@@ -0,0 +1,79 @@
+190505	* 인증방법변경 및 인증키와 연동 작업 (일자만 인증한다)
+190502	* 기존 QR이 존재하는 화면에 배경색 전경색을 추가함
+170715	* 가공-선로화살표를 비고 앞에 놓이도록 수정
+		* 엑셀불러오기에 선로화살표 기능추가
+		* 엑셀내보내기에서 컬럼을 제외함 (컬럼이 있으면 데이터가 컬럼수만큼 출력 안됨.. 그레이프까페에 문의함)
+
+170711	* 전주번호찰 일반번호찰에 화살표를 추가함
+2017-05-19
+	지중번호찰 입력에서 빈줄체크로직에 몇개 필드 더 추가
+	설치파일 다시 생성함 2013은 사용못하고 limit 버젼으로 했음
+2014-04-16
+	구전산화번호->신전산화번호 변경시 flexgrid 로 일부 대체 (저장시 오류가 있음)
+2014-04-15
+	가공번호찰입력 - 구신전산화번호가 같은경우(다른줄) 에서  찾은 갯수가 표시되지 않은 현상 제거
+	가공번호찰 출력에서 H가 있는 경우 없는경우 저장시 번호에 H여부 판단하여 저장하도록 수정
+2017-03-20
+	지중일반에 제조년월/제조회사 필드 추가
+2017-03-08
+	가공번호찰에서 . .지선주일때 전주번호가 나오지 않아야하는데. 나오는 현상 제거 (소스코드 1줄 누락되어서 구버젼 보고 복구함)
+	중복검사 기능 1개 수정 및 추가
+	전체페이지 출력완료후 마지막 데이터가 이상하게 디스플레이되는 현상 제거(화면에만 그러함 : 인쇄물은 파일로 출력시 확인 못함) <- 전 화면 적용
+	다음페이지 출력설정이 된 경우 홀수 페이지가 나오지 않는 현상 수정
+
+2017-03-02
+	스타일연속저장시 나타나는 오류 현상제거(삭제된 행....)
+	지중(케이블) , 각 구간을 1개에서 15개로 개별 분리
+
+2017-02-27
+	1/3 : 기입(선로명) 스타일에서 타 스타일 변경시 선로명 복사기능이 남아 있는 현상 제거
+	2/3 : 기입(선로명) 스타일에서 한줄전주번호가 표시되는 현상제거(해당 기능은 전주번호 표시여부에 연결되었습니다)
+	3/3 : 기입(선로명) 스타일에서 데이터출력옵션이 "다음데이터" 에서 "현재데이터" 로 기본값 변경되었습니다
+
+2017-02-16
+	지중출력시 시공년월을 기존 1개에서 10개로 분리처리함
+2017-02-10
+	입력폼(지중) 에서 데이터테이블 fill,update 오류가 발생해서,
+	tableAdater 새로 생성해서 우선 막아둠 ;; 고쳐야함
+2016-08-30 
+	printformsrc 에서  비고명이 패턴파싱에 오류가 있었음 해결됨
+	중요수용에서 관리구가 5자리 미만일경우 오류가 발생하는 경우에대한 오류처리추가
+
+2016-01-31
+	1)가공번호찰 _일반번호찰
+	입력창에서 우측 기입체크부분은 있는데 우측에 "인입용체크창이 숨었네요" 칸을 열어주세요.
+	2) 가공번호찰 _자동화기기번호찰
+	현재 에러가나서 열리지않습니다.
+	자동화기기번호찰 복원용의 내용과 동일하게 바꾸어주세요.
+	3)지중번호찰_일반번호찰
+	기기번호(선로명+선로번호) , 변압기사항(선로명+선로번호+상+형식(용량)) 으로 조정합니다.
+	*기존 기기번호1 과 기기번호2가 있는대  기기번호2칸은 없애고 칸을 늘리는데 사용하시게요.  
+	3)중요수용번호찰 
+	입력창이 칸이 열리지않고 하너로 묶여 있네요 펼쳐주세요.
+
+
+2016-01-23
+	지중번호찰 내용추가 (선로명+기기, 선로명+변압기)
+2015-02-12
+	windows 7 64bit 에서 재 컴파일(한글및 추가 오류 제거됨)
+2015-02-08
+	1)점검일자가 연결은 되었는데 지정을하고 점검일자 내용이 없는데도 원과 선이 그대로 활성화됨									
+	2)엔터치고 바로 아래로 내려가지않고 중간에서 한줄삽입됨 									
+	  -내용이없을때 이상없는데 내용이 있으면 이상하게 작동.									
+	3)한줄삽입/한줄추가 /한줄삭제 등 기능이 안됨									
+	 삽입및 추가시 순번이형성되면서 순서가 에러가 발생하여 오류가생기네요. 									
+	 한줄삽입시에는 순번은 상단순번을 복사해서 동일하게 하고 한줄삽입이 되어야하고, 									
+	 한줄추가는 순번을 무시하고 마지막줄 다음으로 생성되는게 좋을듯하네요. 									
+	4)COS 휴즈용량(10A , 3A , 100A  등등)  A자등 영문 우선이며 대문자우선									
+	5)상표시찰 영문 우선이며 대문자우선									
+	6)엑셀 불러오기에서도 추가된 내용이 들러가야합니다.(점검일자 누락)									
+
+2015-02-03
+	1)프로그램 설치하면 프레임워크 설치후 멈춤현상 있음 다시설치하면 이어서 설치는 됨								
+	2)가공 일반번호찰 제작에서 우측 인입 체크 줄이 숨어버려서 인입 지정이 안됨.								
+	3)선/박스/원 연결에서 점검일자 부분도 연결을 시켜주세요. 누락됨								
+	4)COS 휴즈용량(10A , 3A , 100A  등등)에서 자수별로 조정이 안됨.								
+	5)상표시찰 1단은 양호하며,  2단에서 자수(1자인경우/3자인경우 별도 조정이 안됨(패턴저장)								
+	6)엑셀 불러오기에서도 추가된 내용이 들러가야합니다.								
+
+2014-12-17 : 프린터 여백과 스케일 값이 숫자만 입력되도록 수정

Epole.fp13/SplashScreen.Designer.vb

@@ -0,0 +1,140 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class SplashScreen
+    Inherits System.Windows.Forms.Form
+
+    'Form은 Dispose를 재정의하여 구성 요소 목록을 정리합니다.
+    <System.Diagnostics.DebuggerNonUserCode()> _
+    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
+        If disposing Then
+            If Not (components Is Nothing) Then
+                components.Dispose()
+            End If
+        End If
+        MyBase.Dispose(disposing)
+    End Sub
+    Friend WithEvents MainLayoutPanel As System.Windows.Forms.TableLayoutPanel
+
+    'Windows Form 디자이너에 필요합니다.
+    Private components As System.ComponentModel.IContainer
+
+    '참고: 다음 프로시저는 Windows Form 디자이너에 필요합니다.
+    '수정하려면 Windows Form 디자이너를 사용하십시오.  
+    '코드 편집기를 사용하여 수정하지 마십시오.
+    <System.Diagnostics.DebuggerStepThrough()> _
+    Private Sub InitializeComponent()
+        Me.MainLayoutPanel = New System.Windows.Forms.TableLayoutPanel()
+        Me.lb_msg = New System.Windows.Forms.Label()
+        Me.DetailsLayoutPanel = New System.Windows.Forms.TableLayoutPanel()
+        Me.Copyright = New System.Windows.Forms.Label()
+        Me.Version = New System.Windows.Forms.Label()
+        Me.ApplicationTitle = New System.Windows.Forms.Label()
+        Me.MainLayoutPanel.SuspendLayout()
+        Me.DetailsLayoutPanel.SuspendLayout()
+        Me.SuspendLayout()
+        '
+        'MainLayoutPanel
+        '
+        Me.MainLayoutPanel.BackColor = System.Drawing.Color.MediumSeaGreen
+        Me.MainLayoutPanel.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch
+        Me.MainLayoutPanel.ColumnCount = 1
+        Me.MainLayoutPanel.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Absolute, 286.0!))
+        Me.MainLayoutPanel.Controls.Add(Me.lb_msg, 0, 2)
+        Me.MainLayoutPanel.Controls.Add(Me.DetailsLayoutPanel, 0, 1)
+        Me.MainLayoutPanel.Controls.Add(Me.ApplicationTitle, 0, 0)
+        Me.MainLayoutPanel.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.MainLayoutPanel.Location = New System.Drawing.Point(0, 0)
+        Me.MainLayoutPanel.Name = "MainLayoutPanel"
+        Me.MainLayoutPanel.RowCount = 3
+        Me.MainLayoutPanel.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 70.0!))
+        Me.MainLayoutPanel.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 18.0!))
+        Me.MainLayoutPanel.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 12.0!))
+        Me.MainLayoutPanel.Size = New System.Drawing.Size(357, 205)
+        Me.MainLayoutPanel.TabIndex = 0
+        '
+        'lb_msg
+        '
+        Me.lb_msg.BackColor = System.Drawing.Color.Transparent
+        Me.lb_msg.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.lb_msg.Font = New System.Drawing.Font("굴림", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
+        Me.lb_msg.ForeColor = System.Drawing.Color.White
+        Me.lb_msg.Location = New System.Drawing.Point(3, 179)
+        Me.lb_msg.Name = "lb_msg"
+        Me.lb_msg.Size = New System.Drawing.Size(351, 26)
+        Me.lb_msg.TabIndex = 2
+        Me.lb_msg.Text = "[]"
+        Me.lb_msg.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
+        '
+        'DetailsLayoutPanel
+        '
+        Me.DetailsLayoutPanel.BackColor = System.Drawing.Color.Transparent
+        Me.DetailsLayoutPanel.ColumnCount = 1
+        Me.DetailsLayoutPanel.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Absolute, 490.0!))
+        Me.DetailsLayoutPanel.Controls.Add(Me.Copyright, 0, 1)
+        Me.DetailsLayoutPanel.Controls.Add(Me.Version, 0, 0)
+        Me.DetailsLayoutPanel.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.DetailsLayoutPanel.Location = New System.Drawing.Point(3, 146)
+        Me.DetailsLayoutPanel.Name = "DetailsLayoutPanel"
+        Me.DetailsLayoutPanel.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 53.0303!))
+        Me.DetailsLayoutPanel.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 46.9697!))
+        Me.DetailsLayoutPanel.Size = New System.Drawing.Size(351, 30)
+        Me.DetailsLayoutPanel.TabIndex = 1
+        '
+        'Copyright
+        '
+        Me.Copyright.BackColor = System.Drawing.Color.Transparent
+        Me.Copyright.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.Copyright.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Copyright.Location = New System.Drawing.Point(3, 15)
+        Me.Copyright.Name = "Copyright"
+        Me.Copyright.Size = New System.Drawing.Size(484, 15)
+        Me.Copyright.TabIndex = 2
+        Me.Copyright.Text = "저작권"
+        '
+        'Version
+        '
+        Me.Version.BackColor = System.Drawing.Color.Transparent
+        Me.Version.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.Version.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Version.Location = New System.Drawing.Point(3, 0)
+        Me.Version.Name = "Version"
+        Me.Version.Size = New System.Drawing.Size(484, 15)
+        Me.Version.TabIndex = 1
+        Me.Version.Text = "Version {0}.{1:00}.{2}.{3}"
+        '
+        'ApplicationTitle
+        '
+        Me.ApplicationTitle.BackColor = System.Drawing.Color.MediumSeaGreen
+        Me.ApplicationTitle.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.ApplicationTitle.Font = New System.Drawing.Font("맑은 고딕", 14.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
+        Me.ApplicationTitle.Location = New System.Drawing.Point(3, 0)
+        Me.ApplicationTitle.Name = "ApplicationTitle"
+        Me.ApplicationTitle.Size = New System.Drawing.Size(351, 143)
+        Me.ApplicationTitle.TabIndex = 0
+        Me.ApplicationTitle.Text = "응용 프로그램 제목"
+        Me.ApplicationTitle.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
+        '
+        'SplashScreen
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 12.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.ClientSize = New System.Drawing.Size(357, 205)
+        Me.ControlBox = False
+        Me.Controls.Add(Me.MainLayoutPanel)
+        Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog
+        Me.MaximizeBox = False
+        Me.MinimizeBox = False
+        Me.Name = "SplashScreen"
+        Me.ShowInTaskbar = False
+        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
+        Me.MainLayoutPanel.ResumeLayout(False)
+        Me.DetailsLayoutPanel.ResumeLayout(False)
+        Me.ResumeLayout(False)
+
+    End Sub
+    Friend WithEvents ApplicationTitle As System.Windows.Forms.Label
+    Friend WithEvents lb_msg As System.Windows.Forms.Label
+    Friend WithEvents DetailsLayoutPanel As System.Windows.Forms.TableLayoutPanel
+    Friend WithEvents Copyright As System.Windows.Forms.Label
+    Friend WithEvents Version As System.Windows.Forms.Label
+
+End Class

Epole.fp13/SplashScreen.resx

@@ -0,0 +1,120 @@
+<?xml version="1.0" encoding="utf-8"?>
+<root>
+  <!-- 
+    Microsoft ResX Schema 
+    
+    Version 2.0
+    
+    The primary goals of this format is to allow a simple XML format 
+    that is mostly human readable. The generation and parsing of the 
+    various data types are done through the TypeConverter classes 
+    associated with the data types.
+    
+    Example:
+    
+    ... ado.net/XML headers & schema ...
+    <resheader name="resmimetype">text/microsoft-resx</resheader>
+    <resheader name="version">2.0</resheader>
+    <resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
+    <resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
+    <data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
+    <data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
+    <data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
+        <value>[base64 mime encoded serialized .NET Framework object]</value>
+    </data>
+    <data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+        <value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
+        <comment>This is a comment</comment>
+    </data>
+                
+    There are any number of "resheader" rows that contain simple 
+    name/value pairs.
+    
+    Each data row contains a name, and value. The row also contains a 
+    type or mimetype. Type corresponds to a .NET class that support 
+    text/value conversion through the TypeConverter architecture. 
+    Classes that don't support this are serialized and stored with the 
+    mimetype set.
+    
+    The mimetype is used for serialized objects, and tells the 
+    ResXResourceReader how to depersist the object. This is currently not 
+    extensible. For a given mimetype the value must be set accordingly:
+    
+    Note - application/x-microsoft.net.object.binary.base64 is the format 
+    that the ResXResourceWriter will generate, however the reader can 
+    read any of the formats listed below.
+    
+    mimetype: application/x-microsoft.net.object.binary.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
+            : and then encoded with base64 encoding.
+    
+    mimetype: application/x-microsoft.net.object.soap.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Soap.SoapFormatter
+            : and then encoded with base64 encoding.
+
+    mimetype: application/x-microsoft.net.object.bytearray.base64
+    value   : The object must be serialized into a byte array 
+            : using a System.ComponentModel.TypeConverter
+            : and then encoded with base64 encoding.
+    -->
+  <xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
+    <xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
+    <xsd:element name="root" msdata:IsDataSet="true">
+      <xsd:complexType>
+        <xsd:choice maxOccurs="unbounded">
+          <xsd:element name="metadata">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" />
+              </xsd:sequence>
+              <xsd:attribute name="name" use="required" type="xsd:string" />
+              <xsd:attribute name="type" type="xsd:string" />
+              <xsd:attribute name="mimetype" type="xsd:string" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="assembly">
+            <xsd:complexType>
+              <xsd:attribute name="alias" type="xsd:string" />
+              <xsd:attribute name="name" type="xsd:string" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="data">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+                <xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
+              <xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
+              <xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="resheader">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" />
+            </xsd:complexType>
+          </xsd:element>
+        </xsd:choice>
+      </xsd:complexType>
+    </xsd:element>
+  </xsd:schema>
+  <resheader name="resmimetype">
+    <value>text/microsoft-resx</value>
+  </resheader>
+  <resheader name="version">
+    <value>2.0</value>
+  </resheader>
+  <resheader name="reader">
+    <value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <resheader name="writer">
+    <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+</root>

Epole.fp13/SplashScreen.vb

@@ -0,0 +1,278 @@
+Imports MyControlOLEDBv2
+
+Public NotInheritable Class SplashScreen
+    Dim install, installkey As Long
+    Dim auth As New MyAuth
+    'Dim Runcnt As Integer = 0
+    'TODO: 프로젝트 디자이너에서 "프로젝트" 메뉴의 "속성"을 선택하여 표시된 "응용 프로그램" 탭에서
+    '  이 폼을 응용 프로그램의 시작 화면으로 쉽게 설정할 수 있습니다.
+    Private Sub SplashScreen1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
+        '응용 프로그램의 어셈블리 정보에 따라 런타임에 대화 상자 텍스트를 설정합니다.  
+        'TODO: "프로젝트" 메뉴에서 선택하여 표시된 프로젝트 속성 대화 상자의 "응용 프로그램" 창에서 응용 프로그램의
+        '  어셈블리 정보를 사용자 지정합니다.
+        '응용 프로그램 제목
+        My.Settings.Item("ireaConnectionString") = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + My.Application.Info.DirectoryPath & "\database\database.mdb"
+
+        If Command().ToUpper = "ARIN" Then Admin = True
+        'MsgBox(My.Settings.ireaConnectionString)
+
+        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, My.Application.Info.Version.Build, My.Application.Info.Version.Revision)
+
+        '저작권 정보
+        Copyright.Text = My.Application.Info.Copyright
+        Me.Show()
+        My.Application.DoEvents()
+
+        If Not LoadINI() Then End
+
+        '//인증사용안함 191125 -
+        'If Command() <> "ARIN" AndAlso Not ReadAuth() Then '//에러났을떄는 카운터를 확인
+        '    '//사용횟수가 10번ㅇ르 초과했는지 확인
+        '    Runcnt = Me.ReadAuthcount
+        '    Dim f As New fAuth()
+        '    If (f.ShowDialog <> System.Windows.Forms.DialogResult.OK) Then
+        '        End
+        '    End If
+        '    'If Runcnt >= 10 Then
+        '    '    Dim NewKey As String = InputBox("인증번호를 입력하세요 (인증번호는 숫자로만 이루어져 있습니다)")
+        '    '    If IsNumeric(NewKey) = False Then
+        '    '        MsgBox("프로그램을 재실행 하세요", MsgBoxStyle.Information, "확인")
+        '    '        End
+        '    '    End If
+        '    '    auth.SetAuth(NewKey, My.Application.Info.DirectoryPath & "\epole.ini")
+        '    '    MsgBox("프로그램을 재실행 하세요", MsgBoxStyle.Information, "확인")
+        '    '    End
+        '    'Else
+        '    '    MsgBox(CStr(10 - Runcnt) & "번의 사용횟수가 남았습니다", MsgBoxStyle.Critical, "실행확인")
+        '    'End If
+        'End If
+        If Not LoadReg() Then End
+        If Not Connect() Then End
+        Me.lb_msg.Text = ""
+
+        ' LoginForm1.MdiParent = Main
+        'LoginForm1.TopMost = True
+        'LoginForm1.Show()
+        Frm_Main.Show()
+        Me.Dispose()
+        'Me.Hide()
+
+    End Sub
+    Private Function ReadAuthcount() As Integer
+        Dim RunCnt As Integer = 0
+        Dim ini As New MyINI2(My.Application.Info.DirectoryPath & "\epole.ini")
+        Dim RegDate As String = ini.Read("main", "regdate2", "")
+        Dim CurDate As String = Me.auth.GetDateNumberEnc(Today.AddDays(-10))
+        If RegDate = "" Then   '//등록일이없으면 10번카운터를 셋팅한다.
+            RunCnt = 1
+            ini.Write("main", "reg2", RunCnt)  '//1일로한다.
+            ini.Write("main", "regdate2", Me.auth.GetDateNumberEnc(Today))  '//1일로한다.
+        Else
+            '//상요자가 숫자를 임의로 고칠수있으니 설치된 날짜랑 오늘이랑 10일이상차이나면 횟수에상관없이 사용불가로한다.
+            If CurDate > RegDate Then
+                MsgBox("프로그램을 사용할 수 없습니다" & vbCrLf & "배포업체에 문의하세요", MsgBoxStyle.Information, "확인")
+                Return 10
+            End If
+            RunCnt = ini.Read("main", "reg2", 10) '//없으면 10으로한다 즉 사용못하게하겠다는거다
+            If RunCnt < 10 Then
+                RunCnt += 1
+                ini.Write("main", "reg2", RunCnt)  '//1일로한다.
+            End If
+        End If
+        If RunCnt >= 10 Then Return 10
+        Return RunCnt
+    End Function
+
+    Private Function ReadAuth() As Boolean
+        If install = 0 OrElse installkey = 0 Then
+            ' MsgBox("인증정보가 존재하지 않습니다." & vbCrLf & vbCrLf & "홈페이지 [자료실] 에서 인증번호를 확인하세요" & vbCrLf & "062-382-0411" & vbCrLf & Common.HomePage, MsgBoxStyle.Critical, "확인")
+            'Process.Start(HomePage)
+            Return False
+        End If
+
+        Dim 현재날짜값 As Long = auth.GetDateNumber(Now)
+
+        If 현재날짜값 > install Then
+            ' MsgBox("사용기간이 초과되었습니다." & vbCrLf & vbCrLf & "홈페이지 [자료실] 에서 인증번호를 확인하세요" & vbCrLf & "062-382-0411" & vbCrLf & Common.HomePage, MsgBoxStyle.Critical, "확인")
+            'Process.Start(HomePage)
+            Return False '//만기일을 초과했다면
+        End If
+
+        'Dim FI As New System.IO.FileInfo(My.Application.Info.DirectoryPath & "\epole.ini")
+        'If (auth.GetDateNumber(FI.LastAccessTimeUtc)) > Now.ToFileTimeUtc Then   '//설정파일을 접근한 날짜가 오늘보다 크면 즉 오늘이 조작디었을경우다
+        '    '  MsgBox("사용기간이 초과되었습니다." & vbCrLf & vbCrLf & "홈페이지 [자료실] 에서 인증번호를 확인하세요" & vbCrLf & "062-382-0411" & vbCrLf & Common.HomePage, MsgBoxStyle.Critical, "확인")
+        '    'Process.Start(HomePage)
+        '    Return False '//만기일을 초과했다면
+        'End If
+
+        Dim 해쉬값 As Integer = install.GetHashCode()
+        If installkey.ToString <> 해쉬값 Then    '//인증정보가 손상되었다면
+            '  MsgBox("인증정보가 손상되었습니다" & vbCrLf & vbCrLf & "홈페이지 [자료실] 에서 인증번호를 확인하세요" & vbCrLf & "062-382-0411" & vbCrLf & Common.HomePage, MsgBoxStyle.Critical, "확인")
+            'Process.Start(HomePage)
+            Return False
+        End If
+
+        Rundate = Date.FromFileTimeUtc(install)
+
+        Return True
+        ' MsgBox(auth.GetDateNumberEnc(Now))
+    End Function
+
+    Private Sub SetAuth(ByVal NewDate As Date)
+        Dim auth As New MyAuth
+        Dim Arinini As New MyINI2(My.Application.Info.DirectoryPath & "\epole.ini")
+        Arinini.Write("main", "install2", auth.GetDateNumber(NewDate))
+        Arinini.Write("main", "installkey2", auth.GetDateNumberEnc(NewDate))
+
+        MsgBox("기록완료")
+    End Sub
+
+    Private Function LoadINI() As Boolean
+
+        Me.lb_msg.Text = "환경설정 데이터를 읽어옵니다"
+        Dim Arinini As New MyINI2(My.Application.Info.DirectoryPath & "\epole.ini")
+        Dim buf() As String
+
+        If Not Arinini.Exist Then
+            MsgBox("환경설정파일 EPOLE.INI 가 존재하지 않습니다" & vbCrLf & "[시작-설정-프로그램설정]을 다시 실행해주세요", MsgBoxStyle.Information, "환경설정오류")
+            Arinini.Create()
+            Return True
+        End If
+        Try
+            Auto_Log = CType(Arinini.Read("MAIN", "log"), Boolean)
+            Common.PICmanFile = Arinini.Read("MAIN", "PICMAN")
+            Common.MakeState = Arinini.Read("main", "makestate")
+            Common.PoleState = Arinini.Read("main", "polestate")
+            Common.PoleEtcState = Arinini.Read("main", "poleetcstate")
+            Common.PicState = Arinini.Read("main", "picstate")
+            Common.NUMCOLOR = Arinini.Read("MAIN", "NUMCOLOR", True)
+            SORTNULL = Arinini.Read("MAIN", "SortNull", True)
+            buf = Arinini.Read("main", "viewfont", "굴림,9").Split(",")
+            Common.ViewFont.FontName = buf(0)
+            Common.ViewFont.FontSize = buf(1)
+
+            Me.install = Arinini.Read("main", "install2", 0)
+            Me.installkey = Arinini.Read("main", "installkey2", 0)
+
+            buf = Arinini.Read("main", "menufont", "굴림,9").Split(",")
+            Common.MenuFont.FontName = buf(0)
+            Common.MenuFont.FontSize = buf(1)
+
+            buf = Arinini.Read("main", "formfont", "굴림,11").Split(",")
+            Common.FormFont.FontName = buf(0)
+            Common.FormFont.FontSize = buf(1)
+
+            Common.HelpWebSite = Arinini.Read("main", "helpweb")
+            Common.HomePage = Arinini.Read("main", "homepage")
+        Catch ex As Exception
+            MsgBox("환경설정 파일을 불러올수 없습니다" & vbCrLf & vbCrLf & "오류메세지=" & ex.Message.ToString _
+            & vbCrLf & "[시작-설정-프로그램설정]을 다시 실행해주세요", MsgBoxStyle.Critical, "오류")
+        End Try
+        Return True
+    End Function
+    Private Function LoadReg() As Boolean
+        Me.lb_msg.Text = "레지스트리 데이터를 읽어옵니다"
+        Me.Invalidate()
+        Try
+
+        Catch ex As Exception
+            MsgBox("레지스트리를 확인할 수 없습니다", MsgBoxStyle.Critical, "오류")
+        End Try
+        Return True
+    End Function
+
+    Private Function Connect() As Boolean
+        Me.lb_msg.Text = "데이터베이스확인중..."
+        If Not System.IO.File.Exists(DataBaseFile) Then Return False
+        Dim Dbpath As String = My.Application.Info.DirectoryPath & "\database"
+        Dim Dbini As New MyINI2(Dbpath & "\patch.ini")
+
+        ' Return True
+
+        '//데이터베이스 버젼을 확인한다.
+        Dim Cnn As New OleDbConnection(My.Settings.ireaConnectionString)
+        Try
+            Cnn.Open()
+        Catch ex As Exception
+            MsgBox("데이터베이스를 열수 없습니다", "데이터베이스 손상되었는지 사용중인지 확인하세요", "오류")
+            Return False
+        End Try
+        If Cnn.State <> ConnectionState.Open Then
+            MsgBox("데이터베이스를 열수 없습니다", "데이터베이스 손상되었는지 사용중인지 확인하세요", "오류")
+            Return False
+        End If
+
+        Dim Dbversion As Short = 0
+        Dim ErrMsg As String = ""
+
+        Dim Cmd As New OleDbCommand("select version from dbinfo", Cnn)
+        Try
+            Dbversion = Cmd.ExecuteScalar
+        Catch ex As OleDb.OleDbException
+            Dbversion = 0
+            ErrMsg = ex.Message.ToString
+        End Try
+
+        If ErrMsg.IndexOf("dbinfo") >= 0 Then ''//테이블이 없을경우이다.
+            Cmd = New OleDbCommand("create table dbinfo ( version number )", Cnn)
+            Cmd.ExecuteNonQuery()   '//테이블생성
+            Cmd = New OleDbCommand("insert into dbinfo(version) values(0)", Cnn)
+            Cmd.ExecuteNonQuery()
+            Dbversion = 0
+        End If
+
+        Cmd = New OleDbCommand("select count(*) from dbinfo", Cnn)
+        Dim RowCnt As Short = Cmd.ExecuteScalar
+        If RowCnt = 0 Then
+            Cmd = New OleDbCommand("insert into dbinfo(version) values(0)", Cnn)
+            Cmd.ExecuteNonQuery()
+        End If
+
+        If Dbini.Exist = False Then
+            MsgBox("데이터베이스 업데이트 파일이 없습니다")
+            Return True
+        End If
+        Me.lb_msg.Text = "데이터베이스확인"
+
+        Dim MaxVersion As Short = Dbini.Read("db", "version", "0")
+        For i As Short = Dbversion + 1 To MaxVersion   '//순서대로 쿼리를 실행한다.
+            '//파일을 불러와서 파일의 내용을 ; 만날때마다 실행한다.
+            If System.IO.File.Exists(Dbpath & "\version" & i & ".sql") Then
+                Dim Fs As New System.IO.FileStream(Dbpath & "\version" & i & ".sql", IO.FileMode.Open)
+                Dim SR As New System.IO.StreamReader(Fs, System.Text.Encoding.Default)
+                Dim Str As String = SR.ReadToEnd
+                For Each Sql As String In Str.Split(";")
+                    If Sql.Trim <> "" Then
+                        Cmd = New OleDbCommand(Sql, Cnn)
+                        Try
+                            Cmd.ExecuteNonQuery()   '//테이블생성
+                        Catch ex As Exception
+                            '//이부분은 나중에 메일로 보내도록한다.
+                            MsgBox("데이터베이스 업그레이드오류 버젼=" & i & vbCrLf & ex.Message.ToString & vbCrLf & Sql, MsgBoxStyle.Critical, "확인")
+                        End Try
+                    End If
+                Next
+            End If
+        Next
+
+        Cmd = New OleDbCommand("update dbinfo set version=" & MaxVersion, Cnn)
+        Try
+            Cmd.ExecuteNonQuery()
+        Catch ex As Exception
+            ' MsgBox(ex.Message.ToString)
+        End Try
+
+
+        Cmd.Dispose()
+        Cnn.Close()
+        Cnn.Dispose()
+        Return True
+
+    End Function
+End Class

Epole.fp13/WEBBROWSER.Designer.vb

@@ -0,0 +1,47 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class WEBBROWSER
+    Inherits System.Windows.Forms.Form
+
+    'Form은 Dispose를 재정의하여 구성 요소 목록을 정리합니다.
+    <System.Diagnostics.DebuggerNonUserCode()> _
+    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
+        If disposing AndAlso components IsNot Nothing Then
+            components.Dispose()
+        End If
+        MyBase.Dispose(disposing)
+    End Sub
+
+    'Windows Form 디자이너에 필요합니다.
+    Private components As System.ComponentModel.IContainer
+
+    '참고: 다음 프로시저는 Windows Form 디자이너에 필요합니다.
+    '수정하려면 Windows Form 디자이너를 사용하십시오.  
+    '코드 편집기를 사용하여 수정하지 마십시오.
+    <System.Diagnostics.DebuggerStepThrough()> _
+    Private Sub InitializeComponent()
+        Me.WebBrowser1 = New System.Windows.Forms.WebBrowser
+        Me.SuspendLayout()
+        '
+        'WebBrowser1
+        '
+        Me.WebBrowser1.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.WebBrowser1.Location = New System.Drawing.Point(0, 0)
+        Me.WebBrowser1.MinimumSize = New System.Drawing.Size(20, 20)
+        Me.WebBrowser1.Name = "WebBrowser1"
+        Me.WebBrowser1.Size = New System.Drawing.Size(670, 611)
+        Me.WebBrowser1.TabIndex = 0
+        '
+        'WEBBROWSER
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 12.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.ClientSize = New System.Drawing.Size(670, 611)
+        Me.Controls.Add(Me.WebBrowser1)
+        Me.Name = "WEBBROWSER"
+        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
+        Me.Text = "웹페이지 뷰어"
+        Me.ResumeLayout(False)
+
+    End Sub
+    Friend WithEvents WebBrowser1 As System.Windows.Forms.WebBrowser
+End Class

Epole.fp13/WEBBROWSER.resx

@@ -0,0 +1,120 @@
+<?xml version="1.0" encoding="utf-8"?>
+<root>
+  <!-- 
+    Microsoft ResX Schema 
+    
+    Version 2.0
+    
+    The primary goals of this format is to allow a simple XML format 
+    that is mostly human readable. The generation and parsing of the 
+    various data types are done through the TypeConverter classes 
+    associated with the data types.
+    
+    Example:
+    
+    ... ado.net/XML headers & schema ...
+    <resheader name="resmimetype">text/microsoft-resx</resheader>
+    <resheader name="version">2.0</resheader>
+    <resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
+    <resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
+    <data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
+    <data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
+    <data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
+        <value>[base64 mime encoded serialized .NET Framework object]</value>
+    </data>
+    <data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+        <value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
+        <comment>This is a comment</comment>
+    </data>
+                
+    There are any number of "resheader" rows that contain simple 
+    name/value pairs.
+    
+    Each data row contains a name, and value. The row also contains a 
+    type or mimetype. Type corresponds to a .NET class that support 
+    text/value conversion through the TypeConverter architecture. 
+    Classes that don't support this are serialized and stored with the 
+    mimetype set.
+    
+    The mimetype is used for serialized objects, and tells the 
+    ResXResourceReader how to depersist the object. This is currently not 
+    extensible. For a given mimetype the value must be set accordingly:
+    
+    Note - application/x-microsoft.net.object.binary.base64 is the format 
+    that the ResXResourceWriter will generate, however the reader can 
+    read any of the formats listed below.
+    
+    mimetype: application/x-microsoft.net.object.binary.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
+            : and then encoded with base64 encoding.
+    
+    mimetype: application/x-microsoft.net.object.soap.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Soap.SoapFormatter
+            : and then encoded with base64 encoding.
+
+    mimetype: application/x-microsoft.net.object.bytearray.base64
+    value   : The object must be serialized into a byte array 
+            : using a System.ComponentModel.TypeConverter
+            : and then encoded with base64 encoding.
+    -->
+  <xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
+    <xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
+    <xsd:element name="root" msdata:IsDataSet="true">
+      <xsd:complexType>
+        <xsd:choice maxOccurs="unbounded">
+          <xsd:element name="metadata">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" />
+              </xsd:sequence>
+              <xsd:attribute name="name" use="required" type="xsd:string" />
+              <xsd:attribute name="type" type="xsd:string" />
+              <xsd:attribute name="mimetype" type="xsd:string" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="assembly">
+            <xsd:complexType>
+              <xsd:attribute name="alias" type="xsd:string" />
+              <xsd:attribute name="name" type="xsd:string" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="data">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+                <xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
+              <xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
+              <xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="resheader">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" />
+            </xsd:complexType>
+          </xsd:element>
+        </xsd:choice>
+      </xsd:complexType>
+    </xsd:element>
+  </xsd:schema>
+  <resheader name="resmimetype">
+    <value>text/microsoft-resx</value>
+  </resheader>
+  <resheader name="version">
+    <value>2.0</value>
+  </resheader>
+  <resheader name="reader">
+    <value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <resheader name="writer">
+    <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+</root>

Epole.fp13/WEBBROWSER.vb

@@ -0,0 +1,3 @@
+Public Class WEBBROWSER
+
+End Class

Epole.fp13/app.config

@@ -0,0 +1,28 @@
+<?xml version="1.0"?>
+<configuration>
+    <configSections>
+    </configSections>
+    <connectionStrings>
+        <add name="EpoleNet.My.MySettings.ireaConnectionString" connectionString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=|DataDirectory|\bin\Debug\DataBase\irea.mdb" providerName="System.Data.OleDb"/>
+    </connectionStrings>
+    <system.diagnostics>
+        <sources>
+            <!-- 이 섹션은 My.Application.Log의 로깅 구성을 정의합니다. -->
+            <source name="DefaultSource" switchName="DefaultSwitch">
+                <listeners>
+                    <add name="FileLog"/>
+                    <!-- 아래 섹션의 주석 처리를 제거하여 응용 프로그램 이벤트 로그에 씁니다. -->
+                    <!--<add name="EventLog"/>-->
+                </listeners>
+            </source>
+        </sources>
+        <switches>
+            <add name="DefaultSwitch" value="Information"/>
+        </switches>
+        <sharedListeners>
+            <add name="FileLog" type="Microsoft.VisualBasic.Logging.FileLogTraceListener, Microsoft.VisualBasic, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a, processorArchitecture=MSIL" initializeData="FileLogWriter"/>
+            <!-- 아래 섹션의 주석 처리를 제거하여 APPLICATION_NAME을 응용 프로그램 이름으로 바꾼 후 응용 프로그램 이벤트 로그에 씁니다. -->
+            <!--<add name="EventLog" type="System.Diagnostics.EventLogTraceListener" initializeData="APPLICATION_NAME"/> -->
+        </sharedListeners>
+    </system.diagnostics>
+<startup><supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.5.2"/></startup></configuration>

Epole.fp13/fAuth.Designer.vb

@@ -0,0 +1,142 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class fAuth
+    Inherits System.Windows.Forms.Form
+
+    'Form은 Dispose를 재정의하여 구성 요소 목록을 정리합니다.
+    <System.Diagnostics.DebuggerNonUserCode()> _
+    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
+        Try
+            If disposing AndAlso components IsNot Nothing Then
+                components.Dispose()
+            End If
+        Finally
+            MyBase.Dispose(disposing)
+        End Try
+    End Sub
+
+    'Windows Form 디자이너에 필요합니다.
+    Private components As System.ComponentModel.IContainer
+
+    '참고: 다음 프로시저는 Windows Form 디자이너에 필요합니다.
+    '수정하려면 Windows Form 디자이너를 사용하십시오.  
+    '코드 편집기를 사용하여 수정하지 마십시오.
+    <System.Diagnostics.DebuggerStepThrough()> _
+    Private Sub InitializeComponent()
+        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(fAuth))
+        Me.Label1 = New System.Windows.Forms.Label()
+        Me.Label2 = New System.Windows.Forms.Label()
+        Me.Label3 = New System.Windows.Forms.Label()
+        Me.TextBox1 = New System.Windows.Forms.TextBox()
+        Me.Label4 = New System.Windows.Forms.Label()
+        Me.LinkLabel1 = New System.Windows.Forms.LinkLabel()
+        Me.Button1 = New System.Windows.Forms.Button()
+        Me.Button2 = New System.Windows.Forms.Button()
+        Me.SuspendLayout()
+        '
+        'Label1
+        '
+        Me.Label1.AutoSize = True
+        Me.Label1.Font = New System.Drawing.Font("굴림", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
+        Me.Label1.Location = New System.Drawing.Point(17, 19)
+        Me.Label1.Name = "Label1"
+        Me.Label1.Size = New System.Drawing.Size(298, 16)
+        Me.Label1.TabIndex = 0
+        Me.Label1.Text = "현재 남은 사용 횟수는 {0} 회 입니다."
+        '
+        'Label2
+        '
+        Me.Label2.AutoSize = True
+        Me.Label2.Font = New System.Drawing.Font("굴림", 9.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
+        Me.Label2.Location = New System.Drawing.Point(17, 55)
+        Me.Label2.Name = "Label2"
+        Me.Label2.Size = New System.Drawing.Size(303, 12)
+        Me.Label2.TabIndex = 1
+        Me.Label2.Text = "프로그램을 영구 사용하려면 인증키를 입력하세요."
+        '
+        'Label3
+        '
+        Me.Label3.AutoSize = True
+        Me.Label3.ForeColor = System.Drawing.Color.Red
+        Me.Label3.Location = New System.Drawing.Point(17, 75)
+        Me.Label3.Name = "Label3"
+        Me.Label3.Size = New System.Drawing.Size(341, 12)
+        Me.Label3.TabIndex = 1
+        Me.Label3.Text = "지정 횟수를 초과하면 더 이상 프로그램을 사용할 수 없습니다."
+        '
+        'TextBox1
+        '
+        Me.TextBox1.Font = New System.Drawing.Font("굴림", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
+        Me.TextBox1.Location = New System.Drawing.Point(19, 133)
+        Me.TextBox1.Name = "TextBox1"
+        Me.TextBox1.Size = New System.Drawing.Size(367, 29)
+        Me.TextBox1.TabIndex = 1
+        '
+        'Label4
+        '
+        Me.Label4.AutoSize = True
+        Me.Label4.Location = New System.Drawing.Point(37, 104)
+        Me.Label4.Name = "Label4"
+        Me.Label4.Size = New System.Drawing.Size(37, 12)
+        Me.Label4.TabIndex = 3
+        Me.Label4.Text = "문의 :"
+        '
+        'LinkLabel1
+        '
+        Me.LinkLabel1.AutoSize = True
+        Me.LinkLabel1.Location = New System.Drawing.Point(79, 103)
+        Me.LinkLabel1.Name = "LinkLabel1"
+        Me.LinkLabel1.Size = New System.Drawing.Size(283, 12)
+        Me.LinkLabel1.TabIndex = 4
+        Me.LinkLabel1.TabStop = True
+        Me.LinkLabel1.Text = "해광기획 (http://hawgwang.co.kr) / 062-381-0411"
+        '
+        'Button1
+        '
+        Me.Button1.Location = New System.Drawing.Point(392, 133)
+        Me.Button1.Name = "Button1"
+        Me.Button1.Size = New System.Drawing.Size(68, 29)
+        Me.Button1.TabIndex = 2
+        Me.Button1.Text = "인증"
+        Me.Button1.UseVisualStyleBackColor = True
+        '
+        'Button2
+        '
+        Me.Button2.Location = New System.Drawing.Point(19, 170)
+        Me.Button2.Name = "Button2"
+        Me.Button2.Size = New System.Drawing.Size(441, 29)
+        Me.Button2.TabIndex = 0
+        Me.Button2.Text = "테스트 사용"
+        Me.Button2.UseVisualStyleBackColor = True
+        '
+        'fAuth
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 12.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.ClientSize = New System.Drawing.Size(478, 219)
+        Me.Controls.Add(Me.Button2)
+        Me.Controls.Add(Me.Button1)
+        Me.Controls.Add(Me.LinkLabel1)
+        Me.Controls.Add(Me.Label4)
+        Me.Controls.Add(Me.TextBox1)
+        Me.Controls.Add(Me.Label3)
+        Me.Controls.Add(Me.Label2)
+        Me.Controls.Add(Me.Label1)
+        Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
+        Me.MaximizeBox = False
+        Me.MinimizeBox = False
+        Me.Name = "fAuth"
+        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
+        Me.Text = "인증하기"
+        Me.ResumeLayout(False)
+        Me.PerformLayout()
+
+    End Sub
+    Friend WithEvents Label1 As System.Windows.Forms.Label
+    Friend WithEvents Label2 As System.Windows.Forms.Label
+    Friend WithEvents Label3 As System.Windows.Forms.Label
+    Friend WithEvents TextBox1 As System.Windows.Forms.TextBox
+    Friend WithEvents Label4 As System.Windows.Forms.Label
+    Friend WithEvents LinkLabel1 As System.Windows.Forms.LinkLabel
+    Friend WithEvents Button1 As System.Windows.Forms.Button
+    Friend WithEvents Button2 As System.Windows.Forms.Button
+End Class

Epole.fp13/fAuth.resx

@@ -0,0 +1,175 @@
+<?xml version="1.0" encoding="utf-8"?>
+<root>
+  <!-- 
+    Microsoft ResX Schema 
+    
+    Version 2.0
+    
+    The primary goals of this format is to allow a simple XML format 
+    that is mostly human readable. The generation and parsing of the 
+    various data types are done through the TypeConverter classes 
+    associated with the data types.
+    
+    Example:
+    
+    ... ado.net/XML headers & schema ...
+    <resheader name="resmimetype">text/microsoft-resx</resheader>
+    <resheader name="version">2.0</resheader>
+    <resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
+    <resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
+    <data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
+    <data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
+    <data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
+        <value>[base64 mime encoded serialized .NET Framework object]</value>
+    </data>
+    <data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+        <value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
+        <comment>This is a comment</comment>
+    </data>
+                
+    There are any number of "resheader" rows that contain simple 
+    name/value pairs.
+    
+    Each data row contains a name, and value. The row also contains a 
+    type or mimetype. Type corresponds to a .NET class that support 
+    text/value conversion through the TypeConverter architecture. 
+    Classes that don't support this are serialized and stored with the 
+    mimetype set.
+    
+    The mimetype is used for serialized objects, and tells the 
+    ResXResourceReader how to depersist the object. This is currently not 
+    extensible. For a given mimetype the value must be set accordingly:
+    
+    Note - application/x-microsoft.net.object.binary.base64 is the format 
+    that the ResXResourceWriter will generate, however the reader can 
+    read any of the formats listed below.
+    
+    mimetype: application/x-microsoft.net.object.binary.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
+            : and then encoded with base64 encoding.
+    
+    mimetype: application/x-microsoft.net.object.soap.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Soap.SoapFormatter
+            : and then encoded with base64 encoding.
+
+    mimetype: application/x-microsoft.net.object.bytearray.base64
+    value   : The object must be serialized into a byte array 
+            : using a System.ComponentModel.TypeConverter
+            : and then encoded with base64 encoding.
+    -->
+  <xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
+    <xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
+    <xsd:element name="root" msdata:IsDataSet="true">
+      <xsd:complexType>
+        <xsd:choice maxOccurs="unbounded">
+          <xsd:element name="metadata">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" />
+              </xsd:sequence>
+              <xsd:attribute name="name" use="required" type="xsd:string" />
+              <xsd:attribute name="type" type="xsd:string" />
+              <xsd:attribute name="mimetype" type="xsd:string" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="assembly">
+            <xsd:complexType>
+              <xsd:attribute name="alias" type="xsd:string" />
+              <xsd:attribute name="name" type="xsd:string" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="data">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+                <xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
+              <xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
+              <xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="resheader">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" />
+            </xsd:complexType>
+          </xsd:element>
+        </xsd:choice>
+      </xsd:complexType>
+    </xsd:element>
+  </xsd:schema>
+  <resheader name="resmimetype">
+    <value>text/microsoft-resx</value>
+  </resheader>
+  <resheader name="version">
+    <value>2.0</value>
+  </resheader>
+  <resheader name="reader">
+    <value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <resheader name="writer">
+    <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
+  <data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAABAAIAICAQAAAAAADoAgAAJgAAACAgAAAAAAAAqAgAAA4DAAAoAAAAIAAAAEAAAAABAAQAAAAAAIAC
+        AAAAAAAAAAAAABAAAAAAAAAAAAAAAAAAgAAAgAAAAICAAIAAAACAAIAAgIAAAMDAwACAgIAAAAD/AAD/
+        AAAA//8A/wAAAP8A/wD//wAA////AAAAAAAAAERAQEBAAAAAAAAAAAAABEREREREBAQAAAAAAAAABESE
+        hISEhIRAQAAAAAAAAEiIiEhISEhIRIQAAAAAAASIiIiIiIiEhICIQAAAAABIiIiEBAQEBAhEiIQAAAAE
+        iIh4dH///3cEgHiIQAAASIiHh4hC//cgiESHiIQAAEiIeHh4dH/3CIiEeHiEAASIh4eHh4R/9wiIhHeH
+        iEAEiHh4eHh0f/cIeIR3eHhABIeHh4eHhH/3CIiEd3eIQEh4eHd3d3R/9wh4gnd3eIRHh4d3d3d0f/cI
+        iEd3d4eESHh3d3d3dH/3CIhHd3d4hEeHd3d3d3R/9wiCh3d3d4RId3d3d3d0f/cIhHd3d3h0R3d3d3dy
+        Qn/3CEd3d3d3hEh3d3d3dP//9wiHd3d3eHRHd3d3d3dEf/cEd3d3d3eEBHd3d3d3d0f3B/d3d3d3gAR3
+        d3d/f3dwB093d3d3d0AEd3d3d3d4RASH93d3d3dAAEd3f39/dPd4T3d3d3d0AABHd/f3dE//9wf3d3d3
+        dAAABHd/dEcP//cPd3d3d0AAAABEREf/B//3B/d3d3QAAAAABHf/f3B/cI93d3dAAAAAAABHf//3AAj3
+        d3d0AAAAAAAAAAd3//9/d3d0QAAAAAAAAAAAAIf393dEQAAAAAAAAAAAAAAAAAAAAAAAAAAA//AAD/+A
+        AAf+AAAP/AAAP/gAAB/wAAAP4AAAB8AAAAPAAAADgAAAAYAAAAGAAAABAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAACAAAABgAAAAYAAAAHAAAADwAAAA+AAAAfwAAAP+AAAH/wAAD/+AAB//4AB///w
+        D/8oAAAAIAAAAEAAAAABAAgAAAAAAIAEAAAAAAAAAAAAAAAAAAAAAAAA////AP///wD///8A////AP//
+        /wD///8Azv//AM7//wDO//8Azv//AM7//wAA//8AAP//AAD//wAA//8AAP//AJzO/wCczv8AnM7/AJzO
+        /wCczv8AzmP/AM5j/wDOY/8AzmP/AM5j/wDv7+8A7+/vAO/v7wDv7+8A7+/vAN7e3gDe3t4A3t7eAN7e
+        3gDe3t4A///OAP//zgD//84A///OAP//zgD/zs4A/87OAP/OzgD/zs4A/87OAM7OzgDOzs4Azs7OAM7O
+        zgDOzs4AY5zOAGOczgBjnM4AY5zOAGOczgC9vb0Avb29AL29vQC9vb0Avb29AK2trQCtra0Ara2tAK2t
+        rQCtra0A//+cAP//nAD//5wA//+cAP//nAD/nJwA/5ycAP+cnAD/nJwA/5ycAJycnACcnJwAnJycAJyc
+        nACcnJwAjIyMAIyMjACMjIwAjIyMAIyMjABzc3MAc3NzAHNzcwBzc3MAc3NzAHNzcwDOY2MAzmNjAM5j
+        YwDOY2MAzmNjAGNjYwBjY2MAY2NjAGNjYwBjY2MAUlJSAFJSUgBSUlIAUlJSAFJSUgBCQkIAQkJCAEJC
+        QgBCQkIAQkJCAGOcMQBjnDEAY5wxAGOcMQBjnDEAY2MxAGNjMQBjYzEAY2MxAGNjMQCcMTEAnDExAJwx
+        MQCcMTEAnDExAGMxMQBjMTEAYzExAGMxMQBjMTEAMTExADExMQAxMTEAMTExADExMQAAMTEAADExAAAx
+        MQAAMTEAADExAJwAMQCcADEAnAAxAJwAMQCcADEAMQAxADEAMQAxADEAMQAxADEAMQAAADEAAAAxAAAA
+        MQAAADEAAAAxACEhIQAhISEAISEhACEhIQAhISEAAAAhAAAAIQAAACEAAAAhAAAAIQAQEBAAEBAQABAQ
+        EAAQEBAAEBAQAAAAEAAAABAAAAAQAAAAEAAAABAAAL0AAAC9AAAAvQAAAL0AAAC9AAD/nAAA/5wAAP+c
+        AAD/nAAA/5wAAP+cAACcYwAAnGMAAJxjAACcYwAAnGMAAGNjAABjYwAAY2MAAGNjAABjYwAAnDEAAJwx
+        AACcMQAAnDEAAJwxAABjMQAAYzEAAGMxAABjMQAAYzEAADExAAAxMQAAMTEAADExAAAxMQAAABAAAAAQ
+        AAAAEAAAABAAAAAQAAAAEAAAcwAAAHMAAABzAAAAcwAAAHMAAABSAAAAUgAAAFIAAABSAAAAUgAAAEIA
+        AABCAAAAQgAAAEIAAABCAAAAMQAAADEAAAAxAAAAMQAAADEAAAAhAAAAIQAAACEAAAAhAAAAIQAAABAA
+        AAAQAAAAEAAAABAAAAAQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAPv7+/v7+/v7+/v7+39/
+        f/l/+X/5f/n5+fn5+fn7+/v7+/v7+/v7+/v7f39/f39/f39/f3/5f/l/+fn5+fn7+/v7+/v7+/v7f39/
+        XH9cf1x/XH9cf1x/f/l/+fn5+/v7+/v7+/v7+39cXFxcXH9cf1x/XH9cf1x/f1x/+/v7+/v7+/v7+/t/
+        XFxcXFxcXFxcXFxcXH9cf1z5XFx/+/v7+/v7+/v7f1xcXFxcXI75f/l/+X/5f/lcf39cXGZ/+/v7+/v7
+        +39cXFxcR1xHji4AABoaGi49+X9c+UdcXGZ/+/v7+/t/XFxcXEdcR1xcjmsAABo4a/lcXH9/XEdcXGZ/
+        +/v7+39cXFxHXEdcR1xHji4AAD35XFxcXH9HXEdcXH/7+/t/XFxcR1xHXEdcR1yOLgAAOJ1mXFxcf0c9
+        XEdcZn/7+39cXEdcR1xHXEdcR44uAAA9+VxHXFx/R0c9XEdcf/v7f1xHXEdcR1xHXEdcji4AADidZlxc
+        XH9HPUc9XFx/+39cR1xHXEdHR0dHR0eOLgAAPflcR1xcazhHPUdHXGZ/f0dcR1xHR0dHR0dHR44uAAA4
+        nWZcXH9HRzhHPVxHZn9/XEdcR0dHR0cpRylHji4AAD35XFxcf0c4RzhHPVxcf45HXEdHR0cpR0cpRymO
+        LgAAOJ1mXGtcKUc4RzhHR1x/f1xHR0dHKUcpRykpKY4uAAA9+VxcfylHLkc4Rz1cR3+OR0dHRylHKUcp
+        KWuOay4AADidZn8uRy5HLkc4R0dcf39cR0cpRykpKSkpjgAAAAAAPflcXCkuRy5HLkc9XEd/jkdHKUcp
+        KSkpKSkpjo4uAAA4nX8pKSkuRy5HOEdHXH/7jilHKSkpKSkpKSkpKX8uAD35KRopLikuRy5HPUdc+/uO
+        RykpKSkpKRopGikpKZ2dOH8aKSkpLkcuRzhHR3/7+45HRykpKSkpKSkpKVF/f51/USkaKS4pLkcuR0dH
+        f/v7+44pKSkpGikaKRopfxouPVF/GikpKS5HLkc4R3/7+/v7jkcpKRopGikpf38aGgAaPfkpGikpKSlH
+        LkdHf/v7+/v7jkcpKRopjn8p+RoAGhounRopKSkpRy5HR3/7+/v7+/v7jn+Of44pGhr5OBoAAC75KRop
+        KUcuR0d/+/v7+/v7+/v7fykpGhopGin5OBou+VEaKSkpKUdHf/v7+/v7+/v7+/v7fykpGhoaGin5+flR
+        GikpKUdHR3/7+/v7+/v7+/v7+/v7+fkpKSkaGhoaKRopKSlHR45/+/v7+/v7+/v7+/v7+/v7+/n5+VEp
+        GikaKSlHjo6O+/v7+/v7+/v7+/v7+/v7+/v7+/v7+fn5+fn5+fn7+/v7+/v7+/v7+/v/8AAP/4AAB/4A
+        AA/8AAA/+AAAH/AAAA/gAAAHwAAAA8AAAAOAAAABgAAAAYAAAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAIAAAAGAAAABgAAAAcAAAAPAAAAD4AAAB/AAAA/4AAAf/AAAP/4AAH//gAH///AP/w==
+</value>
+  </data>
+</root>

Epole.fp13/fAuth.vb

@@ -0,0 +1,64 @@
+Public Class fAuth
+    Private Sub fAuth_Load(sender As Object, e As EventArgs) Handles MyBase.Load
+        '  Runcnt = Me.ReadAuthcount
+        If Runcnt > 9 Then
+            Button2.Text = "사용횟수초과(테스트사용불가)"
+            Button2.Enabled = False
+        End If
+        Dim remain As Integer = 10 - Runcnt
+        Label1.Text = String.Format(Label1.Text, remain)
+
+    End Sub
+    Private Sub LinkLabel1_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles LinkLabel1.LinkClicked
+        Dim url As String = "http://haegwang.co.kr"
+        Dim prc As New System.Diagnostics.Process()
+        Dim si As New System.Diagnostics.ProcessStartInfo(url)
+        prc.StartInfo = si
+        prc.Start()
+    End Sub
+
+    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
+        DialogResult = System.Windows.Forms.DialogResult.OK
+    End Sub
+
+    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
+        Dim NewKey As String = TextBox1.Text.Trim()
+        If NewKey.Trim() = "" Then
+            TextBox1.Focus()
+            TextBox1.SelectAll()
+            Return
+        End If
+
+        Dim textenc As New EnDec("HAEGWANGSIMP")
+        Try
+            Dim strdata As String = textenc.DecryptData(TextBox1.Text.Trim())
+            Dim strbuf() As String = strdata.Split("|SIMP|")
+            Dim datestr As String = strbuf(0)
+            Dim datestrhash As String = strbuf(2)
+            Dim hashcode As Integer = CInt(datestrhash)
+            Dim dateHash As Integer = datestr.GetHashCode()
+
+            If datestr.GetHashCode() = hashcode Then
+                Dim auth As New MyAuth
+                Dim dateValue As Date = Date.Parse(datestr)
+                auth.SetAuth(dateValue.ToFileTimeUtc(), My.Application.Info.DirectoryPath & "\epole.ini")
+                MsgBox("프로그램을 재실행 하세요", MsgBoxStyle.Information, "확인")
+                DialogResult = System.Windows.Forms.DialogResult.Cancel
+            Else
+                MsgBox("프로그램 인증값 오류, 인증키를 다시 입력하세요", MsgBoxStyle.Information, "확인")
+                DialogResult = System.Windows.Forms.DialogResult.Cancel
+            End If
+        Catch ex As Exception
+            MsgBox("인증키 확인 중 오류 발생, 다시 시도하세요")
+            TextBox1.Focus()
+            TextBox1.SelectAll()
+            Return
+        End Try
+
+
+       
+
+    End Sub
+
+   
+End Class

Epole.fp13/fProgress.Designer.vb

@@ -0,0 +1,65 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class fProgress
+    Inherits System.Windows.Forms.Form
+
+    'Form은 Dispose를 재정의하여 구성 요소 목록을 정리합니다.
+    <System.Diagnostics.DebuggerNonUserCode()> _
+    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
+        Try
+            If disposing AndAlso components IsNot Nothing Then
+                components.Dispose()
+            End If
+        Finally
+            MyBase.Dispose(disposing)
+        End Try
+    End Sub
+
+    'Windows Form 디자이너에 필요합니다.
+    Private components As System.ComponentModel.IContainer
+
+    '참고: 다음 프로시저는 Windows Form 디자이너에 필요합니다.
+    '수정하려면 Windows Form 디자이너를 사용하십시오.  
+    '코드 편집기를 사용하여 수정하지 마십시오.
+    <System.Diagnostics.DebuggerStepThrough()> _
+    Private Sub InitializeComponent()
+        Me.ProgressBar1 = New System.Windows.Forms.ProgressBar()
+        Me.Label1 = New System.Windows.Forms.Label()
+        Me.SuspendLayout()
+        '
+        'ProgressBar1
+        '
+        Me.ProgressBar1.Dock = System.Windows.Forms.DockStyle.Bottom
+        Me.ProgressBar1.Location = New System.Drawing.Point(0, 70)
+        Me.ProgressBar1.Name = "ProgressBar1"
+        Me.ProgressBar1.Size = New System.Drawing.Size(396, 16)
+        Me.ProgressBar1.TabIndex = 0
+        '
+        'Label1
+        '
+        Me.Label1.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.Label1.Location = New System.Drawing.Point(0, 0)
+        Me.Label1.Name = "Label1"
+        Me.Label1.Size = New System.Drawing.Size(396, 70)
+        Me.Label1.TabIndex = 1
+        Me.Label1.Text = "Label1"
+        Me.Label1.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
+        '
+        'fProgress
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 12.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.ClientSize = New System.Drawing.Size(396, 86)
+        Me.Controls.Add(Me.Label1)
+        Me.Controls.Add(Me.ProgressBar1)
+        Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog
+        Me.MaximizeBox = False
+        Me.MinimizeBox = False
+        Me.Name = "fProgress"
+        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
+        Me.Text = "잠시만 기다려주세요."
+        Me.ResumeLayout(False)
+
+    End Sub
+    Friend WithEvents ProgressBar1 As System.Windows.Forms.ProgressBar
+    Friend WithEvents Label1 As System.Windows.Forms.Label
+End Class

Epole.fp13/fProgress.resx

@@ -0,0 +1,120 @@
+<?xml version="1.0" encoding="utf-8"?>
+<root>
+  <!-- 
+    Microsoft ResX Schema 
+    
+    Version 2.0
+    
+    The primary goals of this format is to allow a simple XML format 
+    that is mostly human readable. The generation and parsing of the 
+    various data types are done through the TypeConverter classes 
+    associated with the data types.
+    
+    Example:
+    
+    ... ado.net/XML headers & schema ...
+    <resheader name="resmimetype">text/microsoft-resx</resheader>
+    <resheader name="version">2.0</resheader>
+    <resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
+    <resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
+    <data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
+    <data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
+    <data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
+        <value>[base64 mime encoded serialized .NET Framework object]</value>
+    </data>
+    <data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+        <value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
+        <comment>This is a comment</comment>
+    </data>
+                
+    There are any number of "resheader" rows that contain simple 
+    name/value pairs.
+    
+    Each data row contains a name, and value. The row also contains a 
+    type or mimetype. Type corresponds to a .NET class that support 
+    text/value conversion through the TypeConverter architecture. 
+    Classes that don't support this are serialized and stored with the 
+    mimetype set.
+    
+    The mimetype is used for serialized objects, and tells the 
+    ResXResourceReader how to depersist the object. This is currently not 
+    extensible. For a given mimetype the value must be set accordingly:
+    
+    Note - application/x-microsoft.net.object.binary.base64 is the format 
+    that the ResXResourceWriter will generate, however the reader can 
+    read any of the formats listed below.
+    
+    mimetype: application/x-microsoft.net.object.binary.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
+            : and then encoded with base64 encoding.
+    
+    mimetype: application/x-microsoft.net.object.soap.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Soap.SoapFormatter
+            : and then encoded with base64 encoding.
+
+    mimetype: application/x-microsoft.net.object.bytearray.base64
+    value   : The object must be serialized into a byte array 
+            : using a System.ComponentModel.TypeConverter
+            : and then encoded with base64 encoding.
+    -->
+  <xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
+    <xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
+    <xsd:element name="root" msdata:IsDataSet="true">
+      <xsd:complexType>
+        <xsd:choice maxOccurs="unbounded">
+          <xsd:element name="metadata">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" />
+              </xsd:sequence>
+              <xsd:attribute name="name" use="required" type="xsd:string" />
+              <xsd:attribute name="type" type="xsd:string" />
+              <xsd:attribute name="mimetype" type="xsd:string" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="assembly">
+            <xsd:complexType>
+              <xsd:attribute name="alias" type="xsd:string" />
+              <xsd:attribute name="name" type="xsd:string" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="data">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+                <xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
+              <xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
+              <xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="resheader">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" />
+            </xsd:complexType>
+          </xsd:element>
+        </xsd:choice>
+      </xsd:complexType>
+    </xsd:element>
+  </xsd:schema>
+  <resheader name="resmimetype">
+    <value>text/microsoft-resx</value>
+  </resheader>
+  <resheader name="version">
+    <value>2.0</value>
+  </resheader>
+  <resheader name="reader">
+    <value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <resheader name="writer">
+    <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+</root>

Epole.fp13/fProgress.vb

@@ -0,0 +1,3 @@
+Public Class fProgress
+
+End Class