PortCollection.Insert Method (Int32, Port)

 

Adds the specified Port instance to the PortCollection at the specified index.

Namespace:   System.Web.Services.Description
Assembly:  System.Web.Services (in System.Web.Services.dll)

Public Sub Insert (
	index As Integer,
	port As Port
)

Parameters

index
Type: System.Int32

The zero-based index at which to insert the port parameter.

port
Type: System.Web.Services.Description.Port

The Port to add to the collection.

Exception Condition
IndexOutOfRangeException

The index parameter is less than zero.

- or -

The index parameter is greater than Count.

If the number of items in the collection already equals the collection's capacity, the capacity is doubled by automatically reallocating the internal array before the new element is inserted.

If the value of the index parameter is equal to Count, the specified Port is added to the end of the PortCollection.

The elements after the insertion point move down to accommodate the new element.

myPortCollection = myService.Ports

' Create an array of Port objects.
Console.WriteLine(ControlChars.NewLine & "Port collection :")
Dim myPortArray(myService.Ports.Count) As Port
myPortCollection.CopyTo(myPortArray, 0)
Dim i1 As Integer
For i1 = 0 to myService.Ports.Count -1
   Console.WriteLine("Port[" & i1.ToString + "] : " & _
      myPortArray(i1).Name)
Next
Dim myIndexPort As Port = myPortCollection(0)
Console.WriteLine(ControlChars.NewLine + ControlChars.NewLine + _
                  "The index of port '" + myIndexPort.Name + "' is : " + _
                  myPortCollection.IndexOf(myIndexPort).ToString)
Dim myPortTestInsert As Port = myPortCollection(0)
myPortCollection.Remove(myPortTestInsert)
myPortCollection.Insert(0, myPortTestInsert)
Console.WriteLine(ControlChars.NewLine + ControlChars.NewLine + _
      "Total Number of Ports after inserting " + "a new port '" + _
      myPortTestInsert.Name + "' is : " + myService.Ports.Count.ToString)
While i1 < myService.Ports.Count
   Console.WriteLine("Port[" + i1.ToString + "]  : " + myPortArray(i1).Name)
End While
myServiceDescription.Write("MathServiceCopyToNew_vb.wsdl")

.NET Framework
Available since 1.1
Return to top
Show: