Hi
I executed your code in my system it's working fine here, try to find out what value you are passing to the function by putting msgbox after the line:
StrDate = DataTable.Value("Date", "Action1")
I executed your code in my system it's working fine here, try to find out what value you are passing to the function by putting msgbox after the line:
StrDate = DataTable.Value("Date", "Action1")

