기상데이터에 import 기능 추가

2020-04-06 23:38:34 +09:00
parent 19f37f4aa9
commit f6dda089fb
6 changed files with 882 additions and 581 deletions
--- a/ArinWarev1/Forms_Input/Frm_v20091231_Weather.Designer.vb
+++ b/ArinWarev1/Forms_Input/Frm_v20091231_Weather.Designer.vb
@@ -118,6 +118,7 @@ Partial Class Frm_V20091231_Weather
        Me.ToolStripSeparator28 = New System.Windows.Forms.ToolStripSeparator()
        Me.TabControl3 = New System.Windows.Forms.TabControl()
        Me.TabPage1 = New System.Windows.Forms.TabPage()
+        Me.Button2 = New System.Windows.Forms.Button()
        Me.GroupBox2 = New System.Windows.Forms.GroupBox()
        Me.Panel3 = New System.Windows.Forms.Panel()
        Me.TableLayoutPanel7 = New System.Windows.Forms.TableLayoutPanel()
@@ -143,9 +144,6 @@ Partial Class Frm_V20091231_Weather
        Me.tb_wnaen = New Eco2Ar.MyTb()
        Me.TabPage8 = New System.Windows.Forms.TabPage()
        Me.TableLayoutPanel4 = New System.Windows.Forms.TableLayoutPanel()
-        Me.Arindv2 = New CEnergy.arindv()
-        Me.설명DataGridViewTextBoxColumn = New System.Windows.Forms.DataGridViewTextBoxColumn()
-        Me.code = New System.Windows.Forms.DataGridViewTextBoxColumn()
        Me.bsw_ilsa = New System.Windows.Forms.BindingSource(Me.components)
        Me.Panel4 = New System.Windows.Forms.Panel()
        Me.TableLayoutPanel34 = New System.Windows.Forms.TableLayoutPanel()
@@ -172,9 +170,6 @@ Partial Class Frm_V20091231_Weather
        Me.tb_v0 = New Eco2Ar.MyTb()
        Me.TabPage9 = New System.Windows.Forms.TabPage()
        Me.TableLayoutPanel5 = New System.Windows.Forms.TableLayoutPanel()
-        Me.Arindv3 = New CEnergy.arindv()
-        Me.설명DataGridViewTextBoxColumn1 = New System.Windows.Forms.DataGridViewTextBoxColumn()
-        Me.DataGridViewTextBoxColumn9 = New System.Windows.Forms.DataGridViewTextBoxColumn()
        Me.bsw_temp = New System.Windows.Forms.BindingSource(Me.components)
        Me.Panel7 = New System.Windows.Forms.Panel()
        Me.TableLayoutPanel8 = New System.Windows.Forms.TableLayoutPanel()
@@ -212,9 +207,6 @@ Partial Class Frm_V20091231_Weather
        Me.ToolStripButton30 = New System.Windows.Forms.ToolStripButton()
        Me.TabPage10 = New System.Windows.Forms.TabPage()
        Me.TableLayoutPanel6 = New System.Windows.Forms.TableLayoutPanel()
-        Me.Arindv4 = New CEnergy.arindv()
-        Me.설명DataGridViewTextBoxColumn2 = New System.Windows.Forms.DataGridViewTextBoxColumn()
-        Me.DataGridViewTextBoxColumn10 = New System.Windows.Forms.DataGridViewTextBoxColumn()
        Me.bsw_supdo = New System.Windows.Forms.BindingSource(Me.components)
        Me.Panel8 = New System.Windows.Forms.Panel()
        Me.TableLayoutPanel9 = New System.Windows.Forms.TableLayoutPanel()
@@ -252,9 +244,6 @@ Partial Class Frm_V20091231_Weather
        Me.ToolStripButton38 = New System.Windows.Forms.ToolStripButton()
        Me.TabPage2 = New System.Windows.Forms.TabPage()
        Me.TableLayoutPanel2 = New System.Windows.Forms.TableLayoutPanel()
-        Me.Arindv1 = New CEnergy.arindv()
-        Me.DataGridViewTextBoxColumn1 = New System.Windows.Forms.DataGridViewTextBoxColumn()
-        Me.DataGridViewTextBoxColumn11 = New System.Windows.Forms.DataGridViewTextBoxColumn()
        Me.bsw_cha = New System.Windows.Forms.BindingSource(Me.components)
        Me.Panel1 = New System.Windows.Forms.Panel()
        Me.Button1 = New System.Windows.Forms.Button()
@@ -279,8 +268,6 @@ Partial Class Frm_V20091231_Weather
        Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator()
        Me.ToolStripButton5 = New System.Windows.Forms.ToolStripButton()
        Me.ToolStripButton6 = New System.Windows.Forms.ToolStripButton()
-        Me.dv = New CEnergy.arindv()
-        Me.건물위치DataGridViewTextBoxColumn = New System.Windows.Forms.DataGridViewTextBoxColumn()
        Me.StatusStrip1 = New System.Windows.Forms.StatusStrip()
        Me.lb_msg = New System.Windows.Forms.ToolStripStatusLabel()
        Me.DataGridViewTextBoxColumn2 = New System.Windows.Forms.DataGridViewTextBoxColumn()
@@ -290,7 +277,21 @@ Partial Class Frm_V20091231_Weather
        Me.DataGridViewTextBoxColumn6 = New System.Windows.Forms.DataGridViewTextBoxColumn()
        Me.DataGridViewTextBoxColumn7 = New System.Windows.Forms.DataGridViewTextBoxColumn()
        Me.DataGridViewTextBoxColumn8 = New System.Windows.Forms.DataGridViewTextBoxColumn()
-        Me.Button2 = New System.Windows.Forms.Button()
+        Me.Arindv2 = New CEnergy.arindv()
+        Me.설명DataGridViewTextBoxColumn = New System.Windows.Forms.DataGridViewTextBoxColumn()
+        Me.code = New System.Windows.Forms.DataGridViewTextBoxColumn()
+        Me.Arindv3 = New CEnergy.arindv()
+        Me.설명DataGridViewTextBoxColumn1 = New System.Windows.Forms.DataGridViewTextBoxColumn()
+        Me.DataGridViewTextBoxColumn9 = New System.Windows.Forms.DataGridViewTextBoxColumn()
+        Me.Arindv4 = New CEnergy.arindv()
+        Me.설명DataGridViewTextBoxColumn2 = New System.Windows.Forms.DataGridViewTextBoxColumn()
+        Me.DataGridViewTextBoxColumn10 = New System.Windows.Forms.DataGridViewTextBoxColumn()
+        Me.Arindv1 = New CEnergy.arindv()
+        Me.DataGridViewTextBoxColumn1 = New System.Windows.Forms.DataGridViewTextBoxColumn()
+        Me.DataGridViewTextBoxColumn11 = New System.Windows.Forms.DataGridViewTextBoxColumn()
+        Me.dv = New CEnergy.arindv()
+        Me.건물위치DataGridViewTextBoxColumn = New System.Windows.Forms.DataGridViewTextBoxColumn()
+        Me.Button3 = New System.Windows.Forms.Button()
        Label39 = New System.Windows.Forms.Label()
        Label247 = New System.Windows.Forms.Label()
        Label248 = New System.Windows.Forms.Label()
@@ -391,7 +392,6 @@ Partial Class Frm_V20091231_Weather
        Me.Panel2.SuspendLayout()
        Me.TabPage8.SuspendLayout()
        Me.TableLayoutPanel4.SuspendLayout()
