CHPP Development/VB.NET/: Difference between revisions

From Hattrick
Jump to navigationJump to search
No edit summary
No edit summary
 
(3 intermediate revisions by 3 users not shown)
Line 1: Line 1:
<u><b>Code #1</b>: Getting the recommended server</u>
<u><b>Code #1</b>: Getting the recommended [[server]]</u>




Line 11: Line 11:
     Return (xmldr(0)("RecommendedURL").ToString)
     Return (xmldr(0)("RecommendedURL").ToString)
  End Function
  End Function
[[Category:Programming Languages|VB.NET]]

Latest revision as of 21:34, 21 May 2007

Code #1: Getting the recommended server


Protected Function Get_Recommended_Server()
   Dim xmlds As New System.Data.DataSet
   Dim xmlTable As New System.Data.DataTable
   Dim xmldr As System.Data.DataRow()
   xmlds.ReadXml("http://www.hattrick.org/common/menu.asp?outputType=XML")
   xmlTable = xmlds.Tables("HattrickData")
   xmldr = xmlTable.Select(Nothing, Nothing, Data.DataViewRowState.CurrentRows)
   Return (xmldr(0)("RecommendedURL").ToString)
End Function