รูปแบบ datediff เขียน where ยังงัยคับคือแบบนี้แร้ว error

	set Conn1 = Server.Createobject("ADODB.Connection")
	Conn1.Open "DRIVER=Microsoft Access Driver (*.mdb);DBQ=" & Server.MapPath("Network.mdb"),"" , ""
	strSQL = "UPDATE Reserve SET "
		strSQL = strSQL&"Status = 'Reserve' "
		strSQL = strSQL& "where Status = 'Reserve'and DATEDIFF('D',DateReserve,FormatDateTime(date(),0))>3"
	Set objExec = Conn.Execute(strSQL)
	Conn.Close()