-        CType(Me.Arindv2, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.bsw_ilsa, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.Panel4.SuspendLayout()
        Me.TableLayoutPanel34.SuspendLayout()
@@ -399,7 +399,6 @@ Partial Class Frm_V20091231_Weather
        Me.BindingNavigator1.SuspendLayout()
        Me.TabPage9.SuspendLayout()
        Me.TableLayoutPanel5.SuspendLayout()
-        CType(Me.Arindv3, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.bsw_temp, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.Panel7.SuspendLayout()
        Me.TableLayoutPanel8.SuspendLayout()
@@ -407,7 +406,6 @@ Partial Class Frm_V20091231_Weather
        Me.BindingNavigator4.SuspendLayout()
        Me.TabPage10.SuspendLayout()
        Me.TableLayoutPanel6.SuspendLayout()
-        CType(Me.Arindv4, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.bsw_supdo, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.Panel8.SuspendLayout()
        Me.TableLayoutPanel9.SuspendLayout()
@@ -415,14 +413,17 @@ Partial Class Frm_V20091231_Weather
        Me.BindingNavigator5.SuspendLayout()
        Me.TabPage2.SuspendLayout()
        Me.TableLayoutPanel2.SuspendLayout()
-        CType(Me.Arindv1, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.bsw_cha, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.Panel1.SuspendLayout()
        Me.TableLayoutPanel1.SuspendLayout()
        CType(Me.BindingNavigator2, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.BindingNavigator2.SuspendLayout()
-        CType(Me.dv, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.StatusStrip1.SuspendLayout()
+        CType(Me.Arindv2, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.Arindv3, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.Arindv4, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.Arindv1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.dv, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.SuspendLayout()
        '
        'Label39
@@ -1384,6 +1385,7 @@ Partial Class Frm_V20091231_Weather
        '
        'TabPage1
        '
+        Me.TabPage1.Controls.Add(Me.Button3)
        Me.TabPage1.Controls.Add(Me.Button2)
        Me.TabPage1.Controls.Add(Me.GroupBox2)
        Me.TabPage1.Controls.Add(Me.GroupBox1)
@@ -1394,6 +1396,15 @@ Partial Class Frm_V20091231_Weather
        Me.TabPage1.Text = "외기온도"
        Me.TabPage1.UseVisualStyleBackColor = True
        '
+        'Button2
+        '
+        Me.Button2.Location = New System.Drawing.Point(446, 414)
+        Me.Button2.Name = "Button2"
+        Me.Button2.Size = New System.Drawing.Size(135, 52)
+        Me.Button2.TabIndex = 127
+        Me.Button2.Text = "SAVE"
+        Me.Button2.UseVisualStyleBackColor = True
+        '
        'GroupBox2
        '
        Me.GroupBox2.Controls.Add(Me.Panel3)
@@ -1422,7 +1433,7 @@ Partial Class Frm_V20091231_Weather
        Me.TableLayoutPanel7.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Absolute, 102.0!))
        Me.TableLayoutPanel7.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Absolute, 102.0!))
        Me.TableLayoutPanel7.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Absolute, 96.0!))
-        Me.TableLayoutPanel7.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Absolute, 139.0!))
+        Me.TableLayoutPanel7.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Absolute, 141.0!))
        Me.TableLayoutPanel7.Controls.Add(Me.tb_w12, 3, 5)
        Me.TableLayoutPanel7.Controls.Add(Label64, 2, 5)
        Me.TableLayoutPanel7.Controls.Add(Label77, 2, 4)
@@ -1456,7 +1467,7 @@ Partial Class Frm_V20091231_Weather
        Me.TableLayoutPanel7.RowStyles.Add(New System.Windows.Forms.RowStyle())
        Me.TableLayoutPanel7.RowStyles.Add(New System.Windows.Forms.RowStyle())
        Me.TableLayoutPanel7.RowStyles.Add(New System.Windows.Forms.RowStyle())
-        Me.TableLayoutPanel7.Size = New System.Drawing.Size(444, 169)
+        Me.TableLayoutPanel7.Size = New System.Drawing.Size(446, 169)
        Me.TableLayoutPanel7.TabIndex = 122
        '
        'tb_w12
@@ -1708,42 +1719,6 @@ Partial Class Frm_V20091231_Weather
        Me.TableLayoutPanel4.Size = New System.Drawing.Size(614, 507)
        Me.TableLayoutPanel4.TabIndex = 0
        '
-        'Arindv2
-        '
-        Me.Arindv2.A_DelCurrentCell = True
-        Me.Arindv2.A_EnterToTab = True
-        Me.Arindv2.AllowUserToAddRows = False
-        Me.Arindv2.AllowUserToResizeRows = False
-        Me.Arindv2.AutoGenerateColumns = False
-        Me.Arindv2.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.AllCells
-        Me.Arindv2.ColumnHeadersHeight = 30
-        Me.Arindv2.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing
-        Me.Arindv2.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.설명DataGridViewTextBoxColumn, Me.code})
-        Me.Arindv2.DataSource = Me.bsw_ilsa
-        Me.Arindv2.Dock = System.Windows.Forms.DockStyle.Fill
-        Me.Arindv2.Location = New System.Drawing.Point(0, 0)
-        Me.Arindv2.Margin = New System.Windows.Forms.Padding(0)
-        Me.Arindv2.MultiSelect = False
-        Me.Arindv2.Name = "Arindv2"
-        Me.Arindv2.RowHeadersVisible = False
-        Me.Arindv2.RowTemplate.Height = 23
-        Me.Arindv2.Size = New System.Drawing.Size(200, 507)
-        Me.Arindv2.TabIndex = 4
-        '
-        '설명DataGridViewTextBoxColumn
-        '
-        Me.설명DataGridViewTextBoxColumn.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill
-        Me.설명DataGridViewTextBoxColumn.DataPropertyName = "설명"
-        Me.설명DataGridViewTextBoxColumn.HeaderText = "설명"
-        Me.설명DataGridViewTextBoxColumn.Name = "설명DataGridViewTextBoxColumn"
-        '
-        'code
-        '
-        Me.code.DataPropertyName = "code"
-        Me.code.HeaderText = "code"
-        Me.code.Name = "code"
-        Me.code.Width = 62
-        '
        'bsw_ilsa
        '
        Me.bsw_ilsa.DataMember = "weather_ilsa"
@@ -2071,41 +2046,6 @@ Partial Class Frm_V20091231_Weather
        Me.TableLayoutPanel5.Size = New System.Drawing.Size(614, 507)
        Me.TableLayoutPanel5.TabIndex = 1
        '
