Rockwell Automation FactoryTalk Historian SE ActiveView 3.2 User Guide - Manual (Page 73)

3
●
For Developers: Administering FactoryTalk Historian ActiveView
●
●
●
●
●
65
Else
txtServerINIURL.value = "Current Server INI URL
is not set"
End If
End Sub
Example 2 sets DisplayURL with a string from the text area.
<br> Sub btnSetServerINIURL_onclick <br> Dim strCurServerINIURL, strNewServerINIURL <br> 'Get the Current ServerINIURL from the ActiveView <br>Control <br> strCurServerINIURL = pbd1.ServerIniURL <br> 'New ServerINIURL is in the textarea. <br> strNewServerINIURL = trim(txtServerINIURL.value) <br> If strNewServerINIURL > "" _ <br> and strNewServerINIURL <> strCurServerINIURL Then <br> pbd1.ServerINIURL = strNewServerINIURL <br> End If <br> End Sub <br>
Example 3 sets DisplayURL to the file simple .pdi located in the same
directory as the Web page.
<br> Sub window_onload <br> Dim strPath <br> Dim strpdi, iCount <br> '-----Note that this example assumes that the <br>document path is an URL <br> ' that uses a slash instead of a backslash as the <br>path separator. <br> If pbd1.DisplayURL = "" Then <br> strPath = document.url <br> strPath = Left(strPath, InStrRev(strPath, <br>"/")) <br> pbd1.DisplayURL = strPath & "simple.pdi" <br> End If <br> End Sub <br>