这段代码出了问题，请高手帮忙

<%
        '// 月柱
        if Month(RTstr) = Month(Contrast) And FormatDateTime(RTstr,3)<FormatDateTime(Contrast,3) Then
                Eight = Eight & EightM(DateAdd("m",-1,TempTime))


        Else
                Eight = Eight & EightM(RTstr)
        End if

%>

这是一个排八字的程序，以前十几年使用都一直正常，到了2023年，这段代码就显示不了八字四柱的年柱和月柱，选择2024年及以后，又一切正常。请高手帮忙修改这两句代码，使之完善。谢谢！

乾造后面的四柱显示不出来。正常的应该是这样：

彭开祖 发表于 2023-3-2 15:27
乾造后面的四柱显示不出来。正常的应该是这样：

不懂八字原理，你可以联系客服处理，详细沟通了定制修复下功能。