-        'Arindv3
-        '
-        Me.Arindv3.A_DelCurrentCell = True
-        Me.Arindv3.A_EnterToTab = True
-        Me.Arindv3.AllowUserToAddRows = False
-        Me.Arindv3.AllowUserToResizeRows = False
-        Me.Arindv3.AutoGenerateColumns = False
-        Me.Arindv3.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.AllCells
-        Me.Arindv3.ColumnHeadersHeight = 30
-        Me.Arindv3.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing
-        Me.Arindv3.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.설명DataGridViewTextBoxColumn1, Me.DataGridViewTextBoxColumn9})
-        Me.Arindv3.DataSource = Me.bsw_temp
-        Me.Arindv3.Dock = System.Windows.Forms.DockStyle.Fill
-        Me.Arindv3.Location = New System.Drawing.Point(0, 0)
-        Me.Arindv3.Margin = New System.Windows.Forms.Padding(0)
-        Me.Arindv3.Name = "Arindv3"
-        Me.Arindv3.RowHeadersVisible = False
-        Me.Arindv3.RowTemplate.Height = 23
-        Me.Arindv3.Size = New System.Drawing.Size(200, 507)
-        Me.Arindv3.TabIndex = 4
-        '
-        '설명DataGridViewTextBoxColumn1
-        '
-        Me.설명DataGridViewTextBoxColumn1.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill
-        Me.설명DataGridViewTextBoxColumn1.DataPropertyName = "설명"
-        Me.설명DataGridViewTextBoxColumn1.HeaderText = "설명"
-        Me.설명DataGridViewTextBoxColumn1.Name = "설명DataGridViewTextBoxColumn1"
-        '
-        'DataGridViewTextBoxColumn9
-        '
-        Me.DataGridViewTextBoxColumn9.DataPropertyName = "code"
-        Me.DataGridViewTextBoxColumn9.HeaderText = "code"
-        Me.DataGridViewTextBoxColumn9.Name = "DataGridViewTextBoxColumn9"
-        Me.DataGridViewTextBoxColumn9.Width = 62
-        '
        'bsw_temp
        '
        Me.bsw_temp.DataMember = "weather_temp"
@@ -2566,41 +2506,6 @@ Partial Class Frm_V20091231_Weather
        Me.TableLayoutPanel6.Size = New System.Drawing.Size(614, 507)
        Me.TableLayoutPanel6.TabIndex = 1
        '
-        'Arindv4
-        '
-        Me.Arindv4.A_DelCurrentCell = True
-        Me.Arindv4.A_EnterToTab = True
-        Me.Arindv4.AllowUserToAddRows = False
-        Me.Arindv4.AllowUserToResizeRows = False
-        Me.Arindv4.AutoGenerateColumns = False
-        Me.Arindv4.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.AllCells
-        Me.Arindv4.ColumnHeadersHeight = 30
-        Me.Arindv4.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing
-        Me.Arindv4.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.설명DataGridViewTextBoxColumn2, Me.DataGridViewTextBoxColumn10})
-        Me.Arindv4.DataSource = Me.bsw_supdo
-        Me.Arindv4.Dock = System.Windows.Forms.DockStyle.Fill
-        Me.Arindv4.Location = New System.Drawing.Point(0, 0)
-        Me.Arindv4.Margin = New System.Windows.Forms.Padding(0)
-        Me.Arindv4.Name = "Arindv4"
-        Me.Arindv4.RowHeadersVisible = False
-        Me.Arindv4.RowTemplate.Height = 23
-        Me.Arindv4.Size = New System.Drawing.Size(200, 507)
-        Me.Arindv4.TabIndex = 4
-        '
-        '설명DataGridViewTextBoxColumn2
-        '
-        Me.설명DataGridViewTextBoxColumn2.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill
-        Me.설명DataGridViewTextBoxColumn2.DataPropertyName = "설명"
-        Me.설명DataGridViewTextBoxColumn2.HeaderText = "설명"
-        Me.설명DataGridViewTextBoxColumn2.Name = "설명DataGridViewTextBoxColumn2"
-        '
-        'DataGridViewTextBoxColumn10
-        '
-        Me.DataGridViewTextBoxColumn10.DataPropertyName = "code"
-        Me.DataGridViewTextBoxColumn10.HeaderText = "code"
-        Me.DataGridViewTextBoxColumn10.Name = "DataGridViewTextBoxColumn10"
-        Me.DataGridViewTextBoxColumn10.Width = 62
-        '
        'bsw_supdo
        '
        Me.bsw_supdo.DataMember = "weather_supdo"
@@ -3061,41 +2966,6 @@ Partial Class Frm_V20091231_Weather
        Me.TableLayoutPanel2.Size = New System.Drawing.Size(614, 507)
        Me.TableLayoutPanel2.TabIndex = 1
        '
-        'Arindv1
-        '
-        Me.Arindv1.A_DelCurrentCell = True
-        Me.Arindv1.A_EnterToTab = True
-        Me.Arindv1.AllowUserToAddRows = False
-        Me.Arindv1.AllowUserToResizeRows = False
-        Me.Arindv1.AutoGenerateColumns = False
-        Me.Arindv1.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.AllCells
-        Me.Arindv1.ColumnHeadersHeight = 30
-        Me.Arindv1.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing
-        Me.Arindv1.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.DataGridViewTextBoxColumn1, Me.DataGridViewTextBoxColumn11})
-        Me.Arindv1.DataSource = Me.bsw_cha
-        Me.Arindv1.Dock = System.Windows.Forms.DockStyle.Fill
-        Me.Arindv1.Location = New System.Drawing.Point(0, 0)
-        Me.Arindv1.Margin = New System.Windows.Forms.Padding(0)
-        Me.Arindv1.Name = "Arindv1"
-        Me.Arindv1.RowHeadersVisible = False
-        Me.Arindv1.RowTemplate.Height = 23
-        Me.Arindv1.Size = New System.Drawing.Size(200, 507)
-        Me.Arindv1.TabIndex = 4
-        '
-        'DataGridViewTextBoxColumn1
-        '
-        Me.DataGridViewTextBoxColumn1.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill
-        Me.DataGridViewTextBoxColumn1.DataPropertyName = "설명"
-        Me.DataGridViewTextBoxColumn1.HeaderText = "설명"
-        Me.DataGridViewTextBoxColumn1.Name = "DataGridViewTextBoxColumn1"
-        '
-        'DataGridViewTextBoxColumn11
-        '
-        Me.DataGridViewTextBoxColumn11.DataPropertyName = "code"
-        Me.DataGridViewTextBoxColumn11.HeaderText = "code"
-        Me.DataGridViewTextBoxColumn11.Name = "DataGridViewTextBoxColumn11"
-        Me.DataGridViewTextBoxColumn11.Width = 62
-        '
        'bsw_cha
        '
        Me.bsw_cha.DataMember = "weather_cha"
@@ -3380,39 +3250,6 @@ Partial Class Frm_V20091231_Weather
        Me.ToolStripButton6.Size = New System.Drawing.Size(68, 22)
        Me.ToolStripButton6.Text = "삭제(&D)"
        '
-        'dv
-        '
-        Me.dv.A_DelCurrentCell = True
-        Me.dv.A_EnterToTab = False
-        Me.dv.AllowUserToAddRows = False
-        Me.dv.AllowUserToResizeRows = False
-        Me.dv.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
-            Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
-        Me.dv.AutoGenerateColumns = False
-        Me.dv.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.AllCells
-        Me.dv.BorderStyle = System.Windows.Forms.BorderStyle.None
-        Me.dv.CellBorderStyle = System.Windows.Forms.DataGridViewCellBorderStyle.SingleVertical
-        Me.dv.ColumnHeadersHeight = 30
-        Me.dv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing
-        Me.dv.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.건물위치DataGridViewTextBoxColumn})
-        Me.dv.DataSource = Me.bs
-        Me.dv.Location = New System.Drawing.Point(3, 133)
-        Me.dv.Margin = New System.Windows.Forms.Padding(0)
-        Me.dv.MultiSelect = False
-        Me.dv.Name = "dv"
-        Me.dv.RowHeadersVisible = False
-        Me.dv.RowTemplate.Height = 23
-        Me.dv.Size = New System.Drawing.Size(182, 398)
-        Me.dv.TabIndex = 3
-        '
-        '건물위치DataGridViewTextBoxColumn
-        '
-        Me.건물위치DataGridViewTextBoxColumn.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill
-        Me.건물위치DataGridViewTextBoxColumn.DataPropertyName = "건물위치"
-        Me.건물위치DataGridViewTextBoxColumn.HeaderText = "건물위치"
-        Me.건물위치DataGridViewTextBoxColumn.Name = "건물위치DataGridViewTextBoxColumn"
-        Me.건물위치DataGridViewTextBoxColumn.SortMode = System.Windows.Forms.DataGridViewColumnSortMode.NotSortable
-        '
        'StatusStrip1
        '
        Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.lb_msg})
