como saber el ultimo dia de un mes en asp

[mc_quake]

hola amigos mirentengo una duda denuevo tengo una funcion que me combierte un mes de letras a numeros

Function Comtexto(texto)
Select Case texto
Case "Ene"
ComTexto =01
Case "Feb"
ComTexto =02
Case "Mar"
ComTexto =03
Case "Abr"
ComTexto =04
Case "May"
ComTexto =05
Case "Jun"
ComTexto =06
Case "Jul"
ComTexto =07
Case "Ago"
ComTexto =08
Case "Sep"
ComTexto =09
Case "Oct"
ComTexto =10
Case "Nov"
ComTexto =11
Case "Dic"
ComTexto =12
End Select
End Function

y tengo una fecha armada de la siguiente forma

BD=request.QueryString("BD")

x=split((BD),"_")
response.write ComTexto(x(0))

fechafin = 31&"/"&ComTexto(x(0))&"/"&Year(Date())

mi pregunta es: como puedo obtener el ultimo dia del mes de acuerdo al mes y el año que agrego en este fragmento &"/"&ComTexto(x(0))&"/"&Year(Date()) hay alguna forma de obtener el ultimo dia del mes ya que al poner 31 cuando inicio la busqueda por ejemplo en el mes febrero que tiene 28 dias me da error de desbordamiento. para solucionar eso necesito poner el ultimo dia de forma dinamica hay alguna funcion o algo.

De antemano Mc