Retrieves the IP filter at the specified index.
Public Sub Item( _
ByVal index As Integer, _
ByRef ipfirst As String, _
ByRef iplast As String, _
ByRef allow As Boolean _
)
index
Zero-based index of the IP filter to retrieve.
ipfirst
Output string variable which receives the IP filter's starting IP address (inclusive).
iplast
Output string variable which receives the IP filter's ending IP address (inclusive).
allow
Output Boolean variable which receives a value indicating whether the IP filter should allow a connection in the specified IP address range.
If the method fails, an error is raised. For more information, refer to the Error Codes.
using Leadtools;
using Leadtools.MediaStreaming;
public Server _server = null;
public bool _result = false;
public void PrintIPFiltersExample()
{
try
{
int Count = 0;
string strIPFilters = "";
// create an instance of the server object
_server = new Leadtools.MediaStreaming.Server();
// retrieve a copy of the IP Filters
IPFilters filters = _server.GetIPFilters();
//Get the filters types count
Count = filters.Count;
// print the IP Filters to a string
strIPFilters += "--- IP Filters ---\n\n";
for (int i = 0; i < Count; i++)
{
string ipfirst;
string iplast;
bool allow;
filters.Item(i, out ipfirst, out iplast, out allow);
strIPFilters += string.Format("IP Filter[{0}]: .{1}, {2}, ", i.ToString(), ipfirst, iplast);
if (allow)
strIPFilters += "Allow\n";
else
strIPFilters += "Deny\n";
}
// display a message contains the IP Filters string
MessageBox.Show(strIPFilters, "LEADTOOLS Media Streaming Examples", MessageBoxButtons.OK, MessageBoxIcon.Information);
_result = true;
}
catch (Exception)
{
_result = false;
}
}
Imports Leadtools
Imports Leadtools.MediaStreaming
Public _server As Server = Nothing
Public _result As Boolean = False
Public Sub PrintIPFiltersExample()
Try
Dim Count As Integer = 0
Dim strIPFilters As String = ""
' create an instance of the server object
_server = New Leadtools.MediaStreaming.Server()
' retrieve a copy of the IP Filters
Dim filters As IPFilters = _server.GetIPFilters()
'Get the filters types count
Count = filters.Count
' print the IP Filters to a string
strIPFilters &= "--- IP Filters ---" & Constants.vbLf + Constants.vbLf
Dim i As Integer = 0
Do While i < Count
Dim ipfirst As String = ""
Dim iplast As String = ""
Dim allow As Boolean = False
filters.Item(i, ipfirst, iplast, allow)
strIPFilters &= String.Format("IP Filter[{0}]: .{1}, {2}, ", i.ToString(), ipfirst, iplast)
If allow Then
strIPFilters &= "Allow" & Constants.vbLf
Else
strIPFilters &= "Deny" & Constants.vbLf
End If
i += 1
Loop
' display a message contains the IP Filters string
MessageBox.Show(strIPFilters, "LEADTOOLS Media Streaming Examples", MessageBoxButtons.OK, MessageBoxIcon.Information)
_result = True
Catch e1 As Exception
_result = False
End Try
End Sub
Raster .NET | C API | C++ Class Library | JavaScript HTML5
Document .NET | C API | C++ Class Library | JavaScript HTML5
Medical .NET | C API | C++ Class Library | JavaScript HTML5
Medical Web Viewer .NET