Thread
:
How locate connection information for web query?
View Single Post
#
10
Posted to microsoft.public.excel.programming
tanso
external usenet poster
Posts: 1
How locate connection information for web query?
The site was never changed for my case..yesterday, the xp computer
did a windows update automatically without my knowledge and the site I
used to query for years returned this same message that there was no
data.. I know it is due to critcal security updates of the service
packs.. I am still trying to find a quick solution without me having
to re-install or repair the xp window operating system...Any help
would be appreciated
"Don Guillett" wrote in message ...
Might be because the site changed. goto it manually and see what you get.
--
Don Guillett
SalesAid Software
"James" wrote in message
...
I'd be careful about using WebQueries for anything serious. I have been
using
them for more than 6 months now in Excel 2003, and 2 days ago my query
suddenly stopped working. You get a silly error message "The internet site
reports that a connection was established but the data is not available".
Nothing about this error in the Knowledge Base. There are about 20 posts
about this problem in several MSDN newsgroups, and nobody ever got an
answer
that solved their problem. The only answer I saw is "make sure your URL
includes .html".
"quartz" wrote:
I am new at working with web queries, and I am attempting to build some
code
that will download stock quotes. I know that there are some canned
programs
out there, but I want to learn by building this myself. Some of my VERY
basic
code so far is below.
QUESTION: The one question that I can't seem to find any discussions on
is
how the heck does one locate the connection string to connect, say, to
Yahoo.com or to Microsoft.com to import stock info?
Set qts = ActiveSheet.QueryTables
Set qt = qts.Add("URL;
http://www.HOW
DO i FIND WHAT THE HECK GOES HERE",
Application.Range(ActiveCell.Address))
With qt
.WebSelectionType = xlSpecifiedTables
'.WebTables = "1"
.WebFormatting = xlWebFormattingAll
.RefreshStyle = xlOverwriteCells
.BackgroundQuery = False
.AdjustColumnWidth = True
.Refresh 'BackgroundQuery:=False
End With
Please help and be gentle to this starter...thanks in advance.
Reply With Quote
tanso
View Public Profile
Find all posts by tanso