用asp+acess，怎样显示一个月里指定周的数据？解决方法 _ASP

用asp+acess，怎样显示一个月里指定周的数据？
有一个表单，[ ]年 [ ]月第[1,2,3,4]周
我想实现表单提交后，显示数据库里相应的数据。
数据库的表里有一个时间的字段time，格式是yy-mm-dd，例如，我选择2012年4月第2周，则将表里符合这个范围的数据都显示出来，请问应该怎么做？谢谢

------解决方案--------------------

VBScript code


Function getStartDay(y,m,s)
    '传递三个参数，年、月和第几个星期数
    '本函数以第一个星期一为第一周
    'y 的范围为大于1900的四位整数
    'm 的范围为1至12的整数
    's 的取值范围为自然数
    '当取值失败，返回当前日期
    Dim tmpDate,firstday
    If y < 1900 Or m < 1 Or m > 12 Or s < 1 Or y <> Int(y) Or m <> Int(m) Or s <> Int(s) Then
        getStartDay = Date()
    End If
    tmpDate = CDate(y & "-" & m & "-1")
    firstday = Weekday(tmpDate)
    If firstday > 2 Then
        firstday = tmpDate + 9 - firstday
    ElseIf firstday = 1 Then
        firstday = tmpDate + 1
    Else
        firstday = tmpDate
    End If
    getStartDay = firstday + (s - 1) * 7
End Function