Reemplace una columna usando expresiones regulares en ms access 2010

Hay una tabla llamada muestra que incluye solo una columna, cuerpo (tipo: texto) en ms access 2010:

<name>John</name><age>12</age>

Me gustaría borrar cada cadena dentro de los paréntesis. Mira esto:

John12

Añadí la biblioteca Microsoft VBScript Regular Expression 5.5 y creé este módulo:

Function Replace_Regex(str1, patrn, replStr)
Dim regEx
Set regEx = New RegExp
regEx.Pattern = patrn
regEx.IgnoreCase = True

Replace_Regex = regEx.Replace(str1, replStr)
End Function

Y luego, ejecuto esta consulta: actualizar conjunto de muestra body = Replace_Regex (body, "<[^>] +?", "")

Pero el resultado es:

 ame>John</name><age>12</age>

¿Entonces, cuál es el problema?

Respuestas a la pregunta(1)

Su respuesta a la pregunta