ExecCommand() что неверно

есть DHTMLEdit (переменная m_text) компонент.
Функция ExecCommand() работает четко в случае если указатель на структуру VARIANT равен нулю.

Однако такой вот вариант не выдает ошибки пока не выделишь текст и не нажмешь кнопку в которой такой вот код:

CString link;
qwe="www.site.ru";
VARIANT va;
VariantInit(&va);
va.vt == VT_BSTR;
va.bstrVal = link.AllocSysString();
m_text.ExecCommand(DECMD_HYPERLINK,OLECMDEXECOPT_DONTPROMPTUSER, &va);

Что неверно?