请教：还是地址问题！

咱先看看

如果网页地址为： http://www.BBBBBBB.com/proquote/external_rank_list.asp?type=0&selecttype=&sortfield=1&sorttype=0&begin=1&end=889 那么通过调整begin和end的值可以打开不同的页面范围。 但是如果是这样的网址： http://www.BBBBB.com/board.asp?ID=&p=1&b=1&UID=&taxis= http://www.BBBBB.com/board.asp?ID=&p=2&b=1&UID=&taxis= http://www.BBBBB.com/board.asp?ID=&p=3&b=1&UID=&taxis= 在这里p=?有些地方直接写成page=?

现在的问题是：如何同时打开p=1、p=2、p=3在一个页面里（这里也许用词不专业，但意思是明确的）。

rylane

p=1、p=2、p=3每一页仍是单独的一个网页，想在一个页面里打开显示也可以，做成框架网页吧

http://www.BBBBBBB.com/proquote/external_rank_list.asp?type=0&selecttype=&sortfield=1&sorttype=0&begin=1&end=889:问号后为变量名及变量值，&符号是起到隔开变量，整个地址的含义是前一个ASP网页向external_rank_list.asp表单递交变量并赋值。

http://mp3.baidu.com/m?f=ms&rn=&tn=baidump3&ct=134217728&word=%B5%BD%B4%A6%C1%F7%C0%CB&submit=%B0%D9%B6%C8%CB%D1%CB%F7&lm=0 ： word=%B5%BD%B4%A6%C1%F7%C0%CB这一串是中文字符转换为网页特定字符后再向表单提交变量。

七叶一枝梅

可以同时打开，用框架页面，将几个页面放到框架中。

楼主的目的是想查看一些不允许被查看的网页吧？！呵呵，祝你好运。

咱先看看

谢楼上二位，不过我还是没弄明白什么是框架页面，另外3楼没有说对，我可没想做那么复杂的事。也许我主帖说的不明白，重新说！

如果网页地址为： http://www.BBBBBBB.com/proquote/external_rank_list.asp?type=0&selecttype=&sortfield=1&sorttype=0&begin=1&end=889 我知道我该如何解决问题，因此这里没有问题。

但是如果是这样的网址： http://www.BBBBB.com/board.asp?ID=&p=1&b=1&UID=&taxis= 我就不知道该怎样解决问题。

我刚发现论坛里就有这样的网页，可以拿来举例子： http://club.excelhome.net/forumdisplay.php?fid=100&page=2&selTimeLimit=&action=&topicmode=0 这是本版的帖子列表页面，其中 page=2表示第2页默认每页20条。我想做的事其实非常明确：一次打开1至10页，让列表按页面顺序自然连接成一个大的表格。

我不知道这回说明白了没有？还请哪位老师解答一下，谢谢！！！

[此贴子已经被作者于2005-3-16 8:36:35编辑过]

marco

这跟网页的分页写法有关，比如动网的这个Records/Page=10已经写死了，故你想一次性浏览超过10条记录是没有办法的！

咱先看看

不好意思，更糊涂了！前面还说可以做框架页面，后面反而什么都不能做了？

marco

像你这个问题是访问别人的网页，自己写框架来访问有何用处呢？

1、如果对方使用防盗链功能，自己写的框架还有用吗？

2、直接用多个页面打开与框架有何区别？

咱先看看

首先我并不知道框架页面是怎么回事？我想达到的目的非常明确，把网页上的表格资料转到EXCEL上去。比如：http://www.stocklines.net/jytop/index.asp?type=stock（小心：这个网页不怎么地道），这里默认每页15条记录，共有34页之多。我就是想一次打开整个资料再一个页面里。不知能不能做到？

marco

这个网站并不能自定义页记录的访问，故你可以自己在Excel里写宏来批处理下载，然后再通过定义序号-排序-删除不需要的记录后重排即可。

Sub Macro1(acPage, acCell) ' ' Marco 记录的宏 2005-3-30 '

' With ActiveSheet.QueryTables.Add(Connection:= _ "URL;http://www.stocklines.net/jytop/index.asp?type=stock&page=" & acPage, Destination:= _ Range(acCell)) .Name = "index.asp?type=stock" .FieldNames = True .RowNumbers = False .FillAdjacentFormulas = False .PreserveFormatting = True .RefreshOnFileOpen = False .BackgroundQuery = True .RefreshStyle = xlInsertDeleteCells .SavePassword = False .SaveData = True .AdjustColumnWidth = True .RefreshPeriod = 0 .WebSelectionType = xlSpecifiedTables .WebFormatting = xlWebFormattingNone .WebTables = "11" .WebPreFormattedTextToColumns = True .WebConsecutiveDelimitersAsOne = True .WebSingleBlockTextImport = False .WebDisableDateRecognition = False .WebDisableRedirections = False .Refresh BackgroundQuery:=False End With End Sub

Sub DownNTData() 'Sub DownNTData(stPage, EndPage) Dim i As Integer Dim acCell As String 'For i = stPage To EndPage For i = 1 To 34 ActiveCell.SpecialCells(xlLastCell).Select acCell = "A" & ActiveCell.Row + 1 Call Macro1(i, acCell) Next i End Sub

咱先看看

谢楼上！虽然不能马上看懂，但是我会慢慢地去琢磨。再谢！！！