用VB程序控制IE瀏覽器

dim ie

創(chuàng)新互聯(lián)建站-專業(yè)網(wǎng)站定制、快速模板網(wǎng)站建設(shè)、高性價(jià)比拜泉網(wǎng)站開(kāi)發(fā)、企業(yè)建站全套包干低至880元,成熟完善的模板庫(kù),直接使用。一站式拜泉網(wǎng)站制作公司更省心,省錢(qián),快速模板網(wǎng)站建設(shè)找我們，業(yè)務(wù)覆蓋拜泉地區(qū)。費(fèi)用合理售后完善，十多年實(shí)體公司更值得信賴。

dim strSource as string

set ie=createobject("internetexplorer.application") '打開(kāi)一個(gè)新IE窗口

ie.navigate "" '打開(kāi)指定網(wǎng)頁(yè)

while ie.readystate4 '等待網(wǎng)頁(yè)完全打開(kāi)

doevents

wend

strSource=ie.document.all.body.innerHTML '讀取網(wǎng)頁(yè)內(nèi)容

ie.quit '退出IE

用VB.NET 怎樣通過(guò)給的HTTP地址上傳文件

e As Int32 = 0 To Files.Count - 1

Dim PostedFile As HttpPostedFile = Files(iFile)

Dim FileName, FileExtent As String

FileName = Serverpath System.IO.Path.GetFileName(PostedFile.FileName)

If System.IO.Path.GetFileName(PostedFile.FileName) "" Then

FileName = System.IO.Path.GetFileName(PostedFile.FileName)

Dim Url As String = Me.Label1.Text.Trim FileName

PostedFile.SaveAs(Serve

vb.net／.net怎樣使用http協(xié)議的get和post？

不想一點(diǎn)一點(diǎn)寫(xiě)了，粘貼給你吧

使用 HttpWebRequest 向網(wǎng)站提交數(shù)據(jù)

HttpWebRequest 是 .net 基類庫(kù)中的一個(gè)類，在命名空間 System.Net 下面，用來(lái)使用戶通過(guò) HTTP 協(xié)議和服務(wù)器交互。

HttpWebRequest 對(duì) HTTP 協(xié)議進(jìn)行了完整的封裝，對(duì) HTTP 協(xié)議中的 Header, Content, Cookie 都做了屬性和方法的支持，很容易就能編寫(xiě)出一個(gè)模擬瀏覽器自動(dòng)登錄的程序。

程序使用 HTTP 協(xié)議和服務(wù)器交互主要是進(jìn)行數(shù)據(jù)的提交，通常數(shù)據(jù)的提交是通過(guò) GET 和 POST 兩種方式來(lái)完成，下面對(duì)這兩種方式進(jìn)行一下說(shuō)明：

1. GET 方式。 GET 方式通過(guò)在網(wǎng)絡(luò)地址附加參數(shù)來(lái)完成數(shù)據(jù)的提交，比如在地址 中，前面部分 表示數(shù)據(jù)提交的網(wǎng)址，后面部分 hl=zh-CN 表示附加的參數(shù)，其中 hl 表示一個(gè)鍵(key)， zh-CN 表示這個(gè)鍵對(duì)應(yīng)的值(value)。程序代碼如下：

HttpWebRequest req = (HttpWebRequest) HttpWebRequest.Create( "" );

req.Method = "GET";

using (WebResponse wr = req.GetResponse())

{

//在這里對(duì)接收到的頁(yè)面內(nèi)容進(jìn)行處理

}

2. POST 方式。 POST 方式通過(guò)在頁(yè)面內(nèi)容中填寫(xiě)參數(shù)的方法來(lái)完成數(shù)據(jù)的提交，參數(shù)的格式和 GET 方式一樣，是類似于 hl=zh-CNnewwindow=1 這樣的結(jié)構(gòu)。程序代碼如下：

string param = "hl=zh-CNnewwindow=1";

byte[] bs = Encoding.ASCII.GetBytes(param);

HttpWebRequest req = (HttpWebRequest) HttpWebRequest.Create( "" );

req.Method = "POST";

req.ContentType = "application/x-www-form-urlencoded";

req.ContentLength = bs.Length;

using (Stream reqStream = req.GetRequestStream())

{

reqStream.Write(bs, 0, bs.Length);

}

using (WebResponse wr = req.GetResponse())

{

//在這里對(duì)接收到的頁(yè)面內(nèi)容進(jìn)行處理

}

在上面的代碼中，我們?cè)L問(wèn)了 的網(wǎng)址，分別以 GET 和 POST 方式提交了數(shù)據(jù)，并接收了返回的頁(yè)面內(nèi)容。然而，如果提交的參數(shù)中含有中文，那么這樣的處理是不夠的，需要對(duì)其進(jìn)行編碼，讓對(duì)方網(wǎng)站能夠識(shí)別。

