I am trying to use the following function that I found on your wiki:

    Public Function GetPrivateVersion(ByVal webConfigPath As String) As Integer
        Dim ret As Integer = 0

        'Retrieve the physical path of the web.config file.
        Dim configXmlDoc As New XmlDocument()
        configXmlDoc.Load(webConfigPath)

        ' read the config settings
        Dim oList As XmlNodeList = configXmlDoc.SelectNodes("configuration/WebGui/PrivateVersion")
        For i As Integer = 0 To oList.Count - 1
            If oList(i).Name = "PrivateVersion" Then
                Dim oValue As XmlAttribute = oList(i).Attributes("Value")
                ret = CInt(oValue.Value)
            End If
        Next
        configXmlDoc = Nothing
        Return ret
    End Function

However, I don't know how to get to the web's physical root folder so I can pass in the web.config path and filename.

Thanks,

Shawn

hi Shawn\Jim,

I use:

string rootpath = VWGContext.Current.Server.MapPath("~");

I expect there's even more ways of doing it though...

cheers james

How would I go about changing the private version from code?  I believe that the VWG app will reset after I set the private version and I am ok with that.

I am using the following code to read the private version:

        Dim configXmlDoc As New XmlDocument()
        configXmlDoc.Load(webConfigPath)

        ' read the config settings
        Dim oList As XmlNodeList = configXmlDoc.SelectNodes("configuration/WebGUI/PrivateVersion")
        For i As Integer = 0 To oList.Count - 1
            If oList(i).Name = "PrivateVersion" Then
                Dim oValue As XmlAttribute = oList(i).Attributes("Value")
                ret = CInt(oValue.Value)
            End If
        Next

Thanks much,

Shawn