老铁们,大家好,相信还有很多朋友对于c网站访问统计源码分享和网站访问人数统计代码的相关问题不太懂,没关系,今天就由我来为大家分享分享c网站访问统计源码分享以及网站访问人数统计代码的问题,文章篇幅可能偏长,希望可以帮助到大家,下面一起来看看吧!
运用WebBrowser控件打开Web页面,并提取页面数据成为当今数据收集的主要手段。EXCELVBA网页数据抓取和处理基本过程如下:
运用WebBrowser控件打开Web页面解析文档或字符串将抓取的网页数据按格式要求写入EXCEL表格通过EXCEL表格函数或EXCELVBA编程进行数据数理
本文介绍开发一个简单的WebBrowser控件网页数据抓取工具来实现EXCELVBA网页数据抓取的基本过程。
1、运用WebBrowser控件打开Web页面
I、建立窗体如下图
窗体由控件解释:
CommandButton1:【打开网页】命令按钮;CommandButton2:【网页数据抓取】命令按钮;TextBox1:网址文本框(单行)TextBox2:网页HTML文档文本框(多行)。设置Multiline属性为True、ScrollBars属性为2;WebBrowser1:网页控件
II、打开Web页面
打开窗体后运用窗体初始化事件Initialize加载指定网页
PrivateSubUserForm_Initialize()\nWebBrowser1.Navigate&34;\nEndSub
打开窗体时运用CommandButton1【打开网页】命令按钮打开TextBox1网址文本框中指定的网页
PrivateSubCommandButton1_Click()\nWebBrowser1.NavigateTextBox1.Text\nEndSub
网页加载成功后执行WebBrowser1的DocumentComplete事件,在TextBox2文本框显示网页HTML文档
PrivateSubWebBrowser1_DocumentComplete(ByValpDispAsObject,URLAsVariant)\nDimdocAsObject\nSetdoc=WebBrowser1.Document\nTextBox2.Text=doc.DocumentElement.innerHTML\nTextBox2.SetFocus\nEndSub
通常,使用浏览器打开网页后,在页面点击鼠标右键,弹出菜单如此,
点击【查看网页源代码(V)】,可以查看网页HTML文档。
本文案例网页为“http://www.galaxystatistics.com/excel/excelVBA2.html”,文档如下:
<!DOCTYPEHTMLPUBLIC&34;>\n<html>\n<head>\n<title>ExcelTrain</title>\n<metacharset=&34;/>\n<style>\n.testTB{color:34;text/javascript&34;WebBrowsercall!&34;Nameis&34;;addressis&34;yes&34;34;style=&34;>\n<h4>表格一</h4>\n<tableid=&34;class=&34;border=0cellspacing=0cellpadding=5width=&34;style=&000000;border-bottom:2pxsolid34;>\n<tr><thstyle=&000000;&34;border-right:1pxsolid34;>人数</th><th>累计人数</th></tr>\n<tr>\n<tdstyle=&000000;border-right:1pxsolid34;>4</td>\n<tdstyle=&000000;border-right:1pxsolid34;>8</td>\n<tdstyle=&000000;&34;border-right:1pxsolid34;>5</td>\n<tdstyle=&000000;&34;border-right:1pxsolid34;>6</td>\n<tdstyle=&000000;&34;border-right:1pxsolid34;>7</td>\n<tdstyle=&000000;&34;border-right:1pxsolid34;>8</td>\n<tdstyle=&000000;&34;border-right:1pxsolid34;>9</td>\n<tdstyle=&000000;&34;border-top:1pxsolid000000;&34;border-top:1pxsolid000000;&34;border-top:1pxsolid34;>***</td>\n</tr>\n</table>\n<p>\n<h4>表格二</h4>\n<tableclass=&34;border=1cellspacing=0cellpadding=5width=&34;>\n<tr><th>姓名</th><th>民族</th></tr>\n<tr><td>张三</td><td>汉族</td></tr>\n<tr><td>李四</td><td>回族</td></tr>\n</table>\n<formname=&34;>\n<h4>表格三</h4>\n<table>\n<tr><thcolspan=2style=&a51020;&34;myName&34;width:100px;color:34;value=&34;onchange=&34;/></td></tr>\n<tr><thcolspan=2style=&e51020;&34;radio&34;myGender&34;1&34;radio&34;myGender&34;0&34;text-align:left;font-size:10pt;color:34;>3、复选框</th></tr>\n<tr><td>爱好:</td><td><inputtype=&34;name=&34;value=&34;/>篮球<inputtype=&34;name=&34;value=&34;/>游泳<inputtype=&34;name=&34;\nvalue=&34;/>跑步</td></tr>\n<tr><thcolspan=2style=&e51020;&34;myMajor&34;1&34;2&34;3&34;4&34;text-align:left;font-size:10pt;color:34;>5、多行文本</th></tr>\n<tr><td>简介:</td><td>\n<textareaid=&34;style=&555555;&34;text-align:left;font-size:10pt;color:34;>6、DIV区块</th></tr>\n<tr><td>效果:</td><td>\n<divid=&34;style=&aaaaaa1pxsolid;dsiplay:inline;&34;text-align:center;width:100%;padding-top:15px;&34;text-align:left;font-size:10pt;color:34;>7、图片</th></tr>\n<tr><td>头像:</td><td><imgsrc=&34;id=&34;style=&ff0000;&34;text-align:left;font-size:10pt;color:34;>8、内崁iFrame框架</th></tr>\n<tr><td>框架:</td><td><iframesrc=&34;id=&34;style=&ff0000;&34;myTB2&34;testTB&34;100%&34;myTB2&39;通过id属性获得table标签对象\nSetdoc=WebBrowser1.Document.getElementById(&34;)\n&39;获得表格列数\ntbCols=doc.Rows(0).Cells.Length\nSheet1.Cells.Clear\nFori=0TotbRows-1\nForj=0TotbCols-1\n&39;获取文档中所有的table集合\nSettables=WebBrowser1.Document.getElementsByTagName(&34;)\n'获取文档中第2个table对象\nSetdoc=tables(1)\nDimtbRowsAsInteger\nDimtbColsAsInteger\nDimi,jAsInteger\ntbRows=doc.Rows.Length\ntbCols=doc.Rows(0).Cells.Length\nSheet1.Cells.Clear\nFori=0TotbRows-1\nForj=0TotbCols-1\nSheet1.Cells(i+1,j+1)=doc.Rows(i).Cells(j).innerText\nNextj\nNexti
解析HTML文档是一个人机对话过程,开发者需要对HTML文档结构和EXCELVBA编程有足够的经验。
这里介绍了网页table标签中数据抓取的方法,对于其它网页标签(div、textarea、img等),基本都可以有DOM的Document.getElementById和Document.getElementsByTagName方法获得抓取对象。至于不同网页标签的进一步解析,则需要对HTML文档结构有一定程度的了解。
本文代码使用InternetExplorer运行通过,如果使用Chrome浏览器或Firefox浏览器加载网页,HTML文档解析过程可能略有区别。
参考文章:
WebBrowser控件与网页互动-EXCELVBA(21)
关于c网站访问统计源码分享的内容到此结束,希望对大家有所帮助。
