分享
 
 
 

王牌网提供的几个实用Web Service文档(www.wopos.com)

王朝c#·作者佚名  2006-12-17
窄屏简体版  字體: |||超大  

王牌网提供的几个实用Web Service文档(www.wopos.com)

王牌网提供的几个实用Web Service文档(www.wopos.com) 天气预报

地址:http://www.wopos.com/webservice/weather.asmx

介绍:使用 getWeather(city)方法:city-直接输入全国大中小城市及国外中城市中文名

例:

Public sub GetWopWeather(ByVal city As String)

Dim s As String

Try

Dim weat As New localhost.Weather

s = weat.getWeather(city)

If s.IndexOf('没有查到相关结果') > -1 Then

Else

s = s.Replace('图1==', '<img src=')

s = s.Replace(',图2==', '></img><img src=')

s = s.Replace(',天气', '></img>,天气')

s = s.Replace(',', '<br/>').Replace('==', ':')

End If

Catch ex As Exception

s = '提供天气数据的网络不通,请稍后再试'

End Try

response.write(s)

End sub

手机归属地

地址:http://www.wopos.com/webservice/Mobile.asmx

介绍:使用 getMobileArea(mobileCode) mobileCode-手机号码或前7位

股票走势图

地址:http://www.wopos.com/webservice/Stock.asmx

介绍:使用 getStockChart(StockCode) StockCode-股票代码,返回值为图片的HTTP地址.

IP地址查询

地址:http://www.wopos.com/webservice/ips.asmx

介绍:使用 getIParea(ip)方法返回IP所在地,使用AddIPRange(startIP,EndIP,AreaInfo)增加新的IP地址信息,使用 IpToInt 和 IntToIp可对IP地址从字符串到整型的互相转换.

成语典故

地址:http://www.wopos.com/webservice/chengyu.asmx

介绍:

使用 ChengYuDianGu(chengyu)方法,参数为成语或成语的拼音缩写。如返回多个成语以*_*分隔

生成验证码图像

地址:http://www.wopos.com/webservice/vimg.asmx

介绍:使用 GetVerifyImg(str4,Lenght,Width,Style)生成一张字符图像,用于注册、发贴等场合做图像验证。后面三个参数为保留参数,暂时无效,用于以后扩充。 目前的很简单,仅供测试。

RSS种子生成

地址:http://www.wopos.com/webservice/Rss.asmx

介绍:使用 OutPutRss()方法:Rss Item数据项以DataTable 方式提供。数据项数不能超过100调用后直接输出RSS2.0 XML。

例:

Imports System.Data

Partial Class Test : Inherits System.Web.UI.Page

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

Dim tb As New DataTable

Dim rw As DataRow

tb.Columns.Add(New DataColumn('title', System.Type.GetType('System.String')))

tb.Columns.Add(New DataColumn('link', System.Type.GetType('System.String')))

tb.Columns.Add(New DataColumn('author', System.Type.GetType('System.String')))

tb.Columns.Add(New DataColumn('pubdate', System.Type.GetType('System.String')))

tb.Columns.Add(New DataColumn('category', System.Type.GetType('System.String')))

tb.Columns.Add(New DataColumn('description', System.Type.GetType('System.String')))

For i As Int16 = 0 To 10

rw = tb.NewRow

rw.Item('title') = 'title' & i

rw.Item('link') = 'http://www.wopos.com/test.htm'

rw.Item('author') = 'author ' & i

rw.Item('pubdate') = Date.Now.ToString

rw.Item('category') = 'category ' & i

rw.Item('description') = 'description ' & i

tb.Rows.Add(rw)

Next

Dim rss As New Rss

rss.OutPutRss(tb, '中国新闻', '中新', 'www.wopos.com', 'wopos.com', '新闻', '图片', 'http://www.wopos.com', 'http://www.wopos.com/image/wopos.gif')

End Sub

End Class

 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
2023年上半年GDP全球前十五强
 百态   2023-10-24
美众议院议长启动对拜登的弹劾调查
 百态   2023-09-13
上海、济南、武汉等多地出现不明坠落物
 探索   2023-09-06
印度或要将国名改为“巴拉特”
 百态   2023-09-06
男子为女友送行,买票不登机被捕
 百态   2023-08-20
手机地震预警功能怎么开?
 干货   2023-08-06
女子4年卖2套房花700多万做美容:不但没变美脸,面部还出现变形
 百态   2023-08-04
住户一楼被水淹 还冲来8头猪
 百态   2023-07-31
女子体内爬出大量瓜子状活虫
 百态   2023-07-25
地球连续35年收到神秘规律性信号,网友:不要回答!
 探索   2023-07-21
全球镓价格本周大涨27%
 探索   2023-07-09
钱都流向了那些不缺钱的人,苦都留给了能吃苦的人
 探索   2023-07-02
倩女手游刀客魅者强控制(强混乱强眩晕强睡眠)和对应控制抗性的关系
 百态   2020-08-20
美国5月9日最新疫情:美国确诊人数突破131万
 百态   2020-05-09
荷兰政府宣布将集体辞职
 干货   2020-04-30
倩女幽魂手游师徒任务情义春秋猜成语答案逍遥观:鹏程万里
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案神机营:射石饮羽
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案昆仑山:拔刀相助
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案天工阁:鬼斧神工
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案丝路古道:单枪匹马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:与虎谋皮
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:李代桃僵
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:指鹿为马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:小鸟依人
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:千金买邻
 干货   2019-11-12
 
推荐阅读
 
 
 
>>返回首頁<<
 
靜靜地坐在廢墟上,四周的荒凉一望無際,忽然覺得,淒涼也很美
© 2005- 王朝網路 版權所有