getting the IIS port using System.DirectoryServices

[prowla2003]

Im using this code

Dim oDE As System.DirectoryServices.DirectoryEntry
Dim oDC As System.DirectoryServices.DirectoryEntries
Dim sIISPath As String

sIISPath = "IIS:\\localhost\W3SVC\1"

oDE = New DirectoryServices.DirectoryEntry(sIISPath)
oDC = oDE.Children

and running it in in debug and using the Autos window to try
and find a property somewhere that holds the port that the IIS service is running on and cant..

can someone help.

please!!

 

[prowla2003]

eerrrrrrr thanks for all your help!!!!

 

[prowla2003]

the answer

public string getWWWPort(  string sPortType, string sWebSvcInstance) {
	string sw3Site = "IIS://localhost/" + sWebSvcInstance;
	//string sw3Schema = "";
	string sTmp="";
	string [] sTmpArray ;

	if (sPortType.ToUpper() == "SERVERBINDINGS" ) {
		sPortType = "ServerBindings";
	}

	if (sPortType.ToUpper() == "SECUREBINDINGS" ) {
		sPortType = "SecureBindings";
	}

	//DirectoryEntry iisWebSrv = new DirectoryEntry("IIS://localhost/W3SVC/4");
	DirectoryEntry iisWebSrv = new DirectoryEntry(sw3Site);
	PropertyCollection iisWebSrvProperties = iisWebSrv.Properties;

	DirectoryEntry schema = new DirectoryEntry("IIS://localhost/schema/" + iisWebSrv.SchemaClassName);
	PropertyCollection schemaProperties = schema.Properties;

	foreach(string s in schemaProperties["OptionalProperties"]) {
		try {
			if( s == sPortType ) {
				sTmp = iisWebSrvProperties[s].Value.ToString();
				sTmpArray = sTmp.Split(new Char [] {:});
				sTmp = sTmpArray[1];
						
			}
		}

		catch(Exception ex) {

			Console.WriteLine(ex.Message);

		}

	}

	return sTmp;	
}