Ôõô°Ñ¿Í»§¶Ë´Ówebservice»ñµÃµÄxmlת»»³Érecordset£¿
ÈçÌâ¡£
webServiceµÄº¯ÊýÈçÏ£º
VB.NET code:
Public Function RecordSetBySql(ByVal Sql As String) As XmlDataDocument
Dim xRs As ADODB.Recordset
Dim cmd As ADODB.Command
Dim st As Stream
Dim xd As XmlDataDocument
xRs = New ADODB.Recordset
cmd = New ADODB.Command
st = New Stream
xd = New XmlDataDocument
xRs.Open(Sql, SDConn, CursorTypeEnum.adOpenDynamic, LockTypeEnum.adLockOptimistic)
xRs.Save(st, PersistFormatEnum.adPersistXML)
st.Flush()
st.Position = 0
xd.LoadXml(st.ReadText(st.Size))
st.Close()
xRs.Close()
conn.Close()
Return xd
End Function
{{
Ïà¹ØÎÊ´ð£º
´ÓÊý¾Ý¿âÖвéѯһÕűíµÄÊý¾Ý
select ²¿ÃÅ,ÐÕÃû from tb
ÈçºÎ²ÅÄÜÉú³ÉÏÂÃæµÄxml¸ñʽ
XML code:
<folder state="unchecked" label="È«²¿">
¡¡¡¡ <folder state="unchecked&qu ......
Private Sub Command1_Click()
Dim MyString() As String
Open "a.xml" For Binary As #1 ' ´ò¿ª¸Õ´´½¨µÄÎļþ¡£
ReDim MyString(LOF(1) - 1)
Put #1, , MyRecord ' ¶ÁÈëËùÓÐ×Ö·ûµ½±äÁ¿ÖÐ ......
ÓÃSAX½âÎöXMLÖУ¬Ê¹ÓÃÕâ¶Î´úÂë
String feed="http://www.google.com/ig/api?weather="+strCity;
URL url = new URL(feed.replace(" ", "%20"));
......
htmlÒ³Ãæ¾²Ì¬´´½¨xmlÎļþ£¬²¢±£´æ£¬ÒÔºó¿ÉÒÔ¶ÁÈ¡¡£
²»ÖªÄÄλ´óÏÀ×ö¹ý¡£¡£¡£
лл
javascriptÓ¦¸Ã²»ÄÜ´´½¨Îļþ°É
jsÓÐȨÏÞ´´½¨Ã´£¬´ó¶àÊýÇé¿öϱ»½ûÖ¹°É
ȨÏÞ¡£¡£
ÀúÊ·ÒÅÁôÎÊÌ⣬¿´À´½â¾ö²»ÁËÁË¡£¡£¡£¡£¡ ......
Ô¶³Ì¶ÁÈ¡
C# code:
XmlReader xmlReader = XmlReader.Create("http://google.com/complete/search?output=toolbar&q="+Keyword);
XMLÄÚÈÝΪ
XML code:
<?xml version="1.0" ......