Dim ds As DataSet
Dim datasetDt As DataTable
Dim sampleAgesDt As DataTable
Dim sampleDataDt As DataTable
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\downloadsCSV.txt")
'sw.AutoFlush = True
Function