winform ´´½¨xml²¢¼Ó½Úµã,ÄÚÈÝ
À§ÈÅÁËÎҺܾõÄÎÊÌâwww.g.cnÉÏÒ»ËÑ,¼¸ºõÈ«ÊǶÁÈ¡µÄʵÀý.
ÎÊÌâºÜ¼òµ¥,¿ÉÊÇÎÒ²»ÖªµÀ·½·¨
±ÈÈçÎÒÒ»¸öwinform³ÌÐò,Æô¶¯Ê±¼ì²éc:\windows\system32\sys.xmlÊÇ·ñÓÐÕâ¸öÎļþ,Èç¹ûûÓÐ,Ôò´´½¨,ÀïÃæµÄÄÚÈÝÊÇÕâÑùµÄ
<?xml version="1.0" standalone="yes"?>
<Server>
<Server_id>1 </Server_id>
<Server_name>test </Server_name>
<Server_ip>127.0.0.1 </Server_ip>
<Server_where>Local </Server_where>
<flg>1 </flg>
</Server>
¸ÃÔõôʵÏÖ?
¼ì²é²¢´´½¨sys.xml¿ÉÒÔʵÏÖ,ÎÒ¾ÍÊDz»ÖªµÀ¸ÃÔõô°ÑÉÏÃæµÄÄÚÈݳõʼ»¯µ½sys.xmlÖÐ
´ó¼Ò°ï°ïÎÒ,Ô½ÏêϸԽºÃ,Ö»ÒªÓиöÍêÕûʵÀý,Îҿ϶¨¿ÉÒÔ¿´¶®,ÎÒÓ²ÊÇûÓÐÕÒµ½Ò»¸ö±È½ÏÍêÕûµÄʵÀý,²ÑÀ¢.
»ý·ÖÌáÎÊÓÃÍêÁË,ËãÔÚ¼ÒÊ©ÉáÎÒÒ»µã֪ʶ°É,ÏÈллÁË
using (StreamWriter sw = File.CreateText(@"c:\windows\system32\sys.xml"))
{
sw.Write(@" <?xml version="1.0" standalone="yes"?>
<Server>
<Server_id>1 </Server_id>
<Server_name>test </Server_name>
<Server_ip>127.0.0.1 </Server_ip>
<Server_where>Local </Server_where>
Ïà¹ØÎÊ´ð£º
DataSetµ¼³öxml Åú´¦Àí(Ñ»·)µÃÔõô´¦Àí
XMLÎļþ
<A>
<B>
<C>
</C>
&nb ......
ÒýÓõÄÎļþ°üº¬´íÎó£¨XXXXX.xsd£©¡£Óйظü¶àÐÅÏ¢£¬ÓÒ¼üµ¥»÷ÏûÏ¢²¢Ñ¡Ôñ¡°ÏÔʾÏêϸÐÅÏ¢...¡±
ÇëÎÊÕâÊÇÄijö´íÁË£¿£¿£¿ÎÒÔÚelipseÀïû´í Äõ½myelipseÀïxmlÈ«ÊÇÕâ¸ö´íÎ󡣡£¡£¡£
ÊDz»ÊÇÉÙ°ü°¡£¿
°ü¶¼ÔÚÄØÑ½¡£¡£¡£ ......
Private Sub Command1_Click()
Dim MyString() As String
Open "a.xml" For Binary As #1 ' ´ò¿ª¸Õ´´½¨µÄÎļþ¡£
ReDim MyString(LOF(1) - 1)
Put #1, , MyRecord ' ¶ÁÈëËùÓÐ×Ö·ûµ½±äÁ¿ÖÐ ......
ÎÒÓÐÒ»¸öÀàËÆµÄxmlµÄ string£¬Ïëͨ¹ý±éÀúÔõô¸öxml Êä³öÎÒÏëÒªµÄelementµÄÖµ
xml Ϊ£º
<Discover xmlns="urn:schemas-microsoft-com:xml-analysis">
<RequestType>DISCOVER_XML_ME ......
ΪʲôÎҵijÌÐòµ÷ÓÃXMLÅäÖÃÎļþÖеİ¢À²®ÎÄÏÔʾ²»³öÀ´£¿ÆäËûµÄÓïÖÖ¶¼¿ÉÒÔ£¬ÈçÖÐÎÄ£¬Ó¢ÎÄ£¬µÂÎͼ¿É¡£
ÎÒ½«XMLµÄ±àÂë¸ÄΪutf-8ºÍunicodeµÄµ½µÃ½á¹û¶¼Ò»Ñù.
°¢À²®ÎĵÄ×Ö¿âÄãÓÐô£¿
ÓÐ,ÎÒµÄEXEÊÇ·ÅÔÚpc»úÉÏÖ´Ðе ......