代码改变世界

在PDA程序中使用XML文件保存程序配置设置

2007-06-03 15:48  ruinet  阅读(830)  评论(0编辑  收藏  举报
我用的vs2005开发的PDA,在Windows CE 5.0 系统中对XML文件一样支持。只需条件System.xml的引用。
下面是我的xml文件的结构,是用来保存访问的Web Service的服务器路径
<?xml version="1.0" encoding="utf-8" ?>
<Setting>
  
<Item Key="PDAServer">
    
<value>http://10.116.196.224/PDAServer/Service.asmx</value>
  
</Item>
</Setting>

下面是从XML文件读取key为"PDAServer"的value的值
 Public Function GetUrl() As String
    
Dim xmlNode As XmlNode

    Try
      XmlDoc 
= New XmlDocument()
      XmlDoc.Load(Path)
      xmlNode 
= XmlDoc.SelectSingleNode("//Item[@Key='PDAServer']")
      Return xmlNode.InnerText.ToString

    Catch ex 
As Exception
      
' Throw ex
      Return String.Empty
    
End Try

  
End Function
下面是保存修改后的值
 Public Function SaveUrl(ByVal Url As StringAs Boolean
    
Dim xmlNode As XmlNode

    
Try
      XmlDoc 
= New XmlDocument()
      XmlDoc.Load(Path)
      xmlNode 
= XmlDoc.SelectSingleNode("//Item[@Key='PDAServer']")
      xmlNode.InnerText 
= Url
      XmlDoc.Save(Path)
      
Return True

    
Catch ex As Exception
      
Throw ex
    
Finally

    
End Try
  
End Function

效果如下图:

free web counter