@@ -3477,14 +3314,188 @@ Partial Class Frm_V20091231_Weather
        Me.DataGridViewTextBoxColumn8.Name = "DataGridViewTextBoxColumn8"
        Me.DataGridViewTextBoxColumn8.Width = 58
        '
-        'Button2
+        'Arindv2
        '
-        Me.Button2.Location = New System.Drawing.Point(446, 414)
-        Me.Button2.Name = "Button2"
-        Me.Button2.Size = New System.Drawing.Size(135, 52)
-        Me.Button2.TabIndex = 127
-        Me.Button2.Text = "save"
-        Me.Button2.UseVisualStyleBackColor = True
+        Me.Arindv2.A_DelCurrentCell = True
+        Me.Arindv2.A_EnterToTab = True
+        Me.Arindv2.AllowUserToAddRows = False
+        Me.Arindv2.AllowUserToResizeRows = False
+        Me.Arindv2.AutoGenerateColumns = False
+        Me.Arindv2.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.AllCells
+        Me.Arindv2.ColumnHeadersHeight = 30
+        Me.Arindv2.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing
+        Me.Arindv2.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.설명DataGridViewTextBoxColumn, Me.code})
+        Me.Arindv2.DataSource = Me.bsw_ilsa
+        Me.Arindv2.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.Arindv2.Location = New System.Drawing.Point(0, 0)
+        Me.Arindv2.Margin = New System.Windows.Forms.Padding(0)
+        Me.Arindv2.MultiSelect = False
+        Me.Arindv2.Name = "Arindv2"
+        Me.Arindv2.RowHeadersVisible = False
+        Me.Arindv2.RowTemplate.Height = 23
+        Me.Arindv2.Size = New System.Drawing.Size(200, 507)
+        Me.Arindv2.TabIndex = 4
+        '
+        '설명DataGridViewTextBoxColumn
+        '
+        Me.설명DataGridViewTextBoxColumn.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill
+        Me.설명DataGridViewTextBoxColumn.DataPropertyName = "설명"
+        Me.설명DataGridViewTextBoxColumn.HeaderText = "설명"
+        Me.설명DataGridViewTextBoxColumn.Name = "설명DataGridViewTextBoxColumn"
+        '
+        'code
+        '
+        Me.code.DataPropertyName = "code"
+        Me.code.HeaderText = "code"
+        Me.code.Name = "code"
+        Me.code.Width = 62
+        '
+        'Arindv3
+        '
+        Me.Arindv3.A_DelCurrentCell = True
+        Me.Arindv3.A_EnterToTab = True
+        Me.Arindv3.AllowUserToAddRows = False
+        Me.Arindv3.AllowUserToResizeRows = False
+        Me.Arindv3.AutoGenerateColumns = False
+        Me.Arindv3.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.AllCells
+        Me.Arindv3.ColumnHeadersHeight = 30
+        Me.Arindv3.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing
+        Me.Arindv3.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.설명DataGridViewTextBoxColumn1, Me.DataGridViewTextBoxColumn9})
+        Me.Arindv3.DataSource = Me.bsw_temp
+        Me.Arindv3.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.Arindv3.Location = New System.Drawing.Point(0, 0)
+        Me.Arindv3.Margin = New System.Windows.Forms.Padding(0)
+        Me.Arindv3.Name = "Arindv3"
+        Me.Arindv3.RowHeadersVisible = False
+        Me.Arindv3.RowTemplate.Height = 23
+        Me.Arindv3.Size = New System.Drawing.Size(200, 507)
+        Me.Arindv3.TabIndex = 4
+        '
+        '설명DataGridViewTextBoxColumn1
+        '
+        Me.설명DataGridViewTextBoxColumn1.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill
+        Me.설명DataGridViewTextBoxColumn1.DataPropertyName = "설명"
+        Me.설명DataGridViewTextBoxColumn1.HeaderText = "설명"
+        Me.설명DataGridViewTextBoxColumn1.Name = "설명DataGridViewTextBoxColumn1"
+        '
+        'DataGridViewTextBoxColumn9
+        '
+        Me.DataGridViewTextBoxColumn9.DataPropertyName = "code"
+        Me.DataGridViewTextBoxColumn9.HeaderText = "code"
+        Me.DataGridViewTextBoxColumn9.Name = "DataGridViewTextBoxColumn9"
+        Me.DataGridViewTextBoxColumn9.Width = 62
+        '
+        'Arindv4
+        '
+        Me.Arindv4.A_DelCurrentCell = True
+        Me.Arindv4.A_EnterToTab = True
+        Me.Arindv4.AllowUserToAddRows = False
+        Me.Arindv4.AllowUserToResizeRows = False
+        Me.Arindv4.AutoGenerateColumns = False
+        Me.Arindv4.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.AllCells
+        Me.Arindv4.ColumnHeadersHeight = 30
+        Me.Arindv4.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing
+        Me.Arindv4.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.설명DataGridViewTextBoxColumn2, Me.DataGridViewTextBoxColumn10})
+        Me.Arindv4.DataSource = Me.bsw_supdo
+        Me.Arindv4.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.Arindv4.Location = New System.Drawing.Point(0, 0)
+        Me.Arindv4.Margin = New System.Windows.Forms.Padding(0)
+        Me.Arindv4.Name = "Arindv4"
+        Me.Arindv4.RowHeadersVisible = False
+        Me.Arindv4.RowTemplate.Height = 23
+        Me.Arindv4.Size = New System.Drawing.Size(200, 507)
+        Me.Arindv4.TabIndex = 4
+        '
+        '설명DataGridViewTextBoxColumn2
+        '
+        Me.설명DataGridViewTextBoxColumn2.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill
+        Me.설명DataGridViewTextBoxColumn2.DataPropertyName = "설명"
+        Me.설명DataGridViewTextBoxColumn2.HeaderText = "설명"
+        Me.설명DataGridViewTextBoxColumn2.Name = "설명DataGridViewTextBoxColumn2"
+        '
+        'DataGridViewTextBoxColumn10
+        '
+        Me.DataGridViewTextBoxColumn10.DataPropertyName = "code"
+        Me.DataGridViewTextBoxColumn10.HeaderText = "code"
+        Me.DataGridViewTextBoxColumn10.Name = "DataGridViewTextBoxColumn10"
+        Me.DataGridViewTextBoxColumn10.Width = 62
+        '
+        'Arindv1
+        '
+        Me.Arindv1.A_DelCurrentCell = True
+        Me.Arindv1.A_EnterToTab = True
+        Me.Arindv1.AllowUserToAddRows = False
+        Me.Arindv1.AllowUserToResizeRows = False
+        Me.Arindv1.AutoGenerateColumns = False
+        Me.Arindv1.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.AllCells
+        Me.Arindv1.ColumnHeadersHeight = 30
+        Me.Arindv1.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing
+        Me.Arindv1.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.DataGridViewTextBoxColumn1, Me.DataGridViewTextBoxColumn11})
+        Me.Arindv1.DataSource = Me.bsw_cha
+        Me.Arindv1.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.Arindv1.Location = New System.Drawing.Point(0, 0)
+        Me.Arindv1.Margin = New System.Windows.Forms.Padding(0)
+        Me.Arindv1.Name = "Arindv1"
+        Me.Arindv1.RowHeadersVisible = False
+        Me.Arindv1.RowTemplate.Height = 23
+        Me.Arindv1.Size = New System.Drawing.Size(200, 507)
+        Me.Arindv1.TabIndex = 4
+        '
+        'DataGridViewTextBoxColumn1
+        '
+        Me.DataGridViewTextBoxColumn1.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill
+        Me.DataGridViewTextBoxColumn1.DataPropertyName = "설명"
+        Me.DataGridViewTextBoxColumn1.HeaderText = "설명"
+        Me.DataGridViewTextBoxColumn1.Name = "DataGridViewTextBoxColumn1"
+        '
+        'DataGridViewTextBoxColumn11
+        '
+        Me.DataGridViewTextBoxColumn11.DataPropertyName = "code"
+        Me.DataGridViewTextBoxColumn11.HeaderText = "code"
+        Me.DataGridViewTextBoxColumn11.Name = "DataGridViewTextBoxColumn11"
+        Me.DataGridViewTextBoxColumn11.Width = 62
+        '
+        'dv
+        '
+        Me.dv.A_DelCurrentCell = True
+        Me.dv.A_EnterToTab = False
+        Me.dv.AllowUserToAddRows = False
+        Me.dv.AllowUserToResizeRows = False
+        Me.dv.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
+            Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
+        Me.dv.AutoGenerateColumns = False
+        Me.dv.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.AllCells
+        Me.dv.BorderStyle = System.Windows.Forms.BorderStyle.None
+        Me.dv.CellBorderStyle = System.Windows.Forms.DataGridViewCellBorderStyle.SingleVertical
+        Me.dv.ColumnHeadersHeight = 30
+        Me.dv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing
+        Me.dv.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.건물위치DataGridViewTextBoxColumn})
+        Me.dv.DataSource = Me.bs
+        Me.dv.Location = New System.Drawing.Point(3, 133)
+        Me.dv.Margin = New System.Windows.Forms.Padding(0)
+        Me.dv.MultiSelect = False
+        Me.dv.Name = "dv"
+        Me.dv.RowHeadersVisible = False
+        Me.dv.RowTemplate.Height = 23
+        Me.dv.Size = New System.Drawing.Size(182, 398)
+        Me.dv.TabIndex = 3
+        '
+        '건물위치DataGridViewTextBoxColumn
+        '
+        Me.건물위치DataGridViewTextBoxColumn.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill
+        Me.건물위치DataGridViewTextBoxColumn.DataPropertyName = "건물위치"
+        Me.건물위치DataGridViewTextBoxColumn.HeaderText = "건물위치"
+        Me.건물위치DataGridViewTextBoxColumn.Name = "건물위치DataGridViewTextBoxColumn"
+        Me.건물위치DataGridViewTextBoxColumn.SortMode = System.Windows.Forms.DataGridViewColumnSortMode.NotSortable
+        '
+        'Button3
+        '
+        Me.Button3.Location = New System.Drawing.Point(305, 414)
+        Me.Button3.Name = "Button3"
+        Me.Button3.Size = New System.Drawing.Size(135, 52)
+        Me.Button3.TabIndex = 128
+        Me.Button3.Text = "IMPORT"
+        Me.Button3.UseVisualStyleBackColor = True
        '
        'Frm_V20091231_Weather
        '
