Dim ds As DataSet
Dim datasetsDt As DataTable
Dim datasetRows As DataRow()
Dim datasetHts() As Hashtable
Dim samplesHts() As Hashtable
Dim responseHt As Hashtable
Dim maxIndex As Integer
Dim rows() As DataRow
Dim lastModifiedDate As Date
Dim ignoreFields As New ArrayList()
Dim dr As DataRow
Dim drs(0) As DataRow
'Dim sw As New IO.StreamWriter("c:\inetpub\wwwroot\mapimages\dataset.txt")
'sw.AutoFlush = True
Dim ids As String()
Dim allResponsesHt As New Hashtable()
Dim datasetPIsDt As DataTable
Dim sitesDt As DataTable
Dim sampleAgesDt As DataTable
Dim sampleDataDt As DataTable
Dim csvSW As IO.StreamWriter
DownloadMultiple function