заменить столбец с помощью регулярных выражений в MS Access 2010

Есть таблица с именем sample, включающая только один столбец, тело (тип: текст) в ms access 2010:

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

Я хочу удалить каждую строку в скобках. Видеть это:

John12

Я добавил библиотеку Microsoft VBScript Regular Expression 5.5 и создал этот модуль:

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

И тогда я запускаю этот запрос: &nbsp;&nbsp;&nbsp;&nbsp;обновить образец &nbsp;&nbsp;&nbsp;&nbsp;set body = Replace_Regex (body, & quot; & lt; [^ & gt;] +? & quot ;, "quot;")

Но результат:

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

Итак, в чем проблема?