...sql2_abbs & "<br>"
rs2.open, sql2_abbs, conn
End Sub
Conn.Open
Set rs = Server.CreateObject("ADODB.Recordset")
sql_abbs = "SELECT * FROM posts"
rs.Open sql_abbs, conn
cnt=0
cnt2=0
Do while not rs.eof
'response.write (DateDiff("m", Now, rs("date")))
if DateDiff("m", Now...