The short answer is to convert that ADO VBS code to KiX code and use it instead of TranslateNAme if that is good enough for you.
_________________________
Home page: http://www.kixhelp.com/hb/