为什么网络中的内容在变，而网址不变？

lhj323323

老师：

http://www.szse.cn/main/disclosure/news/xxlb/

上面这个网址，有点奇怪，无论我怎么调整网页中的内容，但这个网址始终不变，那么我如何才能提取全部的数据呢
比如：我将时间区间调整为2010年12月7日到2011年1月7日，应该有15页数据，但我用如下的程序却只能导出一页的数据来，
Sheets("深圳数据").Select
Sheet3.Cells.Clear '导入区，ClearContents不消格式
    With ActiveSheet.QueryTables.Add(Connection:= _
        "URL;http://www.szse.cn/main/disclosure/news/xxlb", Destination:=Sheets( _
        "深圳数据").Range("A1"))
        .Name = "xxlb"
        .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 = """REPORTID_tab1"""
        .WebPreFormattedTextToColumns = True
        .WebConsecutiveDelimitersAsOne = True
        .WebSingleBlockTextImport = False
        .WebDisableDateRecognition = False
        .WebDisableRedirections = False
        .Refresh BackgroundQuery:=False
    End With
请问我该怎么改才能将这15页数据全提取出来

lhj323323

向老师求助

lhj323323

期待老师的帮助