从Access连接到Internet？ [英] Connect to Internet from Access?

问题描述

嗨。


如何才能将原始文本从Internet页面（html格式）加载到

MS-Access？


我的问题是：


如何连接到页面？


如何获取文本返回？


提前致谢


J？rn

Hi.

How is it possible to load raw text from an Internet page (html-format), to
MS-Access?

My questions are:

How to connect to the page?

How to get the text back?

Thanks in advance

J?rn

推荐答案

>如何连接到页面？


Dim ie As New InternetExplorer''参考：Microsoft Internet Controls

strNav = [url]

ie.Navigate strNav

> How to connect to the page?

Dim ie As New InternetExplorer ''Reference: Microsoft Internet Controls
strNav = [url]
ie.Navigate strNav

如何取回文本？

好​​问题......

good question...

如果数据在HTML表或列表中，您可以读取数据。请参阅

访问帮助文章TransferText方法了解更多信息。


-

MGFoster ::: mgf00< at> earthlink< decimal-point> net

奥克兰，加利福尼亚州（美国）


JHB写道：

If the data is in an HTML table or list you can read the data. See the
Access Help article "TransferText Method" for more info.

--
MGFoster:::mgf00 <at> earthlink <decimal-point> net
Oakland, CA (USA)

JHB wrote:

嗨。

怎么样有可能从Internet页面（html格式）加载原始文本，到MS-Access吗？

我的问题是：

如何连接到页面？

如何获取文本？

Hi.

How is it possible to load raw text from an Internet page (html-format), to
MS-Access?

My questions are:

How to connect to the page?

How to get the text back?

谢谢，重播，你们两个。


我有它。


问候J？rn


Sub HentSide（Adr As String，ItemNr作为整数）

On Error GoTo fejl

Dim PauseTime，Start，Finish，TotalTime

ie.Navigate Adr

暂停时间= 2

开始=计时器

执行计时器<开始+暂停时间

DoEvents

循环

SideIHTMLFormat = ie.Document.childNodes.Item（ItemNr）.innerHTML

退出Sub

fejl：

MsgBox（Siden er ikke tilg？ngelig i？jeblikket，pr？v senere！）

结束子


JHB < joern_bea@removeThis_tdcadsl.dk> skrev i en meddelelse

news：41 *********************** @ dread15.news.tele.d k ...

Thanks, for replay, both of you.

I''ve got it.

Greetings J?rn

Sub HentSide(Adr As String, ItemNr As Integer)
On Error GoTo fejl
Dim PauseTime, Start, Finish, TotalTime
ie.Navigate Adr
PauseTime = 2
Start = Timer
Do While Timer < Start + PauseTime
DoEvents
Loop
SideIHTMLFormat = ie.Document.childNodes.Item(ItemNr).innerHTML
Exit Sub
fejl:
MsgBox ("Siden er ikke tilg?ngelig i ?jeblikket, pr?v senere!")
End Sub

"JHB" <joern_bea@removeThis_tdcadsl.dk> skrev i en meddelelse
news:41***********************@dread15.news.tele.d k...

您好。

如何将原始文本从Internet页面（html格式），
加载到MS-Access？

我的问题是：

如何连接页面？

如何获取文本？

提前致谢

J？rn

Hi.

How is it possible to load raw text from an Internet page (html-format), to MS-Access?

My questions are:

How to connect to the page?

How to get the text back?

Thanks in advance

J?rn

这篇关于从Access连接到Internet？的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！