Busqueda en un campo

[llanesluna]

Tengo un campo fecha con este formato dd/mm/aaaa
Como puedo coger dentro el select el campo mes, o sea los 2 caracteres del mes y compararlos usano un Like para q me de un resultado.

BuscarMes es una variable q recoge un valor de otra pag en formato 01,02,03, etc refiriendose a cada mes del año.
Quiero q se compare con la lectura de la fecha de los caracteres 4to y 5to y si coinciden q me devuelva todos los campos.

Recordset2.Source = "SELECT Fecha FROM dbo.Persona where mid(Fecha),4,2 LIKE Fecha'"&BuscarMes&"' "

Quiero q quede algo asi, porsupuesto, esto q tengo ahi da error.

Se q debo usar la funcion Mid, pero donde??
Saludos a todos.