3. 使用 GET 方式提交中文數(shù)據(jù)。 GET 方式通過(guò)在網(wǎng)絡(luò)地址中附加參數(shù)來(lái)完成數(shù)據(jù)提交，對(duì)于中文的編碼，常用的有 gb2312 和 utf8 兩種，用 gb2312 方式編碼訪問(wèn)的程序代碼如下：

Encoding myEncoding = Encoding.GetEncoding("gb2312");

string address = "?" + HttpUtility.UrlEncode("參數(shù)一", myEncoding) + "=" + HttpUtility.UrlEncode("值一", myEncoding);

HttpWebRequest req = (HttpWebRequest)HttpWebRequest.Create(address);

req.Method = "GET";

using (WebResponse wr = req.GetResponse())

{

//在這里對(duì)接收到的頁(yè)面內(nèi)容進(jìn)行處理

}

在上面的程序代碼中，我們以 GET 方式訪問(wèn)了網(wǎng)址 ，傳遞了參數(shù)“參數(shù)一=值一”，由于無(wú)法告知對(duì)方提交數(shù)據(jù)的編碼類型，所以編碼方式要以對(duì)方的網(wǎng)站為標(biāo)準(zhǔn)。常見(jiàn)的網(wǎng)站中， （百度）的編碼方式是 gb2312, （谷歌）的編碼方式是 utf8。

4. 使用 POST 方式提交中文數(shù)據(jù)。 POST 方式通過(guò)在頁(yè)面內(nèi)容中填寫(xiě)參數(shù)的方法來(lái)完成數(shù)據(jù)的提交，由于提交的參數(shù)中可以說(shuō)明使用的編碼方式，所以理論上能獲得更大的兼容性。用 gb2312 方式編碼訪問(wèn)的程序代碼如下：

Encoding myEncoding = Encoding.GetEncoding("gb2312");

string param = HttpUtility.UrlEncode("參數(shù)一", myEncoding) + "=" + HttpUtility.UrlEncode("值一", myEncoding) + "" + HttpUtility.UrlEncode("參數(shù)二", myEncoding) + "=" + HttpUtility.UrlEncode("值二", myEncoding);

byte[] postBytes = Encoding.ASCII.GetBytes(param);

HttpWebRequest req = (HttpWebRequest) HttpWebRequest.Create( "" );

req.Method = "POST";

req.ContentType = "application/x-www-form-urlencoded;charset=gb2312";

req.ContentLength = postBytes.Length;

using (Stream reqStream = req.GetRequestStream())

{

reqStream.Write(bs, 0, bs.Length);

}

using (WebResponse wr = req.GetResponse())

{

//在這里對(duì)接收到的頁(yè)面內(nèi)容進(jìn)行處理

}

從上面的代碼可以看出， POST 中文數(shù)據(jù)的時(shí)候，先使用 UrlEncode 方法將中文字符轉(zhuǎn)換為編碼后的 ASCII 碼，然后提交到服務(wù)器，提交的時(shí)候可以說(shuō)明編碼的方式，用來(lái)使對(duì)方服務(wù)器能夠正確的解析。

以上列出了客戶端程序使用 HTTP 協(xié)議與服務(wù)器交互的情況，常用的是 GET 和 POST 方式?，F(xiàn)在流行的 WebService 也是通過(guò) HTTP 協(xié)議來(lái)交互的，使用的是 POST 方法。與以上稍有所不同的是， WebService 提交的數(shù)據(jù)內(nèi)容和接收到的數(shù)據(jù)內(nèi)容都是使用了 XML 方式編碼。所以， HttpWebRequest 也可以使用在調(diào)用 WebService 的情況下。

VB.net是什么語(yǔ)言？

Visual Basic.NET是基于微軟.NET Framework之上的面向?qū)ο蟮闹虚g解釋性語(yǔ)言(名片中說(shuō)VB.NET是"...中間解釋性語(yǔ)言“，這種說(shuō)法極不準(zhǔn)確，甚至完全錯(cuò)誤?？赡茉庉嬚呤侵傅木幾g器會(huì)先將源碼翻譯成MSIL(Microsoft Intermediate Language)中間語(yǔ)言這回事,但這和”解釋性語(yǔ)言“有很大差別)，可以看作是Visual Basic在·Net Framework平臺(tái)上的升級(jí)版本，增強(qiáng)了對(duì)面向?qū)ο蟮闹С?。但由于改?dòng)太大，導(dǎo)致VB.net對(duì)VB的向后兼容性不好，在業(yè)界引起不小的爭(zhēng)議。 大多的VB.Net程序員使用Visual Studio .Net作為IDE（integrated development environment).SharpDevelop是另一種可用的開(kāi)源的IDE。VB.Net需要在.Net Framework平臺(tái)上才能執(zhí)行。 VB.NET的主頁(yè)

詳情請(qǐng)看百度百科：;type=synfromtitle=VB.NETfr=aladdin