http://dict.baidu.com/s?wd=趋之若鹜 IE,百度浏览器没有搜索内容,但世界之窗可以的
<!doctype html><html> <head> <meta charset="utf-8"> <meta http-equiv="X-UA-Compatible" content="IE=Edge"> <meta name="keywords" content="百度词典搜索支持全面的英汉词典、汉英词典、汉语字典、汉语词典、汉语成语词典功能,以及强大的中英文自动翻译功能。"/> <link rel="shortcut icon" href="/static/img/favicon.ico" type="image/x-icon" /> <title>百度词典搜索_趋之若鹜</title> <script> var tabSwitcher={_map:{},$:function(a){return document.getElementById(a)},init:function(){var g,f,c,a,e=this;for(var d=0;d<arguments.length;d++){g=this.$(arguments[d]);if(g.className.indexOf("tablist")>=0){c=g.getElementsByTagName("li");a=c.length;while(a--){f=c[a];e._map[f.getAttribute("rel")]=g.id;f.onclick=function(){e.action(this,this.getAttribute("rel"));return false}}e.action(c[0],c[0].getAttribute("rel"))}}},action:function(c,a){var d=this._map,b=d[d[a]];if(b&&(b==c)){return}if(b){b.className="tab";this.$(b.getAttribute("rel")).style.display="none"}c.className="active";this.$(a).style.display="block";d[d[a]]=c}}; var common = {}; common['token'] = 'c327bc7148d177e577641195c2c15ea3d34db2e1'; common['timestamp'] = 1396768432 function showMoreResult(target,lists,limit){ if(lists.length <= limit){ return; } baidu.dom.setStyle(target.parentNode,"display","block"); for(var i = limit,len = lists.length; i < len; i++){ lists[i] && baidu.dom.setStyle(lists[i],"display","none"); } baidu.on(target,"click",function(e){ if(baidu.dom.hasClass(this.parentNode,"more-result-open")){ baidu.dom.removeClass(this.parentNode,"more-result-open"); for(var i = limit,len = lists.length; i < len; i++){ baidu.dom.setStyle(lists[i],"display","none"); } this.innerHTML = "查看更多"; }else{ baidu.dom.addClass(this.parentNode,"more-result-open"); for(var i = limit,len = lists.length; i < len; i++){ baidu.dom.setStyle(lists[i],"display",""); } this.innerHTML = "收起更多"; } baidu.event.preventDefault(e); }); }; var QUERY_STYLE = -1;</script> <script src="/static/js/tangram-base-1.5.0.js"></script> <link rel="stylesheet" href="/static/css/index.css"> <link rel="stylesheet" href="/static/css/layer.css"> <link rel="stylesheet" href="/static/css/userbar.css" /> <!--[if IE 8]><style>ul.tablist{padding-bottom:6px;}</style><![endif]--> <script src="http://passport.baidu.com/js/pass_uni_loginWrapper.js"></script> </head> <body> <div class="wrap-userbar"> <ul class="userbar"> <li class="userbar-item"> <a href="http://fanyi.baidu.com/appdownload/download.html" target="_blank" id="new_mobile_phone">手机版</a> </li> <li class="pipe userbar-item">|</li> <li class="userbar-item"> <a href="http://fanyi.baidu.com" target="_blank">百度翻译</a> </li> <li class="pipe userbar-item">|</li> <li class="userbar-item"> <a href="http://www.baidu.com" target="_blank">百度首页</a> </li> <li class="pipe userbar-item">|</li> <li class="userbar-item userbar-login"> <a href="##" title="登录" id="userbar-login">登录</a> </li> <li class="userbar-item"> <a target="_blank" href="http://passport.baidu.com/v2/?reg&regType=1&u=http://dict.baidu.com/" rel="nofollow" title="注册" id="userbar-signin">注册</a> </li> </ul> </div> <script> var userNumId = 0;</script> <div id="container"> <div id="head"><div class="nv"><a href="/" class="logo"><img src="static/img/logo-dict-new.gif" width="117" height="38" border="0" alt="到百度首页"></a><div class="nav"><a href="http://news.baidu.com/ns?cl=2&rn=20&tn=news&ie=utf-8&word=趋之若鹜">新闻</a> <a href="http://www.baidu.com/s?wd=趋之若鹜&cl=3&tn=baidu&ie=utf-8">网页</a> <a href="http://tieba.baidu.com/f?kw=趋之若鹜&ie=utf-8">贴吧</a> <a href="http://zhidao.baidu.com/q?ct=17&pn=0&tn=ikaslist&rn=10&word=趋之若鹜&fr=wwwt&ie=utf-8">知道</a> <a href="http://music.baidu.com/search?fr=ps&key=趋之若鹜&ie=utf-8">音乐</a> <a href="http://image.baidu.com/i?tn=baiduimage&ct=201326592&lm=-1&cl=2&word=趋之若鹜&ie=utf-8">图片</a> <a href="http://fanyi.baidu.com/translate?query=趋之若鹜">翻译</a> <b>词典</b></div></div> <form name="f" action="s" class="fm"><div id="sug" onselectstart="return false"></div> <input name="wd" id="kw" class="i" value="趋之若鹜" maxlength="100" autocomplete="off"><span class="btn_wr"><input type="submit" id="su" value="百度一下" class="btn" onmousedown="this.className='btn btn_h'" onmouseout="this.className='btn'"></span><span class="head-tools"><a href="#" id="setter">设置</a><i>|</i><a href="http://www.baidu.com/search/dict.html" target="_blank">帮助</a></span> </form> </div> <div id="wraper"> <!-- 以下的一堆判断是为了判断是否添加网络释义的,现在已经修改为所有单词都可以收藏,不对只有网络释义的单词做判断 0327 --> <!-- 没有英文简明释义的中文 和 所有中文成语 --> <!-- 有英文简明释义或英文详细释义的中文成语 --> <div class="title"> <div id="pronounce"> <h2><strong>趋之若鹜</strong><span><b>[qū zhī ruò wù]</b></span></h2> </div> <div class="wordbook-icon"> <span><a href="#" title="点击添加到生词本" class="icon-add" id="word-login"role="button">生词本</a></span> </div> </div> <!-- 如果是中文query,则展示中英文解释的切换 --> <div id="switch"> <a href='#' id="open-cn">中文解释</a> <i>-</i> <a href="#" id="open-en">英文解释</a> </div> <div id="switch-cn-bar" class="switchbar"> <h3>中文解释</h3> </div> <!-- 结束 --> <div id="word-cn-section"> <span class="arrow"></span> <ul class="tablist" id="cn-section-list"> <li rel="cn-detailmean">详细解释</li> <li rel="cn-baike-mean">百科释义</li> </ul> <div class="tab-content"> <div class="tab cn-detailmean dict-cn-detailman-idiom" id="cn-detailmean"> <ul><li>【解释】:趋:快走;鹜:野鸭。象鸭子一样成群跑过去。比喻很多人争着赶去。</li><li>【出自】:清·曾朴《孽海花》第二十七回:“京外的官员,那个不趋之若鹜呢!”</li></ul> <div class="source">以下结果由<a href='http://www.' target="_blank">汉典</a>提供</div></div> <div class="tab cn-baike-mean dict-cn-baikemean-idiom" id="cn-baike-mean"> <div>趋之若鹜是个成语,本义是像鸭子一样成群跑过去。比喻许多人争着去追逐某些事物。 <a href="http://baike.baidu.com/view/142527.htm" target="_blank">查看更多>></a></div></div> </div> </div> <script>tabSwitcher.init("cn-section-list");</script>
Local lcRemoteUrl,lcRemoteFile,lcLocalhtm,lcLocalFile Declare Integer DeleteUrlCacheEntry In Wininet.Dll String szUrl Declare Integer URLDownloadToFile In urlmon.Dll Integer pCaller,String szURL,String szFileName,Integer dwReserved,Integer lpfnCB *--下载网页 lcRemoteUrl=ALLTRIM(thisform.edit2.Value)&&&这是该成语网址 lcLocalhtm="&路0.xxx.text" &&此处也可以改为文本文件SET DEFA TO &路dbf =DeleteUrlCacheEntry(lcRemoteUrl) &&清理缓存,这时实时刷新的数据时很有用。 If URLDownloadToFile(0,lcRemoteUrl,lcLocalhtm,0,0)=0 * Messagebox("下载失败",48,'信息提示') Endif Clear Dlls 字符=FileToStr("&路0.xxx.text") 字符=STRCONV(字符,11) 字符=STREXTRACT(字符,'<ul><li>','</li></ul>',1) 字符=STRTRAN(STRTRAN(字符,'</li><li>',CHR(13)+CHR(10)),'<br>','')&&&显示的字符