修复设备回路未设置对应的显示和离线
This commit is contained in:
@@ -35,7 +35,7 @@
|
||||
<MinimumRequiredVersion>4.0.0.5</MinimumRequiredVersion>
|
||||
<CreateWebPageOnPublish>true</CreateWebPageOnPublish>
|
||||
<WebPage>index.html</WebPage>
|
||||
<ApplicationRevision>99</ApplicationRevision>
|
||||
<ApplicationRevision>101</ApplicationRevision>
|
||||
<ApplicationVersion>4.4.3.%2a</ApplicationVersion>
|
||||
<UseApplicationTrust>false</UseApplicationTrust>
|
||||
<CreateDesktopShortcut>true</CreateDesktopShortcut>
|
||||
|
||||
@@ -5029,9 +5029,7 @@ Public Class FrmMain
|
||||
|
||||
Dim devtype, devloop As String
|
||||
devloop = addr.Substring(6, 3)
|
||||
If devloop.Equals("000") Then
|
||||
Return mSaveRoomTypeModal
|
||||
End If
|
||||
|
||||
devtype = addr.Substring(0, 3)
|
||||
Select Case devtype
|
||||
Case "001"
|
||||
@@ -5067,7 +5065,12 @@ Public Class FrmMain
|
||||
mSaveRoomTypeModal.OfflineDisplay = 1
|
||||
Case "009" '空气质量
|
||||
Case Else
|
||||
Return Nothing
|
||||
If devloop.Equals("000") Then
|
||||
Return mSaveRoomTypeModal
|
||||
Else
|
||||
Return Nothing
|
||||
End If
|
||||
|
||||
End Select
|
||||
Return mSaveRoomTypeModal
|
||||
End Function
|
||||
|
||||
@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
|
||||
'通过使用 "*",如下所示:
|
||||
' <Assembly: AssemblyVersion("1.0.*")>
|
||||
|
||||
<Assembly: AssemblyVersion("4.4.6.11")>
|
||||
<Assembly: AssemblyFileVersion("4.4.6.11")>
|
||||
<Assembly: AssemblyVersion("4.4.6.12")>
|
||||
<Assembly: AssemblyFileVersion("4.4.6.12")>
|
||||
|
||||
Reference in New Issue
Block a user