dim str_initialSql as string
str_initialSql = _
"select * from [payroll] where [payroll.TransactionYear] =' strG_TxnYear'"