ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Отчетные системы [игнор отключен] [закрыт для гостей] / Картинки в RS2005
8 сообщений из 8, страница 1 из 1
Картинки в RS2005
    #36137533
minya13_85
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
minya13_85
Участник
Создал отчет по картинкам. Он по артикулу цепляет картинку из папки и показывает её. В папке, имя картинки совпадает с наименованием артикула. Но таких папок несколько. Как сделать так, если нету таких картинок соответствующих артикулу в одной папке, смотреть в другой папке.

у меня в value прописано условие:
Код: plaintext
  ="file://pictures/Images1/" & Fields!Artikul.Value & ".jpg"

т.е. есть ли такая функция встроенная в RS, которая возвращает 0 или 1 в зависимости, нашлась ли картинка или нет. Что-то вроде этого:

Код: plaintext
switch(Функция("file://pictures/Images1/" & Fields!Artikul.Value & ".jpg")= 1 ,"file://pictures/Images1/" & Fields!Artikul.Value & ".jpg",Функция("file://pictures/Images2/" & Fields!Artikul.Value & ".jpg")= 1 ,"file://pictures/Images2/" & Fields!Artikul.Value & ".jpg")

Ну или какие есть еще варианты?
...
Рейтинг: 0 / 0
11.08.2009, 16:15
| Ответить | Цитировать | Написать  
Картинки в RS2005
    #36137585
buven
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
buven
Участник
А файлов много?
Функцию то и самому можно написать, но при вот таком вот ее использовании, ради каждой картинки лазить по всем папкам... производительность хромать будет порядочно, имхо...

Проводить жизнь в ожидании мессии, который придёт и спасёт мир, всё-равно, что ждать палку в тетрисе.
Даже если и появится, то ты к тому времени наберёшь такую гору дерьма, что те будет уже абсолютно пох... :)
...
Рейтинг: 0 / 0
11.08.2009, 16:32
| Ответить | Цитировать | Написать  
Картинки в RS2005
    #36137619
minya13_85
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
minya13_85
Участник
buvenА файлов много?
Функцию то и самому можно написать, но при вот таком вот ее использовании, ради каждой картинки лазить по всем папкам... производительность хромать будет порядочно, имхо...

Проводить жизнь в ожидании мессии, который придёт и спасёт мир, всё-равно, что ждать палку в тетрисе.
Даже если и появится, то ты к тому времени наберёшь такую гору дерьма, что те будет уже абсолютно пох... :) Папки всего две на самом деле. а в папках очень много файлов... даже не знаю сколько,в первой порядка 20 тыщ наверное, а во второй всего лишь 100 где-то. Если использовать одну папку, первую допустим, где 20 тыщ наименований, то выполняется отчет не так уж и долго, меньше минуты наверное. Это средствами RS2005. Если в value просто путь к папке указать. А как в RS2005, написать свою функцию??
...
Рейтинг: 0 / 0
11.08.2009, 16:41
| Ответить | Цитировать | Написать  
Картинки в RS2005
    #36137670
buven
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
buven
Участник
Report->Report Properties->Code

В окне пишим любой код на VB.

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
public  function  myfunc( ByVal path as string,ByVal FileName as string) as Object

//что то что нам нужно

if (FileExists(FileName))// не помню точно, но поему в VB такая штука есть
   {
       ......
   }
end function

сама функция вызывается так

Код: plaintext
 code.myfunc("file://pictures/Images1/",Fields!Artikul.Value)


Проводить жизнь в ожидании мессии, который придёт и спасёт мир, всё-равно, что ждать палку в тетрисе.
Даже если и появится, то ты к тому времени наберёшь такую гору дерьма, что те будет уже абсолютно пох... :)
...
Рейтинг: 0 / 0
11.08.2009, 16:56
| Ответить | Цитировать | Написать  
Картинки в RS2005
    #36137698
buven
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
buven
Участник
Ну и естественно в MSDN по ключевому слову Custom Code в разделе RS.

Проводить жизнь в ожидании мессии, который придёт и спасёт мир, всё-равно, что ждать палку в тетрисе.
Даже если и появится, то ты к тому времени наберёшь такую гору дерьма, что те будет уже абсолютно пох... :)
...
Рейтинг: 0 / 0
11.08.2009, 17:03
| Ответить | Цитировать | Написать  
Картинки в RS2005
    #36137726
minya13_85
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
minya13_85
Участник
buvenНу и естественно в MSDN по ключевому слову Custom Code в разделе RS.

Проводить жизнь в ожидании мессии, который придёт и спасёт мир, всё-равно, что ждать палку в тетрисе.
Даже если и появится, то ты к тому времени наберёшь такую гору дерьма, что те будет уже абсолютно пох... :) что-то не нашел..((( как на VB эту функцию написать, ну или хотя бы есть пример похожий?
...
Рейтинг: 0 / 0
11.08.2009, 17:12
| Ответить | Цитировать | Написать  
Картинки в RS2005
    #36137898
buven
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
buven
Участник
MSDN

А вообще гугл еще никто не отменял, но так и быть:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
Public Function FileExists(ByVal path As String, ByVal FileName As String) As Boolean

        If IO.File.Exists(path + FileName + ".jpg") Then
            Return True
        Else : Return False
        End If

    End Function

ну и как то так будет выглядеть вызов

Код: plaintext
1.
=switch(code.FileExists("c:\pictures\images1\",Fields!Artikul.Value),"file://pictures/Images1/" & Fields!Artikul.Value & ".jpg",
code.FileExists("c:\pictures\images2\",Fields!Artikul.Value),"file://pictures/Images2/" & Fields!Artikul.Value & ".jpg")

Функция под вашу конкретную задачу с картинками. Ест ьсмысл ее переписать для любых форматов файлов. Оставлю это вам.

Способ мне не нравится, т.к. функция будет вызываться 20000 раз, посему пиво с вас требовать не буду:)

P.S. Почему в 1 папку все нельзя слить?

Проводить жизнь в ожидании мессии, который придёт и спасёт мир, всё-равно, что ждать палку в тетрисе.
Даже если и появится, то ты к тому времени наберёшь такую гору дерьма, что те будет уже абсолютно пох... :)
...
Рейтинг: 0 / 0
11.08.2009, 18:01
| Ответить | Цитировать | Написать  
Картинки в RS2005
    #36138015
incold
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
incold
Участник
если никак не обойтись одной папкой

то я бы написал процедуру, которая по расписанию (или событию)

заполняет простую табличку из двух полей Artikul Path

а отчет уже на готовых данных будет работать

Возможно расхождение между актуальным путем и последним обновлением в базе,
но это аргумент в пользу наведения порядка.

Картинки выкладывать в определенное время
и/или
после обновления картинок запускать процедуру
и/или
все картинки забираются атоматом из какой-то предвартиельной папки
и сразу же обновляется таблица с актуальным хранением
...
Рейтинг: 0 / 0
11.08.2009, 18:59
| Ответить | Цитировать | Написать  
8 сообщений из 8, страница 1 из 1
Форумы / Отчетные системы [игнор отключен] [закрыт для гостей] / Картинки в RS2005
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=31&msg=36137726&tid=1536006]:
 0ms
get settings:
 5ms
get forum list:
 24ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 181ms
get topic data:
 10ms
get forum data:
 2ms
get page messages:
 59ms
get tp. blocked users:
 1ms
others: 233ms
total:  521ms
созд. / загр.: 521ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]