Техподдержка. Что еще может потребоваться? Что еще мы можем поймать изнутри 1С?

[Arbuz]

Есть вот здесь.

[Злоп]

Версия 1.0.0.11 2024.10.07
.
- исправлены грамматические ошибки наименования функций и реквизитов
- исправлена ошибка двойного клика на таблице ВК (никаких действий не выполнялось, адресация к несуществующей процедуре)
- исправлена нумерация ВК в таблице ВК (нумеровалось с нуля)
- заголовки колонок таблицы ВК приведены к "человеческому" виду ;-)
.
Версия Formex зашита все еще пока 198...

[Злоп]

Версия 1.0.0.12 2024.10.07
- при клике на таблице ВК открывается проводник с позиционированием на файле

[MWW_Ruza]

Спасите-Помогите:



Что-то так... Разбираться, что ему не нравится, так-себе идея...
У тебя это быстрее получится

[MWW_Ruza]

Возможно, русское имя директории базы - ?

[Злоп]

Спасите-Помогите:
Что-то так... Разбираться, что ему не нравится, так-себе идея...
У тебя это быстрее получится

Впихни попробуй вывод ObjItem и Size на выделенной строке типа

Ну и в диспетчере устройств посмотреть что там за неопознанное дисковое устроство наверное  можеть быть возможно как бы валандается..?

[Злоп]

Опа, и у меня тоже ломается, странно.. Не ломалось же...

[Злоп]

Непонятно, что это было...
Версия 1.0.0.13 2024.10.07
Поправленная, вроде все работает.

[MWW_Ruza]

Кроме номера версии ничего не изменилось. Ошибка та-же.

Впихни попробуй вывод ObjItem и Size на выделенной строке типа

Слова какие-то ругательные... Где такое? Напиши, что куда добавить/заменить...

Ну и в диспетчере устройств посмотреть что там за неопознанное дисковое устроство наверное  можеть быть возможно как бы валандается..?

Да нет там ничего особенного... 2 самсунга терабайтника SSD, вестерн HDD, и картридкр, пустой в данный момент... Может на него так реагирует? Типа, вроде как есть диск, но его нет - ?

[Arbuz]

Это точно картридер и Size = GetProperty(objItem,""Size"") возвращает NUL, в терминах VBA это Nothing. Необходимо либо сделать проверку, либо объявить переменную Size как числовую (Integer там или Long)

[Злоп]

Это точно картридер и Size = GetProperty(objItem,""Size"") возвращает NUL, в терминах VBA это Nothing. Необходимо либо сделать проверку, либо объявить переменную Size как числовую (Integer там или Long)

У меня тоже ругалось. Упростил запрос до  вывода только size - все норм. Возвращаю полный запрос - ошибка. В итоге скопирастил запрос из какой о предыдущей версии обработки с все норм в 13 версии.

[Arbuz]

Нужно либо добавить в начало процедуры

Код Выделить Развернуть

Dim Size As Double 'может Integer или Long

либо после строки

Код Выделить Развернуть

Size = GetProperty(objItem,""Size"")

добавить условие

Код Выделить Развернуть

If Size Is Nothing Then
    Size = 0
End If

[MWW_Ruza]

If Size Is Nothing Then     Size = 0 End If

Да, это видимо работает.
Но, теперь какой-то объект где-то не видит...
Судя по всему, в этой-же функции:

[Злоп]

Это он на эту вставку ругается
If Size Is Nothing Then
    Size = 0
End If

где то сайз - число, а где-то ничего.
сравнение с ничего по-видиому допустимо только для объектов

[Злоп]

попробуй вот так
If Not IsNumeric(Size) Then Size = 0 End If