Have a look to the references StringReplace, RegularExpression, and soon you write something like that
In[4]:= Clear[sql0]
sql0 = "DateTo={d'2013-01-01'},DateTo={d'2013-01-01'}";
In[13]:= StringReplace[sql0,
RegularExpression["[0-9]{4}"] :> ToString[ToExpression["$0"] + #]] & /@ Range[10]
Out[13]= {"DateTo={d'2014-01-01'},DateTo={d'2014-01-01'}", \
"DateTo={d'2015-01-01'},DateTo={d'2015-01-01'}", \
"DateTo={d'2016-01-01'},DateTo={d'2016-01-01'}", \
"DateTo={d'2017-01-01'},DateTo={d'2017-01-01'}", \
"DateTo={d'2018-01-01'},DateTo={d'2018-01-01'}", \
"DateTo={d'2019-01-01'},DateTo={d'2019-01-01'}", \
"DateTo={d'2020-01-01'},DateTo={d'2020-01-01'}", \
"DateTo={d'2021-01-01'},DateTo={d'2021-01-01'}", \
"DateTo={d'2022-01-01'},DateTo={d'2022-01-01'}", \
"DateTo={d'2023-01-01'},DateTo={d'2023-01-01'}"}