有一段调用activex动态库的vb代码。求高人翻译成vc代码
vb代码如下:
'Access the main XConvert object (TradosTagFile)
Dim ttf As New XConvert.TradosTagFile
'Use the Open method to open the source HTML document,
'specifying the default DTD Settings file for HTML 4
'and English (U.S.) as encoding (1033).
ttf.Open SourceDoc, "C:\Documents and Settings\All Users\Application Data\SDL International\Filters\Word_1_0_0_0.xml", 1033
'Save the file in raw bilingual TRADOStag format
ttf.SaveAsTradosTagRaw BilingualDoc
代码的功能是调用翻译软件trados自带的动态连接库实现ttx文件格式转换的功能。我曾经试着使用在vc里面使用CoCreateInstance等com函数进行调用一直没有成功。所以希望高手帮忙写一下正确的调用方法。