%@LANGUAGE="VBSCRIPT"%> <% Dim MXRSS_rsRSS_HomeAudio: Set MXRSS_rsRSS_HomeAudio = new MX_RssReader MXRSS_rsRSS_HomeAudio.setConnection MM_rss_conn_STRING MXRSS_rsRSS_HomeAudio.setCacheTime 1 MXRSS_rsRSS_HomeAudio.getFeed "http://reviews.cnet.com/4924-6462_7-0.xml?orderBy=-7rvDte&7rType=70-80&maxhits=10&9lwPrc=0-" Dim MXRSS_rsRSS_HomeVideo: Set MXRSS_rsRSS_HomeVideo = new MX_RssReader MXRSS_rsRSS_HomeVideo.setConnection MM_rss_conn_STRING MXRSS_rsRSS_HomeVideo.setCacheTime 1 MXRSS_rsRSS_HomeVideo.getFeed "http://reviews.cnet.com/4924-6463_7-0.xml?orderBy=-7rvDte&7rType=70-80&maxhits=10&9lwPrc=0-" Dim MXRSS_rsRSS_HomeTheater: Set MXRSS_rsRSS_HomeTheater = new MX_RssReader MXRSS_rsRSS_HomeTheater.setConnection MM_rss_conn_STRING MXRSS_rsRSS_HomeTheater.setCacheTime 1 MXRSS_rsRSS_HomeTheater.getFeed "http://www.hometheaterhifi.com/rss_feed.xml" Dim MXRSS_rsRSS_Movies: Set MXRSS_rsRSS_Movies = new MX_RssReader MXRSS_rsRSS_Movies.setConnection MM_rss_conn_STRING MXRSS_rsRSS_Movies.setCacheTime 1 MXRSS_rsRSS_Movies.getFeed "http://www.cinemablend.com/rss_dvd.php" Dim MXRSS_rsRSS_ConnectedHome: Set MXRSS_rsRSS_ConnectedHome = new MX_RssReader MXRSS_rsRSS_ConnectedHome.setConnection MM_rss_conn_STRING MXRSS_rsRSS_ConnectedHome.setCacheTime 1 MXRSS_rsRSS_ConnectedHome.getFeed "http://reviews.cnet.com/4924-3243_7-0.xml?orderBy=-7rvDte&7rType=70-80&maxhits=10&9lwPrc=0-" Dim MXRSS_rsRSS_HomeOffice: Set MXRSS_rsRSS_HomeOffice = new MX_RssReader MXRSS_rsRSS_HomeOffice.setConnection MM_rss_conn_STRING MXRSS_rsRSS_HomeOffice.setCacheTime 1 MXRSS_rsRSS_HomeOffice.getFeed "http://rssnewsapps.ziffdavis.com/pcmag.xml" Dim MXRSS_rsRSS_Gadgets: Set MXRSS_rsRSS_Gadgets = new MX_RssReader MXRSS_rsRSS_Gadgets.setConnection MM_rss_conn_STRING MXRSS_rsRSS_Gadgets.setCacheTime 1 MXRSS_rsRSS_Gadgets.getFeed "http://reviews.cnet.com/4924-6450_7-0.xml?orderBy=-7rvDte&7rType=70-80&maxhits=10&9lwPrc=0-" Dim MXRSS_rsRSS_CarAudio: Set MXRSS_rsRSS_CarAudio = new MX_RssReader MXRSS_rsRSS_CarAudio.setConnection MM_rss_conn_STRING MXRSS_rsRSS_CarAudio.setCacheTime 1 MXRSS_rsRSS_CarAudio.getFeed "http://www.caraudiomag.com/rss/nonstandard_rss.xml" ' Start RSS Recordset Dim rsRSS_HomeAudio Dim rsRSS_HomeAudio_numRows Set rsRSS_HomeAudio = MXRSS_rsRSS_HomeAudio.getRssRecordset rsRSS_HomeAudio_numRows = 0 ' End RSS Recordset ' Start RSS Recordset Dim rsRSS_HomeVideo Dim rsRSS_HomeVideo_numRows Set rsRSS_HomeVideo = MXRSS_rsRSS_HomeVideo.getRssRecordset rsRSS_HomeVideo_numRows = 0 ' End RSS Recordset ' Start RSS Recordset Dim rsRSS_HomeTheater Dim rsRSS_HomeTheater_numRows Set rsRSS_HomeTheater = MXRSS_rsRSS_HomeTheater.getRssRecordset rsRSS_HomeTheater_numRows = 0 ' End RSS Recordset ' Start RSS Recordset Dim rsRSS_Movies Dim rsRSS_Movies_numRows Set rsRSS_Movies = MXRSS_rsRSS_Movies.getRssRecordset rsRSS_Movies_numRows = 0 ' End RSS Recordset ' Start RSS Recordset Dim rsRSS_ConnectedHome Dim rsRSS_ConnectedHome_numRows Set rsRSS_ConnectedHome = MXRSS_rsRSS_ConnectedHome.getRssRecordset rsRSS_ConnectedHome_numRows = 0 ' End RSS Recordset ' Start RSS Recordset Dim rsRSS_HomeOffice Dim rsRSS_HomeOffice_numRows Set rsRSS_HomeOffice = MXRSS_rsRSS_HomeOffice.getRssRecordset rsRSS_HomeOffice_numRows = 0 ' End RSS Recordset ' Start RSS Recordset Dim rsRSS_Gadgets Dim rsRSS_Gadgets_numRows Set rsRSS_Gadgets = MXRSS_rsRSS_Gadgets.getRssRecordset rsRSS_Gadgets_numRows = 0 ' End RSS Recordset ' Start RSS Recordset Dim rsRSS_CarAudio Dim rsRSS_CarAudio_numRows Set rsRSS_CarAudio = MXRSS_rsRSS_CarAudio.getRssRecordset rsRSS_CarAudio_numRows = 0 ' End RSS Recordset %> <% Dim rsRSS_Gadgets__numRows Dim rsRSS_Gadgets__index rsRSS_Gadgets__numRows = 5 rsRSS_Gadgets__index = 0 rsRSS_Gadgets_numRows = rsRSS_Gadgets_numRows + rsRSS_Gadgets__numRows %> <% Dim rsRSS_CarAudio__numRows Dim rsRSS_CarAudio__index rsRSS_CarAudio__numRows = 5 rsRSS_CarAudio__index = 0 rsRSS_CarAudio_numRows = rsRSS_CarAudio_numRows + rsRSS_CarAudio__numRows %> <% Dim rsRSS_techII__numRows Dim rsRSS_techII__index rsRSS_techII__numRows = 5 rsRSS_techII__index = 0 rsRSS_techII_numRows = rsRSS_techII_numRows + rsRSS_techII__numRows %> <% Dim rsRSS_TechIII__numRows Dim rsRSS_TechIII__index rsRSS_TechIII__numRows = 5 rsRSS_TechIII__index = 0 rsRSS_TechIII_numRows = rsRSS_TechIII_numRows + rsRSS_TechIII__numRows %> <% Dim rsRSS_HomeOffice__numRows Dim rsRSS_HomeOffice__index rsRSS_HomeOffice__numRows = 5 rsRSS_HomeOffice__index = 0 rsRSS_HomeOffice_numRows = rsRSS_HomeOffice_numRows + rsRSS_HomeOffice__numRows %> <% Dim rsRSS_ConnectedHome__numRows Dim rsRSS_ConnectedHome__index rsRSS_ConnectedHome__numRows = 5 rsRSS_ConnectedHome__index = 0 rsRSS_ConnectedHome_numRows = rsRSS_ConnectedHome_numRows + rsRSS_ConnectedHome__numRows %> <% Dim rsRSS_Movies__numRows Dim rsRSS_Movies__index rsRSS_Movies__numRows = 6 rsRSS_Movies__index = 0 rsRSS_Movies_numRows = rsRSS_Movies_numRows + rsRSS_Movies__numRows %> <% Dim rsRSS_HomeTheater__numRows Dim rsRSS_HomeTheater__index rsRSS_HomeTheater__numRows = 5 rsRSS_HomeTheater__index = 0 rsRSS_HomeTheater_numRows = rsRSS_HomeTheater_numRows + rsRSS_HomeTheater__numRows %> <% Dim rsRSS_HomeVideo__numRows Dim rsRSS_HomeVideo__index rsRSS_HomeVideo__numRows = 10 rsRSS_HomeVideo__index = 0 rsRSS_HomeVideo_numRows = rsRSS_HomeVideo_numRows + rsRSS_HomeVideo__numRows %> <% Dim rsRSS_HomeAudio__numRows Dim rsRSS_HomeAudio__index rsRSS_HomeAudio__numRows = 10 rsRSS_HomeAudio__index = 0 rsRSS_HomeAudio_numRows = rsRSS_HomeAudio_numRows + rsRSS_HomeAudio__numRows %>
|
|||||||||||||||||||||||
|
|||||||||||||||||||||||