自已解决了
原来是在这里改:
Response.Write("document.writeln('共有<font color=""red"">"&Conn.Execute("Select Count(id) From ks_Article")(0) & "</font> 个信息;');")
if DataBaseType=1 Then
Response.Write("document.writeln('今日新增了<font color=""red"">" & conn.execute("select count(id) from ks_article where datediff(d,adddate,getdate())<1 ")(0) & "</font> 个信息!');")
Else
Response.Write("document.writeln('今日新增了<font color=""red"">" & conn.execute("select count(id) from ks_article where datediff('d',adddate,now())<1 ")(0) & "</font> 个信息!');")
End If
%>