>Private Function GetData(ByVal tcQuery As String, Optional ByVal tnProcess As Integer = 3) As String >