Hola
Con permiso
AZ
Prueba con esto
Código asp:
Ver original<%
fecha = "30/05/2009"
n_fecha = DateAdd("m", 1, fecha)
division = Split(n_fecha,"/")
if division(0) <> 15 then
division(0) = 15
Response.Write division(0) & "/" & division(1) & "/" & division(2)
end if
%>
Suerte