I have created a class that makes multiple webrequests. I have a txt file that holds the servers that I will conecting. I open the file read the data and the make the request to the server thorugh my werequest class. The problem I am having is it only works for the first server. so if I had 3 sites in my config file It will only get data from the first site and not the 2nd and third. When I debug my code the values are being passed in correctly so I have no Idea why this isnt working. anybody have any ideas?<BR><BR>makes the request<BR>Private Function GetArticleList() As Array<BR> Try<BR> Dim requestUrl As String = HttpServer & "/filelist.asp?user=" & UserName<BR> Dim ArrFileList As Array<BR><BR> Dim objRequest As WebRequest = WebRequest.Create(requestUrl)<BR> objRequest.Credentials = New NetworkCredential(UserName, PassWord)<BR> objRequest.ContentType = "text/xml"<BR> objRequest.Method = "get"<BR><BR> Dim objResponse As WebResponse = objRequest.GetResponse<BR> Dim stream As Stream = objResponse.GetResponseStream<BR> Dim reader As New StreamReader(stream, Encoding.ASCII)<BR><BR> Dim respHTML As String = reader.ReadToEnd()<BR> ArrFileList = Split(respHTML, ",")<BR> stream.Close()<BR> reader.Close()<BR> objResponse.Close()<BR><BR> AddToLog(" GetFileList - Found(" & UBound(ArrFileList) & ") URL:" & requestUrl)<BR> objRequest = Nothing<BR> objResponse = Nothing<BR> Return ArrFileList<BR> Catch ex As Exception<BR> AddToLog(" Error GetFileList - " & ex.Source.ToString & " " & ex.Message.ToString)<BR> End Try<BR> End Function<BR><BR>reads config data<BR> Dim configFile As New FileInfo(Server.MapPath("config.txt"))<BR><BR> If configFile.Exists Then<BR> Dim sr As New StreamReader(Server.MapPath("config.txt"))<BR> Dim sinfo(0) As String<BR> Dim x As Integer = 0<BR><BR> While sr.Peek &#060;&#062; -1<BR> sinfo(x) = sr.ReadLine<BR> x = x + 1<BR> ReDim Preserve sinfo(UBound(sinfo) + 1)<BR> End While<BR><BR> sr.Close()<BR><BR> Dim y As Integer<BR> x = 0<BR> For y = 0 To UBound(sinfo) - 1<BR> Dim arrCon As Array<BR> arrCon = Split(sinfo(x), ";")<BR> Dim objHttp As New test.HttpSelectClient()<BR> objHttp.HttpServer = arrCon(0)<BR> objHttp.UserName = arrCon(1)<BR> objHttp.PassWord = arrCon(2)<BR> objHttp.ArticleSavePath = arrCon(3)<BR> objHttp.LogSavePath = arrCon(4)<BR> objHttp.PullContent()<BR> objHttp = Nothing<BR><BR> x = x + 1<BR> Next<BR> End If