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'}"}