请各位大哥帮我看下错在哪里了。谢谢呀

<%
dim xm,zjys,year3,month3,day3,year4,month4,day4,date3,date4,date5
xm=request("xm")
zjys=request("zjys")

year3=request("year3")
month3=request("month3")
day3=request("day3")

year4=request("year4")
month4=request("month4")
day4=request("day4")

date3=request("year3") & "/" & request("month3")& "/" &request("day3")
date4=request("year4") & "/" & request("month4")& "/" &request("day4")

dim conn,connstr,date1,date2
on error resume next
connstr="DBQ="+server.mappath("db1.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
Set conn=Server.CreateObject("ADODB.CONNECTION")
conn.open connstr

'response.write(month(date))

'response.

请各位大哥帮我看下错在哪里了。谢谢呀 请各位大哥帮我看下那错在哪里了。谢谢呀 笔记本~~~~~~~请各位大哥大姐帮我解答!谢谢了! 各位大哥大姐，请帮我想想！！ 请各位大哥大姐帮我把下面句子的同义句告诉我，在这里先谢了 请各位大哥大姐们帮我看看这套配置怎么样，小弟在次给你们鞠躬了！！！ 小弟需神舟天运m140c，我应该在哪里下载啊，请各位大哥大姐们帮帮小弟了， 各位大哥大姐,请帮我看看我的程序是什么问题吧 谢谢了! 请各位大哥大姐帮我看我这电脑到底怎么了 各位大哥大姐请帮我看看她是喜欢我吗？（谢谢了）