Сделал так:
ADODB_Command.Parameters.Append(ADODB_Command.CreateParameter("@MessageData", 200, 2, Pow(2, 30)));
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство. Фредерик Брукс-младший