Массовое изменение пути к фото товара

Массовое изменение пути к фото товара

Сообщение m2405 » Пт окт 07, 2016 4:21 pm

Файлы к фото хранятся на
C:\Predprinimatel\фото
Хочу поменять на
D:\Dropbox\Predprinimatel\фото

Возможно ли сделать это массово?
m2405
 
Сообщения: 46
Зарегистрирован: Пн мар 28, 2011 6:00 am

Re: Массовое изменение пути к фото товара

Сообщение dmitry » Пт окт 07, 2016 9:09 pm

1. Чтобы не бояться ошибиться, в Сервис/Обслуживание/Профилактика_БД создать резервную копию - "Создать сейчас".

2. Скопировать текст ниже.
В программе нажать клавиши Ctrl+F10.
Вставить текст, нажать ОК.

Const F1 As String = "C:\Predprinimatel\фото"
Const F2 As String = "D:\Dropbox\Predprinimatel\фото"

Dim R As Predpr.TableSQL, Str As String
R = DB.OpenRecordset("SELECT Val_6 FROM ArticleParams WHERE Val_6 Is Not Null")
Do While Not R.EOF
Str = R("Val_6")
If Str Like F1 & "*" Then
R.Edit()
R("Val_6") = Str.Replace(F1, F2)
R.Update()
End If
R.MoveNext()
Loop
R.Close()
dmitry
Разработчик
 
Сообщения: 3724
Зарегистрирован: Чт янв 27, 2011 3:43 pm

Re: Массовое изменение пути к фото товара

Сообщение m2405 » Сб окт 08, 2016 8:39 am

Все получилось, супер. Теперь не надо лишних телодвижений на двух компьтерах.
m2405
 
Сообщения: 46
Зарегистрирован: Пн мар 28, 2011 6:00 am

Re: Массовое изменение пути к фото товара

Сообщение zwz » Пт ноя 04, 2016 1:12 pm

Скажите пожалуйста, как сделать аналогично, только фото размещено в папках по категориям?
zwz
 
Сообщения: 3
Зарегистрирован: Пт ноя 04, 2016 1:08 pm

Re: Массовое изменение пути к фото товара

Сообщение dmitry » Пт ноя 04, 2016 2:31 pm

Напишите на примере одного файла - какой путь сейчас, какой будет потом.
dmitry
Разработчик
 
Сообщения: 3724
Зарегистрирован: Чт янв 27, 2011 3:43 pm

Re: Массовое изменение пути к фото товара

Сообщение zwz » Пт ноя 04, 2016 7:06 pm

Простите пожалуйста, в первый раз указал не верные пути работа в ночные часы дает о себе знать..

Сейчас:
C:\Users\Николай\Documents\site_handloom\img\cat_1
C:\Users\Николай\Documents\site_handloom\img\cat_2
C:\Users\Николай\Documents\site_handloom\img\cat_3
...

Хотелось бы так:
C:\Users\Николай\Dropbox\site_handloom\img\cat_1
C:\Users\Николай\Dropbox\site_handloom\img\cat_2
C:\Users\Николай\Dropbox\site_handloom\img\cat_3
...

Если можно.
zwz
 
Сообщения: 3
Зарегистрирован: Пт ноя 04, 2016 1:08 pm

Re: Массовое изменение пути к фото товара

Сообщение dmitry » Сб ноя 05, 2016 6:28 am

Не забыть про резервную копию, потом Ctrl+F10 и т.д.

Const F1 As String = "Documents"
Const F2 As String = "Dropbox"
Dim R As Predpr.TableSQL, Str As String
R = DB.OpenRecordset("SELECT Val_6 FROM ArticleParams WHERE Val_6 Is Not Null")
Do While Not R.EOF
Str = R("Val_6")
R.Edit()
R("Val_6") = Str.Replace(F1, F2)
R.Update()
R.MoveNext()
Loop
R.Close()
dmitry
Разработчик
 
Сообщения: 3724
Зарегистрирован: Чт янв 27, 2011 3:43 pm

Re: Массовое изменение пути к фото товара

Сообщение zwz » Сб ноя 05, 2016 7:36 am

Спасибо!
zwz
 
Сообщения: 3
Зарегистрирован: Пт ноя 04, 2016 1:08 pm

Re: Массовое изменение пути к фото товара

Сообщение Zamok » Пт мар 24, 2017 5:32 am

Доброго времени суток. А можно ли сделать например одно фото для большого количества товара?? Типа выделить нужный товар и задать один рисунок. Спасибо
Zamok
 
Сообщения: 138
Зарегистрирован: Вт ноя 26, 2013 6:43 pm

Re: Массовое изменение пути к фото товара

Сообщение vadim » Сб мар 25, 2017 11:37 am

Как массово поменять код товара при выгрузке?
vadim
 
Сообщения: 372
Зарегистрирован: Пт янв 28, 2011 12:41 pm

Re: Массовое изменение пути к фото товара

Сообщение dmitry » Сб мар 25, 2017 2:14 pm

vadim писал(а):Как массово поменять код товара при выгрузке?

Поменять по какому принципу? При выгрузке откуда куда (может быть наоборот при импорте, например из Excel)?
dmitry
Разработчик
 
Сообщения: 3724
Зарегистрирован: Чт янв 27, 2011 3:43 pm

Re: Массовое изменение пути к фото товара

Сообщение sealabs » Чт май 11, 2017 12:59 pm

Возникает ошибка - Таблица не имеет первичного ключа. Источник данных таблицы: SELECT Val_6 FROM ArticleParams WHERE Val_6 Is Not Null. Это лечится ? Спасибо!
sealabs
 
Сообщения: 57
Зарегистрирован: Ср июн 08, 2011 2:51 pm

Re: Массовое изменение пути к фото товара

Сообщение sealabs » Чт май 11, 2017 5:50 pm

Не помогло. возможно из-за того что у меня папка назначения - сетевой путь. Хотя по коду ошибки не похоже.
sealabs
 
Сообщения: 57
Зарегистрирован: Ср июн 08, 2011 2:51 pm

Re: Массовое изменение пути к фото товара

Сообщение dmitry » Пт май 12, 2017 4:05 am

Да, прошу прощения, для SQL версии:

Const F1 As String = "Documents"
Const F2 As String = "Dropbox"
Dim R As Predpr.TableSQL, Str As String, TbStr As String
TbStr = "SELECT Val_6, counter FROM ArticleParams WHERE Val_6 Is Not Null"
R = DB.OpenRecordset(TbStr, , True, "ArticleParams")
Do While Not R.EOF
Str = R("Val_6")
R.Edit()
R("Val_6") = Str.Replace(F1, F2)
R.Update()
R.MoveNext()
Loop
R.Close()
dmitry
Разработчик
 
Сообщения: 3724
Зарегистрирован: Чт янв 27, 2011 3:43 pm

Re: Массовое изменение пути к фото товара

Сообщение sealabs » Пт май 12, 2017 6:57 am

Да, это сработало. Спасибо!
sealabs
 
Сообщения: 57
Зарегистрирован: Ср июн 08, 2011 2:51 pm


Вернуться в Использование программы

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 2

cron