Так выглядит функция вывода в ворд проблема в том, что вывод не всегда работает а отправляет ворд в процессы и не открывает просто зависает.
function ButtonOnClick(Control) {
//TODO
var TaskDataset = Services.GetNewItemByUSI('ds_Contract');
TaskDataset.Open();
var FileName = 'c:\\1\\eplay.doc';
var Word = new ActiveXObject('Word.Application');
Word.Documents.Open(FileName);
var Selection = new Object();
Selection = Word.Selection;
var cid = edtCustomerName.datafield.Value;
TaskDataset.Close();
WordReplaceMark(Selection,'>',cid);
Word.Visible = true;
}

Нравится

4 комментария

Николай, несколько уточняющих вопросов:
1. Зачем Вы открываете Dataset, если нигде не используете?
Попробуйте удалить строки:
var TaskDataset = Services.GetNewItemByUSI('ds_Contract');
TaskDataset.Open();
TaskDataset.Close();

2.Попробуйте заменить
var Word = new ActiveXObject('Word.Application');
на
var Word = System.EmptyValue;
var Word = new ActiveXObject('Word.Application');

Если ошибка будет и дальше воспроизводиться, необходимо провести Debug и посмотреть, на какой строке "зависает" программа.

function ButtonOnClick(Control) {
var FileName = 'c:\\1\\eplay.doc';
var Word = System.EmptyValue;
var Word = new ActiveXObject('Word.Application');
Word.Documents.Open(FileName);
var Selection = new Object();
Selection = Word.Selection;
var eplay1 =edtContractTitle.datafield.Value;
WordReplaceMark(Selection,'<>',eplay1);
Word.Visible = true;
}
Ошибка : Предполагается наличие объекта.

получилось

Николай, рад, что удалось решить проблему.
Приятной работы!

Показать все комментарии