Список форумов www.integro.ru www.integro.ru
ЦСИ ИНТЕГРО
 
 FAQFAQ   ПоискПоиск   ПользователиПользователи   ГруппыГруппы   РегистрацияРегистрация 
 ПрофильПрофиль   Войти и проверить личные сообщенияВойти и проверить личные сообщения   ВходВход 

Ошибка "Object doesn't support this property or method"

 
Начать новую тему   Ответить на тему    Список форумов www.integro.ru -> Вопросы специалистов по адаптации системы
Предыдущая тема :: Следующая тема  
Автор Сообщение
Sever



Зарегистрирован: 09.11.2009
Сообщения: 6
Откуда: Екатеринбург, ФГУП "Уралгеоинформ"

СообщениеДобавлено: Пн 29 Мар 2010 16:06    Заголовок сообщения: Ошибка "Object doesn't support this property or method" Ответить с цитатой

Доброе время суток.
Возникла проблема с приложением "инмета" ( версия 1.9.97.0 )
Пусть в некоторм классе есть код на vb-скрипте:

Код:
Dim aDataService, aObject
Set aDataService = CreateObject("InMetaCR.InMetaDataServiceClient")
aDataService.ServerURL = InMeta.AppBaseURL
Set aObject = aDataService.GetObjectInfo(ClassName, anID, FieldName)


При вызове функции GetObjectInfo() возникает следующая ошибка:

Цитата:

---------------------------
Ошибка загрузки XML: <?xml version="1.0" encoding="windows-1251"?>

<error>
<number>438</number>
<source>Microsoft VBScript runtime error</source>
<description>Object doesn't support this property or method: 'XStrUtils.XStrUtils'</description>
<call-context-html>
<![CDATA[
<b>Запрос информации по объектам (QueryHandler - objects)</b>
<blockquote>
<b>Класс (class)</b>: General/LetterTheme<br>
<b>Свойства (properties)</b>: Code<br>
<b>Представление (view)</b>: {{null}}<br>
<b>Начать с (start)</b>: 1<br>
<b>Количество (count)</b>: -1<br>
<b>Сортировать по (order-by)</b>:
</blockquote>
<b>Представление объекта</b>:
<blockquote>
<pre><font color=red>
<b>Не найдено представление объекта: &quot;{{null}}&quot;</b>
</font></pre>
</blockquote>
<b>Текст программы</b>:
<blockquote><pre>
function GetSQLCountText(ByVal sSQLSourceText)
dim i, s
s = sSQLSourceText
i = InStr(UCase(s), &quot;ORDER BY&quot;)
If i &gt; 0 Then
s = Mid(s, 1, i - 1)
GetSQLCountText = &quot;SELECT Count(DISTINCT [idProperty])


Аналогичные ошибки возникают везде, где встречается функция "GetObjectInfo" ( в том числе и в формах поиска ).

Примечательно, что на другой машине, где установлено то же самое приложение, аналогичных ошибок не возникает. Все файлы полностью совпадают.
Структура баз даных - тоже. В порядке эксперимента пробовали подключать экземпляры приложения к БД с другой машины, но результата это не дало - изменений в работе приложений не произошло

Подскажите, в чем может быть причина, и как это можно исправить ( желательно, не переустанавливая приложение )
Заранее спасибо
Вернуться к началу
Посмотреть профиль Отправить личное сообщение
Показать сообщения:   
Начать новую тему   Ответить на тему    Список форумов www.integro.ru -> Вопросы специалистов по адаптации системы Часовой пояс: GMT + 5
Страница 1 из 1

 
Перейти:  
Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете голосовать в опросах
Вы не можете добавлять приложения в этом форуме
Вы можете скачивать файлы в этом форуме


© phpBB Group
Русская поддержка phpBB