@@ -3497,73 +3508,73 @@ Partial Class Frm_V20091231_Weather
        Me.Controls.Add(Me.bn_all)
        Me.Controls.Add(Me.StatusStrip1)
        Me.Font = New System.Drawing.Font("돋움", 8.999999!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
-        Me.KeyPreview = true
+        Me.KeyPreview = True
        Me.Name = "Frm_V20091231_Weather"
        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
        Me.Text = "기상 데이터"
-        CType(Me.bn_all,System.ComponentModel.ISupportInitialize).EndInit
-        Me.bn_all.ResumeLayout(false)
-        Me.bn_all.PerformLayout
-        Me.TabControl3.ResumeLayout(false)
-        Me.TabPage1.ResumeLayout(false)
-        Me.GroupBox2.ResumeLayout(false)
-        Me.Panel3.ResumeLayout(false)
-        Me.Panel3.PerformLayout
-        Me.TableLayoutPanel7.ResumeLayout(false)
-        Me.TableLayoutPanel7.PerformLayout
-        CType(Me.bs,System.ComponentModel.ISupportInitialize).EndInit
-        CType(Me.DS,System.ComponentModel.ISupportInitialize).EndInit
-        Me.GroupBox1.ResumeLayout(false)
-        Me.Panel2.ResumeLayout(false)
-        Me.Panel2.PerformLayout
-        Me.TabPage8.ResumeLayout(false)
-        Me.TableLayoutPanel4.ResumeLayout(false)
-        CType(Me.Arindv2,System.ComponentModel.ISupportInitialize).EndInit
-        CType(Me.bsw_ilsa,System.ComponentModel.ISupportInitialize).EndInit
-        Me.Panel4.ResumeLayout(false)
-        Me.Panel4.PerformLayout
-        Me.TableLayoutPanel34.ResumeLayout(false)
-        Me.TableLayoutPanel34.PerformLayout
-        CType(Me.BindingNavigator1,System.ComponentModel.ISupportInitialize).EndInit
-        Me.BindingNavigator1.ResumeLayout(false)
-        Me.BindingNavigator1.PerformLayout
-        Me.TabPage9.ResumeLayout(false)
-        Me.TableLayoutPanel5.ResumeLayout(false)
-        CType(Me.Arindv3,System.ComponentModel.ISupportInitialize).EndInit
-        CType(Me.bsw_temp,System.ComponentModel.ISupportInitialize).EndInit
-        Me.Panel7.ResumeLayout(false)
-        Me.Panel7.PerformLayout
-        Me.TableLayoutPanel8.ResumeLayout(false)
-        Me.TableLayoutPanel8.PerformLayout
-        CType(Me.BindingNavigator4,System.ComponentModel.ISupportInitialize).EndInit
-        Me.BindingNavigator4.ResumeLayout(false)
-        Me.BindingNavigator4.PerformLayout
-        Me.TabPage10.ResumeLayout(false)
-        Me.TableLayoutPanel6.ResumeLayout(false)
-        CType(Me.Arindv4,System.ComponentModel.ISupportInitialize).EndInit
-        CType(Me.bsw_supdo,System.ComponentModel.ISupportInitialize).EndInit
-        Me.Panel8.ResumeLayout(false)
-        Me.Panel8.PerformLayout
-        Me.TableLayoutPanel9.ResumeLayout(false)
-        Me.TableLayoutPanel9.PerformLayout
-        CType(Me.BindingNavigator5,System.ComponentModel.ISupportInitialize).EndInit
-        Me.BindingNavigator5.ResumeLayout(false)
-        Me.BindingNavigator5.PerformLayout
-        Me.TabPage2.ResumeLayout(false)
-        Me.TableLayoutPanel2.ResumeLayout(false)
-        CType(Me.Arindv1,System.ComponentModel.ISupportInitialize).EndInit
-        CType(Me.bsw_cha,System.ComponentModel.ISupportInitialize).EndInit
-        Me.Panel1.ResumeLayout(false)
-        Me.Panel1.PerformLayout
-        Me.TableLayoutPanel1.ResumeLayout(false)
-        Me.TableLayoutPanel1.PerformLayout
-        CType(Me.BindingNavigator2,System.ComponentModel.ISupportInitialize).EndInit
-        Me.BindingNavigator2.ResumeLayout(false)
-        Me.BindingNavigator2.PerformLayout
-        CType(Me.dv,System.ComponentModel.ISupportInitialize).EndInit
-        Me.StatusStrip1.ResumeLayout(false)
-        Me.StatusStrip1.PerformLayout
-        Me.ResumeLayout(false)
+        CType(Me.bn_all, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.bn_all.ResumeLayout(False)
+        Me.bn_all.PerformLayout()
+        Me.TabControl3.ResumeLayout(False)
+        Me.TabPage1.ResumeLayout(False)
+        Me.GroupBox2.ResumeLayout(False)
+        Me.Panel3.ResumeLayout(False)
+        Me.Panel3.PerformLayout()
+        Me.TableLayoutPanel7.ResumeLayout(False)
+        Me.TableLayoutPanel7.PerformLayout()
+        CType(Me.bs, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.DS, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.GroupBox1.ResumeLayout(False)
+        Me.Panel2.ResumeLayout(False)
+        Me.Panel2.PerformLayout()
+        Me.TabPage8.ResumeLayout(False)
+        Me.TableLayoutPanel4.ResumeLayout(False)
+        CType(Me.bsw_ilsa, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.Panel4.ResumeLayout(False)
+        Me.Panel4.PerformLayout()
+        Me.TableLayoutPanel34.ResumeLayout(False)
+        Me.TableLayoutPanel34.PerformLayout()
+        CType(Me.BindingNavigator1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.BindingNavigator1.ResumeLayout(False)
+        Me.BindingNavigator1.PerformLayout()
+        Me.TabPage9.ResumeLayout(False)
+        Me.TableLayoutPanel5.ResumeLayout(False)
+        CType(Me.bsw_temp, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.Panel7.ResumeLayout(False)
+        Me.Panel7.PerformLayout()
+        Me.TableLayoutPanel8.ResumeLayout(False)
+        Me.TableLayoutPanel8.PerformLayout()
+        CType(Me.BindingNavigator4, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.BindingNavigator4.ResumeLayout(False)
+        Me.BindingNavigator4.PerformLayout()
+        Me.TabPage10.ResumeLayout(False)
+        Me.TableLayoutPanel6.ResumeLayout(False)
+        CType(Me.bsw_supdo, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.Panel8.ResumeLayout(False)
+        Me.Panel8.PerformLayout()
+        Me.TableLayoutPanel9.ResumeLayout(False)
+        Me.TableLayoutPanel9.PerformLayout()
+        CType(Me.BindingNavigator5, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.BindingNavigator5.ResumeLayout(False)
+        Me.BindingNavigator5.PerformLayout()
+        Me.TabPage2.ResumeLayout(False)
+        Me.TableLayoutPanel2.ResumeLayout(False)
+        CType(Me.bsw_cha, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.Panel1.ResumeLayout(False)
+        Me.Panel1.PerformLayout()
+        Me.TableLayoutPanel1.ResumeLayout(False)
+        Me.TableLayoutPanel1.PerformLayout()
+        CType(Me.BindingNavigator2, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.BindingNavigator2.ResumeLayout(False)
+        Me.BindingNavigator2.PerformLayout()
+        Me.StatusStrip1.ResumeLayout(False)
+        Me.StatusStrip1.PerformLayout()
+        CType(Me.Arindv2, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.Arindv3, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.Arindv4, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.Arindv1, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.dv, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.ResumeLayout(False)
        Me.PerformLayout

 End Sub
@@ -3747,4 +3758,5 @@ End Sub
    Friend WithEvents Button1 As System.Windows.Forms.Button
    Friend WithEvents 건물위치DataGridViewTextBoxColumn As System.Windows.Forms.DataGridViewTextBoxColumn
    Friend WithEvents Button2 As System.Windows.Forms.Button
+    Friend WithEvents Button3 As Button
 End Class
--- a/ArinWarev1/Forms_Input/Frm_v20091231_Weather.resx
+++ b/ArinWarev1/Forms_Input/Frm_v20091231_Weather.resx
@@ -390,15 +390,6 @@
  <metadata name="DS.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
    <value>329, 56</value>
  </metadata>
-  <metadata name="code.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
-    <value>True</value>
-  </metadata>
-  <metadata name="bsw_ilsa.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
-    <value>81, 17</value>
-  </metadata>
-  <metadata name="code.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
-    <value>True</value>
-  </metadata>
  <metadata name="bsw_ilsa.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
    <value>81, 17</value>
  </metadata>
@@ -478,15 +469,6 @@
        P0ilegWKIwMchCbSyQAAAABJRU5ErkJggg==
 </value>
  </data>
-  <metadata name="DataGridViewTextBoxColumn9.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
-    <value>True</value>
-  </metadata>
-  <metadata name="bsw_temp.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
-    <value>178, 17</value>
-  </metadata>
-  <metadata name="DataGridViewTextBoxColumn9.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
-    <value>True</value>
-  </metadata>
  <metadata name="bsw_temp.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
    <value>178, 17</value>
  </metadata>
@@ -565,15 +547,6 @@
        P0ilegWKIwMchCbSyQAAAABJRU5ErkJggg==
 </value>
  </data>
-  <metadata name="DataGridViewTextBoxColumn10.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
-    <value>True</value>
-  </metadata>
-  <metadata name="bsw_supdo.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
-    <value>286, 17</value>
-  </metadata>
-  <metadata name="DataGridViewTextBoxColumn10.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
-    <value>True</value>
-  </metadata>
  <metadata name="bsw_supdo.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
    <value>286, 17</value>
  </metadata>
@@ -652,15 +625,6 @@
        P0ilegWKIwMchCbSyQAAAABJRU5ErkJggg==
 </value>
  </data>
-  <metadata name="DataGridViewTextBoxColumn11.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
-    <value>True</value>
-  </metadata>
-  <metadata name="bsw_cha.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
-    <value>399, 17</value>
-  </metadata>
-  <metadata name="DataGridViewTextBoxColumn11.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
-    <value>True</value>
-  </metadata>
  <metadata name="bsw_cha.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
    <value>399, 17</value>
  </metadata>
@@ -742,6 +706,42 @@
  <metadata name="StatusStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
    <value>396, 56</value>
  </metadata>
+  <metadata name="code.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
+    <value>True</value>
+  </metadata>
+  <metadata name="bsw_ilsa.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>81, 17</value>
+  </metadata>
+  <metadata name="code.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
+    <value>True</value>
+  </metadata>
+  <metadata name="DataGridViewTextBoxColumn9.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
+    <value>True</value>
+  </metadata>
+  <metadata name="bsw_temp.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>178, 17</value>
+  </metadata>
+  <metadata name="DataGridViewTextBoxColumn9.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
+    <value>True</value>
+  </metadata>
+  <metadata name="DataGridViewTextBoxColumn10.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
+    <value>True</value>
+  </metadata>
+  <metadata name="bsw_supdo.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>286, 17</value>
+  </metadata>
+  <metadata name="DataGridViewTextBoxColumn10.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
+    <value>True</value>
+  </metadata>
+  <metadata name="DataGridViewTextBoxColumn11.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
+    <value>True</value>
+  </metadata>
+  <metadata name="bsw_cha.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>399, 17</value>
+  </metadata>
+  <metadata name="DataGridViewTextBoxColumn11.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
+    <value>True</value>
+  </metadata>
  <metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
    <value>83</value>
  </metadata>
--- a/ArinWarev1/Forms_Input/Frm_v20091231_Weather.vb
+++ b/ArinWarev1/Forms_Input/Frm_v20091231_Weather.vb
@@ -155,6 +155,9 @@
    End Sub

    Private Sub bs_CurrentChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bs.CurrentChanged
+        If isImport = True Then Return
+        If bs.Current Is Nothing Then Return
+
        Dim pcode As String = CType(bs.Current, DataRowView)("code").ToString
        Me.bsw_ilsa.Filter = "pcode='" & pcode & "'"
        Me.bsw_temp.Filter = "pcode='" & pcode & "'"
@@ -699,5 +702,287 @@
        DSET1.weather_ilsa.WriteXml(AppDomain.CurrentDomain.BaseDirectory + "db_weather_ilsa.xml")
        DSET1.weather_temp.WriteXml(AppDomain.CurrentDomain.BaseDirectory + "db_weather_temp.xml")

+    End Sub
+
+    Dim isImport As Boolean = False
+
+    Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
+
+        If MsgBox("현 자료가 삭제됩니다 실행?", MsgBoxStyle.Question Or MsgBoxStyle.YesNo, "확인") <> MsgBoxResult.Yes Then Return
+
+        Dim od As New OpenFileDialog
+        od.Filter = "excle|*.xls"
+        od.RestoreDirectory = True
+        If od.ShowDialog() <> Windows.Forms.DialogResult.OK Then Return
+
+        isImport = True
+        Dim xlApp As Excel.Application = New Excel.Application ' CreateObject("Excel.Application")
+        Dim xlBook As Excel.Workbook = xlApp.Workbooks.Open(od.FileName)
+        Dim xlSheet1 As Excel.Worksheet = xlBook.Worksheets(3)  '//첫번째 시트로고정
+
+        DSET1.tbl_weather.Clear()
+        DSET1.weather_cha.Clear()
+        DSET1.weather_ilsa.Clear()
+        DSET1.weather_temp.Clear()
+        DSET1.weather_supdo.Clear()
+
+        Dim Rng As Excel.Range = xlSheet1.Range("B3")   '//Offset으로사용할것이므로 0,0셀을 선택한다
+
+        Dim newdr0 As DS.tbl_weatherRow = DSET1.tbl_weather.NewRow
+        newdr0.건물위치 = "없음"
+        newdr0.code = "0"
+        DSET1.tbl_weather.Addtbl_weatherRow(newdr0)
+
+        '//전체 66개의 지역
+        For area As Integer = 1 To 66
+
+            Dim 지역명 As String = Rng.Offset(0, area - 1).Value
+            Dim 지역코드 As String = area.ToString("0000")
+
+            Dim newdr As DS.tbl_weatherRow = DSET1.tbl_weather.NewRow
+            newdr.건물위치 = 지역명
+            newdr.code = 지역코드
+
+            newdr.난방기 = Rng.Offset(3, area - 1).Value
+            newdr.냉방기 = Rng.Offset(4, area - 1).Value
+
+            '//월별 외기평균온도
+            For i As Integer = 1 To 12
+                newdr("m" + i.ToString("00")) = Rng.Offset(i + 5, area - 1).Value
+            Next
+            DSET1.tbl_weather.Addtbl_weatherRow(newdr)
+
+            '//월별 평균일사(수평면)
+            Dim dr일사 As DS.weather_ilsaRow = DSET1.weather_ilsa.NewRow
+            dr일사.code = "0001"
+            dr일사.pcode = 지역코드
+            dr일사.설명 = "수평면"
+            dr일사.최대부하 = Rng.Offset(19, area - 1).Value
+            For i As Integer = 1 To 12
+                dr일사("m" + i.ToString("00")) = Rng.Offset(20 + (i - 1), area - 1).Value
+            Next
+            DSET1.weather_ilsa.Addweather_ilsaRow(dr일사)
+
+            '//월별 평균일사(남향)
+            Dim dr남향 As DS.weather_ilsaRow = DSET1.weather_ilsa.NewRow
+            dr남향.code = "0002"
+            dr남향.pcode = 지역코드
+            dr남향.설명 = "남향"
+            dr남향.최대부하 = Rng.Offset(33, area - 1).Value
+            For i As Integer = 1 To 12
+                dr남향("m" + i.ToString("00")) = Rng.Offset(34 + (i - 1), area - 1).Value
+            Next
+            DSET1.weather_ilsa.Addweather_ilsaRow(dr남향)
+
+            '//월별 평균일사(남동향)
+            Dim dr남동향 As DS.weather_ilsaRow = DSET1.weather_ilsa.NewRow
+            dr남동향.code = "0003"
+            dr남동향.pcode = 지역코드
+            dr남동향.설명 = "남동향"
+            dr남동향.최대부하 = Rng.Offset(47, area - 1).Value
+            For i As Integer = 1 To 12
+                dr남동향("m" + i.ToString("00")) = Rng.Offset(48 + (i - 1), area - 1).Value
+            Next
+            DSET1.weather_ilsa.Addweather_ilsaRow(dr남동향)
+
+            '//월별 평균일사(남서향)
+            Dim dr남서향 As DS.weather_ilsaRow = DSET1.weather_ilsa.NewRow
+            dr남서향.code = "0004"
+            dr남서향.pcode = 지역코드
+            dr남서향.설명 = "남서향"
+            dr남서향.최대부하 = Rng.Offset(61, area - 1).Value
+            For i As Integer = 1 To 12
+                dr남서향("m" + i.ToString("00")) = Rng.Offset(62 + (i - 1), area - 1).Value
+            Next
+            DSET1.weather_ilsa.Addweather_ilsaRow(dr남서향)
+
+            '//월별 평균일사(동향)
+            Dim dr동향 As DS.weather_ilsaRow = DSET1.weather_ilsa.NewRow
+            dr동향.code = "0005"
+            dr동향.pcode = 지역코드
+            dr동향.설명 = "동향"
+            dr동향.최대부하 = Rng.Offset(75, area - 1).Value
+            For i As Integer = 1 To 12
+                dr동향("m" + i.ToString("00")) = Rng.Offset(76 + (i - 1), area - 1).Value
+            Next
+            DSET1.weather_ilsa.Addweather_ilsaRow(dr동향)
+
+            '//월별 평균일사(서향)
+            Dim dr서향 As DS.weather_ilsaRow = DSET1.weather_ilsa.NewRow
+            dr서향.code = "0006"
+            dr서향.pcode = 지역코드
+            dr서향.설명 = "서향"
+            dr서향.최대부하 = Rng.Offset(89, area - 1).Value
+            For i As Integer = 1 To 12
+                dr서향("m" + i.ToString("00")) = Rng.Offset(90 + (i - 1), area - 1).Value
+            Next
+            DSET1.weather_ilsa.Addweather_ilsaRow(dr서향)
+
+            '//월별 평균일사(북동향)
+            Dim dr북동향 As DS.weather_ilsaRow = DSET1.weather_ilsa.NewRow
+            dr북동향.code = "0007"
+            dr북동향.pcode = 지역코드
+            dr북동향.설명 = "북동향"
+            dr북동향.최대부하 = Rng.Offset(103, area - 1).Value
+            For i As Integer = 1 To 12
+                dr북동향("m" + i.ToString("00")) = Rng.Offset(104 + (i - 1), area - 1).Value
+            Next
+            DSET1.weather_ilsa.Addweather_ilsaRow(dr북동향)
+
+            '//월별 평균일사(북서향)
+            Dim dr북서향 As DS.weather_ilsaRow = DSET1.weather_ilsa.NewRow
+            dr북서향.code = "0008"
+            dr북서향.pcode = 지역코드
+            dr북서향.설명 = "북서향"
+            dr북서향.최대부하 = Rng.Offset(117, area - 1).Value
+            For i As Integer = 1 To 12
+                dr북서향("m" + i.ToString("00")) = Rng.Offset(118 + (i - 1), area - 1).Value
+            Next
+            DSET1.weather_ilsa.Addweather_ilsaRow(dr북서향)
+
+            '//월별 평균일사(북향)
+            Dim dr북향 As DS.weather_ilsaRow = DSET1.weather_ilsa.NewRow
+            dr북향.code = "0009"
+            dr북향.pcode = 지역코드
+            dr북향.설명 = "북향"
+            dr북향.최대부하 = Rng.Offset(131, area - 1).Value
+            For i As Integer = 1 To 12
+                dr북향("m" + i.ToString("00")) = Rng.Offset(132 + (i - 1), area - 1).Value
+            Next
+            DSET1.weather_ilsa.Addweather_ilsaRow(dr북향)
+
+            '//월별 평균일사(45도남향)
+            Dim dr45도남향 As DS.weather_ilsaRow = DSET1.weather_ilsa.NewRow
+            dr45도남향.code = "0010"
+            dr45도남향.pcode = 지역코드
+            dr45도남향.설명 = "45도남향"
+            dr45도남향.최대부하 = Rng.Offset(145, area - 1).Value
+            For i As Integer = 1 To 12
+                dr45도남향("m" + i.ToString("00")) = Rng.Offset(146 + (i - 1), area - 1).Value
+            Next
+            DSET1.weather_ilsa.Addweather_ilsaRow(dr45도남향)
+
+            '//월별 평균일사(45도남동향)
+            Dim dr45도남동향 As DS.weather_ilsaRow = DSET1.weather_ilsa.NewRow
+            dr45도남동향.code = "0011"
+            dr45도남동향.pcode = 지역코드
+            dr45도남동향.설명 = "45도남동향"
+            dr45도남동향.최대부하 = Rng.Offset(159, area - 1).Value
+            For i As Integer = 1 To 12
+                dr45도남동향("m" + i.ToString("00")) = Rng.Offset(160 + (i - 1), area - 1).Value
+            Next
+            DSET1.weather_ilsa.Addweather_ilsaRow(dr45도남동향)
+
+            '//월별 평균일사(45도남서향)
+            Dim dr45도남서향 As DS.weather_ilsaRow = DSET1.weather_ilsa.NewRow
+            dr45도남서향.code = "0012"
+            dr45도남서향.pcode = 지역코드
+            dr45도남서향.설명 = "45도남서향"
+            dr45도남서향.최대부하 = Rng.Offset(173, area - 1).Value
+            For i As Integer = 1 To 12
+                dr45도남서향("m" + i.ToString("00")) = Rng.Offset(174 + (i - 1), area - 1).Value
+            Next
+            DSET1.weather_ilsa.Addweather_ilsaRow(dr45도남서향)
+
+            '//월별 평균일사(45도동향)
+            Dim dr45도동향 As DS.weather_ilsaRow = DSET1.weather_ilsa.NewRow
+            dr45도동향.code = "0013"
+            dr45도동향.pcode = 지역코드
+            dr45도동향.설명 = "45도동향"
+            dr45도동향.최대부하 = Rng.Offset(187, area - 1).Value
+            For i As Integer = 1 To 12
+                dr45도동향("m" + i.ToString("00")) = Rng.Offset(188 + (i - 1), area - 1).Value
+            Next
+            DSET1.weather_ilsa.Addweather_ilsaRow(dr45도동향)
+
+            '//월별 평균일사(45도서향)
+            Dim dr45도서향 As DS.weather_ilsaRow = DSET1.weather_ilsa.NewRow
+            dr45도서향.code = "0014"
+            dr45도서향.pcode = 지역코드
+            dr45도서향.설명 = "45도서향"
+            dr45도서향.최대부하 = Rng.Offset(201, area - 1).Value
+            For i As Integer = 1 To 12
+                dr45도서향("m" + i.ToString("00")) = Rng.Offset(202 + (i - 1), area - 1).Value
+            Next
+            DSET1.weather_ilsa.Addweather_ilsaRow(dr45도서향)
+
+            '//월별 평균온도(1)
+            For m As Integer = 1 To 12
+                Dim offset As Integer = (m - 1) * 25
+                Dim dr평균온도1월 As DS.weather_tempRow = DSET1.weather_temp.NewRow
+                dr평균온도1월.code = m.ToString("0000")
+                dr평균온도1월.pcode = 지역코드
+                dr평균온도1월.설명 = m.ToString("00") + "월"
+                For i As Integer = 1 To 24
+                    dr평균온도1월("t" + i.ToString("00")) = Rng.Offset((215 + offset) + (i - 1), area - 1).Value
+                Next
+                DSET1.weather_temp.Addweather_tempRow(dr평균온도1월)
+            Next
+
+            '//월별 평균습도(1)
+            For m As Integer = 1 To 12
+                Dim offset As Integer = (m - 1) * 25
+                Dim dr평균온도1월 As DS.weather_supdoRow = DSET1.weather_supdo.NewRow
+                dr평균온도1월.code = m.ToString("0000")
+                dr평균온도1월.pcode = 지역코드
+                dr평균온도1월.설명 = m.ToString("00") + "월"
+                For i As Integer = 1 To 24
+                    dr평균온도1월("t" + i.ToString("00")) = Rng.Offset((515 + offset) + (i - 1), area - 1).Value
+                Next
+                DSET1.weather_supdo.Addweather_supdoRow(dr평균온도1월)
+            Next
+
+            '//차양감소계수
+            For m As Integer = 1 To 8
+                Dim offset As Integer = (m - 1) * 13
+                Dim dr평균온도1월 As DS.weather_chaRow = DSET1.weather_cha.NewRow
+                dr평균온도1월.code = m.ToString("0000")
+                dr평균온도1월.pcode = 지역코드
+
+                Select Case m
+                    Case 1
+                        dr평균온도1월.설명 = "남향"
+                    Case 2
+                        dr평균온도1월.설명 = "남동향"
+                    Case 3
+                        dr평균온도1월.설명 = "남서향"
+                    Case 4
+                        dr평균온도1월.설명 = "동향"
+                    Case 5
+                        dr평균온도1월.설명 = "서향"
+                    Case 6
+                        dr평균온도1월.설명 = "북동향"
+                    Case 7
+                        dr평균온도1월.설명 = "북서향"
+                    Case 8
+                        dr평균온도1월.설명 = "북향"
+                End Select
+
+                For i As Integer = 1 To 12
+                    dr평균온도1월("m" + i.ToString("00")) = Rng.Offset((815 + offset) + (i - 1), area - 1).Value
+                Next
+                DSET1.weather_cha.Addweather_chaRow(dr평균온도1월)
+            Next
+
+        Next
+
+        Work_msg("")
+
+        '//Dispos Excel Object
+        xlBook.Close()
+        xlApp.Application.Quit()
+        xlApp = Nothing
+        xlBook = Nothing
+        xlSheet1 = Nothing
+
+        '//update
+        isImport = False
+
+        '//refresh
+        bs_CurrentChanged(Nothing, Nothing)
+        MsgBox("ok")
+
+
+
    End Sub
 End Class