データベースのページをリモートで読むには？

<%.
Set HttpObj = Server.CreateObject("AspHTTP.Conn")
dim docnum
docnum = 101
do while docnum <> 111
レスポンス.ライト docnum
HTTPObj.Url = "http://www.intels.net/date.asp?songID="&docnum
HttpObj.RequestMethod = "GET"
strResult = HTTPObj.GetURL
Response.Write strResult
docnum=docnum + 1
Response.Write "<br>"
ループ
%> <未定義