<%
Dim birthday
birthday="05-06"
 set rs=server.createobject("adodb.recordset") 
sql="select * from user " 
rs.open sql,conn,1,1 
if not rs.eof then
   birthday=rs("user_date")
end if 
rs.close  '关闭,这要是习惯的哦
%> 
<script> 
var theDate = new Date(" <%=birthday%>".replace(/-/g,"/")); 
var flag = true; 
function init(){ var now = new Date(); 
if(now.getMonth() == theDate.getMonth() 
&& now.getDate() == theDate.getDate()){ 
alert(user_name+'生日快乐'); 
flag = false; 

if(flag){ 
setTimeout("init()",1000); 
} //记得测试,也有可能是时间格式错误哦
alert(theDate);

</script> 
<%=rst("user_date")%> ‘这个地方可能有错误  rst 是什么