![]() |
|
ТекЛист.Cells | ☑ | ||
---|---|---|---|---|
0
Генетический мусор
28.04.12
✎
11:45
|
Доброго времени суток. 1С 8.1., самописка, обработка регламентным задание падает на куске кода на стороне сервера
ТекКод = СокрЛП(ТекЛист.Cells(НомерСтроки,Код).Value); на клиенте работает, заранее благодарен если кто подскажет в чем дело |
|||
1
Wobland
28.04.12
✎
11:46
|
ексель стоит же на сервере?
|
|||
2
Генетический мусор
28.04.12
✎
11:47
|
(1) произошла исключительная ситуация (0x800a03ec), ексель на серваке стоит, единственно 2003 на сервере, у меня на клиенте 2007
|
|||
3
Wobland
28.04.12
✎
11:48
|
(2) а 2003й умеет 2007й понимать?
|
|||
4
Рэйв
28.04.12
✎
11:49
|
исключительная ситуация обычно значит, что кто-то или что-то юзает ресурс. Посмотри в памяти сервера и поскидывай все эксели
|
|||
5
Генетический мусор
28.04.12
✎
12:17
|
(4) этот файлик никто не юзает, а сам то эксель усиленно:), помимо восьмерки есть семерка, печатные формы там как раз через эксель штампуются пачками
(3) формат этот 2003 понимает ВремКаталог = КаталогВременныхФайлов(); ПроксиСервер = Новый ИнтернетПрокси(ложь); ПроксиСервер.Пользователь = "***"; ПроксиСервер.Пароль = "***"; ПроксиСервер.Установить("HTTP","***.***.***.***", "****"); ТекСоед = Новый HTTPСоединение("www.***",,,,ПроксиСервер); ТекСоед.Получить("***",ВремКаталог + "***"); Архив = Новый ЧтениеZipФайла(ВремКаталог + "***"); Архив.ИзвлечьВсе(ВремКаталог); Екс = Новый COMОбъект("Excel.Application"); Попытка Екс.Workbooks.Open(ВремКаталог+"\***.xls"); ТекЛист=Екс.WorkSheets(1); Реквизит5=ТекЛист.UsedRange.SpecialCells(11).Row; //Реквизит5=24; //Екс.Visible = 1; Исключение Екс.Application.Quit(); //Сообщить(ОписаниеОшибки()); КонецПопытки; ТаблицаПоТоварам = Новый ТаблицаЗначений; *** Запрос = Новый Запрос; Запрос.Текст = "*** |"; КонСтрока = ТекЛист.Cells(1,1).SpecialCells(11).Row; Для НомерСтроки = 9 По КонСтрока Цикл ТекКод = ТекЛист.Cells(НомерСтроки,Код).Value; //тут все умерло, на клиенте нормально КонецЦикла; |
|||
6
Wobland
28.04.12
✎
12:19
|
соединяешься и файл качаешь без попытки?
|
|||
7
Wobland
28.04.12
✎
12:20
|
Архив.ИзвлечьВсе(ВремКаталог); как работает? может там кем-то занятый файл есть, а оно не перезависывает?
|
|||
8
Генетический мусор
28.04.12
✎
12:20
|
(6) не в этом проблема, файл качаю, во временную папку он попадает...отлажу - вставлю попытку:)
|
|||
9
Генетический мусор
28.04.12
✎
12:22
|
(7)а на клиенте то почему работает?
|
|||
10
Wobland
28.04.12
✎
12:31
|
(9) да хто б его знал.. другая машина
|
|||
11
ptrtss
28.04.12
✎
12:32
|
В терминале работает?
|
|||
12
Генетический мусор
28.04.12
✎
12:44
|
я дебил! перменная "Код" не инициализируется на сервере, т.к. интерфейсная часть не доступна серверному процессу.
я дебил! |
|||
13
Wobland
28.04.12
✎
12:45
|
(12) поздравляю, сэр ;)
|
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |