(あなたはいくつかのことを変更する必要があるかもしれませんので、私はC#のからこれを変換)の背後にあるコードに、このような機能を追加します。
Private Shared Function ReadValueFromXML(ValueToRead As String) As String
Try
Dim doc As New XPathDocument(System.Web.HttpContext.Current.Server.MapPath("filenameOfYourXML.xml"))
Dim nav As XPathNavigator = doc.CreateNavigator()
Dim expr As XPathExpression
expr = nav.Compile(Convert.ToString("/") & ValueToRead)
Dim iterator As XPathNodeIterator = nav.Select(expr)
While iterator.MoveNext()
Return iterator.Current.Value
End While
Return String.Empty
Catch
Return String.Empty
End Try
End Function
が背後にあるコード内でこれらのimport文を追加することを忘れないでください。同様:
Imports System.Xml
Imports System.Xml.XPath
そして、あなたはそれを使用する場合、あなたはFormWidthの値を取得したいとしましょう:
Dim FormWidth As String = ReadValueFromXML("FormWidth")
Y人生を不必要に難しくしている。その「あまりにも上級のクラス」は、インターネット上で数多くの例を挙げて、十分に文書化され、十分にテストされています。あなたの例では ' ... < 'ラッパーをたたくだけです。 –
MSalters