美女视频一区二区三区_av片在线观看_免费看黄在线网站_一色屋精品久久久久久久久久_国产视频1区_国产精品久久久久久久岛一牛影视

【轉載】VBA-填寫網頁表單的方法_編織博客

2013-12-06 13:55 查看博客原文

本次介紹的方法是http://chiensq.blog.163.com/blog/static/1035628201174015765/?newFollowBlog中介紹的第二種方法控制網頁

要填寫網頁表單,就要知道網頁中各個要填寫的項目名稱,就需要分析網頁。分析網頁有好幾種方法:

以:http://mial.163.com/為例

1、直接查看網頁的源代碼(網頁右鍵有該功能)

在源代碼中直接搜索如“用戶名”,“密碼”等需要填寫的項目的文字。找到類似以下的代碼

<LABEL class="lb for for-1">用戶名</LABEL> <LABEL class="lb for for-2 for-3">手機號</LABEL> <INPUT class=ipt-t id=idInput onblur="fCheckAccount(this);fEvent('blur',this)" onmouseover="fEvent('mouseover',this)" onfocus="fEvent('focus',this)" tabIndex=1 onmouseout="fEvent('mouseout',this)" maxLength=50 name=username autocomplete="off" isfocus="false"> <SPAN class=domain>@163.com</SPAN>

將該代碼分段

?<LABEL class="lb for for-1">用戶名</LABEL>????????????? --是顯示“用戶名”的文字的表格,并不是輸入項目

?<LABEL class="lb for for-2 for-3">手機號</LABEL>?? --是顯示“用戶名”的文字的表格,并不是輸入項目

而已INPUT開始的就是需要輸入的項目,發現有name=username的代碼,意思是用戶名就是username,這就是我們要找的。

一般都是找 ID= 或者 name = 。

?<INPUT class=ipt-t id=idInput onblur="fCheckAccount(this);fEvent('blur',this)" onmouseover="fEvent('mouseover',this)" onfocus="fEvent('focus',this)" tabIndex=1 onmouseout="fEvent('mouseout',this)" maxLength=50 name=username autocomplete="off" isfocus="false">

?2、但是項目多的話,這樣找比較麻煩,也可以用VBA代碼直接找

引用老狼的代碼:http://blog.csdn.net/northwolves/article/details/1809109

Sub show163tags()
Dim i As Byte
With CreateObject("InternetExplorer.Application")
.Visible = True
.navigate "Do Until .Readystate = 4
DoEvents
Loop
On Error Resume Next
For i = 1 To 100
If Len(.Document.Forms(0).All(i).Name) > 0 Then Debug.Print "i=" & i; "? name=" & .Document.Forms(0).All(i).Name
Next
End With
MsgBox "ok"
End Sub

3、但是有的項目是沒有ID和Name的,就比如163郵箱這個button即沒ID又沒name。

這個時候可以用到索引號,手工找就不介紹了,直接推薦用Ldy的分析工具

http://club.excelhome.net/thread-377077-1-1.html

?

參考文章

http://club.excelhome.net/thread-719242-1-1.html

新跟帖 (共1 條評論)

查看更多評論。。。

主站蜘蛛池模板: 91系列在线观看 | 99精彩视频在线观看 | 欧美成人三级视频 | 模特三级在线观看 | 国产精品久久久久久久久粉嫩 | 久久精热| 中文欧美日韩 | 欧美亚洲一级 | 久久千人斩 | 成人做爰高潮片免费视频韩国 | 欧美成人一区免费视频 | 4399一级成人毛片 | 毛片免费在线播放 | 香蕉成人在线观看 | 久久影院午夜 | 蜜桃视频网站在线观看 | 国产精品免费一区二区三区四区 | 91在线视频免费观看 | 国产精品久久99精品毛片三a | 3级毛片| 色域tv| 91青青| 极品美女一级毛片 | 欧美男女爱爱视频 | 影视免费观看 | 视频一区二区三区在线 | 最近中文字幕一区二区 | 国产资源在线观看 | 免费毛片免费看 | 亚洲精品欧美 | 亚洲一区二区三区四区精品 | 国产真实孩交 | 91精品国产免费久久 | 少妇av片| 91精品国产综合久久婷婷香 | 国产精品久久久久久久久久 | 国产一区视频观看 | 久久视频精品 | 日韩三级伦理在线观看 | 亚欧美一区二区 | 亚洲精品成人在线视频 |