user 계정 권한 입력 - 오프라인으로 BOTH 로 적용

ArinWarev1/Forms_Input/Frm_Desc.vb

@@ -113,7 +113,7 @@
             Me.bs.MoveFirst()
         End Try
 
-        If Not (Prj.UserId.ToLower() = "guest" OrElse Prj.UserAuthType = "ADMIN" OrElse Prj.UserAuthType = "BOTH" OrElse Prj.UserAuthType = "BOTH2" OrElse Prj.UserAuthType = "BOTH1") Then  '//2011.03.08 추가
+        If Not (Prj.UserId.ToLower() = "guest" OrElse Prj.UserId.ToLower().StartsWith("user") OrElse Prj.UserAuthType = "ADMIN" OrElse Prj.UserAuthType = "BOTH" OrElse Prj.UserAuthType = "BOTH2" OrElse Prj.UserAuthType = "BOTH1") Then  '//2011.03.08 추가
             Dim MyVersion As String '= Format(My.Application.Info.Version.Minor, "0000") & Format(My.Application.Info.Version.Build, "0000")
             Dim L As New ArinLogin.ArinLOgin
             Dim VersionInfo As ArinLogin.ArinLOgin.sVersionInfo = Nothing
@@ -177,12 +177,12 @@
             End Try
         Else
             If Not Prj.UserId.ToLower() = "guest" Then
-
+                '//서버업데이트기능 숨김
                 Me.LinkLabel1.Visible = True
                 Me.LinkLabel2.Visible = True
                 Me.LinkLabel3.Visible = True
             End If
-            End If
+        End If
 
             AddHandler DSET1.tbl_Desc.ColumnChanging, AddressOf AddNewDataRow_Zone_Changed2