Rockwell Automation FactoryTalk Historian SE ActiveView 3.2 User Guide User Manual

Page 82

Advertising
background image

FactoryTalk Historian ActiveView User Guide

74

With Pbd1
.ServerIniURL = "http://webserver/eenie.ini"
.DisplayURL = "http://webserver/fee.pdi"
End With
End Sub
Sub Pbd1_FailedServerIniURL
SetNextURL()
End Sub
Sub Pbd1_FailedDisplayURL
SetNextURL()
End Sub
Sub SetNextURL()
With Pbd1
If instr(.DisplayURL, "fee.pdi") Then
.ServerIniURL = "http://webserver/meenie.ini"
.DisplayURL = "http://webserver/fi.pdi"
Elseif instr(.DisplayURL, "fi.pdi") Then
.ServerIniURL = "http://webserver/minie.ini"
.DisplayURL = "http://webserver/fo.pdi"
Else
.ServerIniURL = "http://webserver/mo.ini"
.DisplayURL = "http://webserver/fum.pdi"
End If
End With
End Sub
</script>
</head>
<BODY>
<P>
<object id = "Pbd1"
width = "800"
height = "600"
classid = "CLSID:4F26B906-2854-11D1-9597-
00A0C931BFC8">
</object>
</p>
</body>
</html>

Advertising