|
|
|
добавление записи
|
|||
|---|---|---|---|
|
#18+
нужно добавить фото в таблицу ********************** SELECT tovar LOCATE FOR atov=otbatov.atov myfoto=GETPICT() IF !EMPTY(myfoto) AND FILE((myfoto)) SELECT user replace tovar.foto WITH FILETOSTR(myfoto) = TABLEUPDATE(.T.) thisform.image1.PictureVal= otbatov.foto thisform.image1.visible= .T. thisform.Refresh() ENDIF DO \data\qprrr\otbatov.qpr thisform.Refresh() ***************** Выводит ошибку:"Для функции требуется режим буферизации строк или таблиц" Подскажите , если возможно включить этот режим, токак. Если невозможно, то как выйти из ситуации. Заранее, благодарен, Роман. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 06.07.2008, 21:46 |
|
||
|
добавление записи
|
|||
|---|---|---|---|
|
#18+
Немного подправил: SELECT tovar LOCATE FOR atov=otbatov.atov myfoto=GETPICT() IF !EMPTY(myfoto) AND FILE((myfoto)) SELECT tovar replace tovar.foto WITH FILETOSTR(myfoto) *SELECT user = TABLEUPDATE(.T.) *DO \data\qprrr\otbatov.qpr thisform.image1.PictureVal= tovar.foto thisform.image1.visible= .T. thisform.Refresh() ENDIF DO \data\qprrr\otbatov.qpr thisform.Refresh() Так более правильно, но теперь хоть и работает все , но ошибки не исчезли: Нажимаю на кнопку "Добавить", открывается окно для выбора файла - выбираю фото появляется ошибка: "Для функции требуется режим буферизации строк или таблиц"(Recjrd details in error log file?) отвечаю Да. Затем еще одно сообщение "Continue executing program?" отвечаю Да. И несмотря на ошибка фото добавляется. Может кто знает , что за Х...Ь !??? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 06.07.2008, 22:15 |
|
||
|
добавление записи
|
|||
|---|---|---|---|
|
#18+
Такя-же ерунда и сдесь: SELECT tovar LOCATE FOR tovar.atov==otbatov.atov replace tovar.foto WITH '' = TABLEUPDATE(.T.) Thisform.Image1.PictureVal = "" Thisform.Image1.Visible= .F. DO \data\qprrr\otbatov.qpr Thisform.Refresh() Ошибки теже. Что-же делать? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 06.07.2008, 22:37 |
|
||
|
добавление записи
|
|||
|---|---|---|---|
|
#18+
а зачем нам TABLEUPDATE? нет, нам кунец не нужен (с) :) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 06.07.2008, 23:31 |
|
||
|
добавление записи
|
|||
|---|---|---|---|
|
#18+
CTAC-KOа зачем нам TABLEUPDATE? нет, нам кунец не нужен (с) :) Поясни. Это шутка или ... ? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 06.07.2008, 23:40 |
|
||
|
добавление записи
|
|||
|---|---|---|---|
|
#18+
CTAC-KOа зачем нам TABLEUPDATE? нет, нам кунец не нужен (с) :) Блин. Точно. В функции удалить фото. все супер. ОШИБОК НЕТ. А при добавлении фото вот что(в прекрепленном файле) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 06.07.2008, 23:56 |
|
||
|
добавление записи
|
|||
|---|---|---|---|
|
#18+
а это уже по-сложнее будет... т.к. в принципе по разным причинам может происходить. Но если всегда четко в одном и том же месте, тогда надо разбираться в коде, искать с какой строки падение. ну и в целом код - в студию. а вообще может произойти из-за ошибки с фото - к примеру слишком большая по размеру или с ее загрузкой в бд какие-то проблемы. т.е. разбираццо в чем причина конкретно ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 07.07.2008, 00:33 |
|
||
|
добавление записи
|
|||
|---|---|---|---|
|
#18+
А при первом варианте. Почему возникает ошибка? Может можно чтото сбелать? SELECT tovar LOCATE FOR atov=otbatov.atov myfoto=GETPICT() IF !EMPTY(myfoto) AND FILE((myfoto)) SELECT user replace tovar.foto WITH FILETOSTR(myfoto) = TABLEUPDATE(.T.) thisform.image1.PictureVal= otbatov.foto thisform.image1.visible= .T. thisform.Refresh() ENDIF DO \data\qprrr\otbatov.qpr thisform.Refresh() ***************** Выводит ошибку:"Для функции требуется режим буферизации строк или таблиц" ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 07.07.2008, 00:38 |
|
||
|
добавление записи
|
|||
|---|---|---|---|
|
#18+
Romario_rusА при первом варианте. Почему возникает ошибка? Может можно чтото сбелать? SELECT tovar LOCATE FOR atov=otbatov.atov myfoto=GETPICT() IF !EMPTY(myfoto) AND FILE((myfoto)) SELECT user replace tovar.foto WITH FILETOSTR(myfoto) = TABLEUPDATE(.T.) thisform.image1.PictureVal= otbatov.foto thisform.image1.visible= .T. thisform.Refresh() ENDIF DO \data\qprrr\otbatov.qpr thisform.Refresh() ***************** Выводит ошибку:"Для функции требуется режим буферизации строк или таблиц" Все нормально работает - фото добавляется , только ошибка всплывает. Что может быть? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 07.07.2008, 00:39 |
|
||
|
добавление записи
|
|||
|---|---|---|---|
|
#18+
дык указывал уже ш - в TABLEUPDATE, его там не надо и похоже в Вашей программе оно вообще нигде не надо ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 07.07.2008, 13:25 |
|
||
|
добавление записи
|
|||
|---|---|---|---|
|
#18+
У баз базы данных локально расположены, т.е. вместе с прогой? Если так, то для обновления данных достаточно replace, и тогда TABLEUPDATE не нужен. Он нужен для такой хитрой организации обновления бд - когда юзер данные в отображаемой таблице меняет, то реально в реальной дб ничего не поменяется до тех пор, пока не будет выполнен TABLEUPDATE. Т.к. при этом обычно работают не с бд напрямую (как предполагаю у Вас), а лишь с его представлением в виде курсора, изменения в котором не отражаются на бд-источнике. Чаще всего при этом используется технология клиент-сервер, когда у пользователя на компе имеется только программа, а все данные хранит и обрабатывает сервер (типа SQL), который обычно другой комп в сети. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 07.07.2008, 13:38 |
|
||
|
добавление записи
|
|||
|---|---|---|---|
|
#18+
SELECT tovar LOCATE FOR atov=otbatov.atov myfoto=GETPICT() IF !EMPTY(myfoto) AND FILE((myfoto)) SELECT user replace tovar.foto WITH FILETOSTR(myfoto) = TABLEUPDATE(.T.) thisform.image1.PictureVal= otbatov.foto thisform.image1.visible= .T. thisform.Refresh() ENDIF DO \data\qprrr\otbatov.qpr thisform.Refresh() CTAC-KOдык указывал уже ш - в TABLEUPDATE, его там не надо и похоже в Вашей программе оно вообще нигде не надо Не могу понять, почему включая в программу = TABLEUPDATE(.T.) фото добавляется, но с возникновением ошибки :"Для функции требуется режим буферизации строк или таблиц" А при удалении из кода = TABLEUPDATE(.T.) (смотрите вложенный файл) Как выйти из положения, может кто знает. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 07.07.2008, 14:47 |
|
||
|
добавление записи
|
|||
|---|---|---|---|
|
#18+
Romario_rusSELECT tovar LOCATE FOR atov=otbatov.atov myfoto=GETPICT() IF !EMPTY(myfoto) AND FILE((myfoto)) SELECT user replace tovar.foto WITH FILETOSTR(myfoto) = TABLEUPDATE(.T.) thisform.image1.PictureVal= otbatov.foto thisform.image1.visible= .T. thisform.Refresh() ENDIF DO \data\qprrr\otbatov.qpr thisform.Refresh() CTAC-KOдык указывал уже ш - в TABLEUPDATE, его там не надо и похоже в Вашей программе оно вообще нигде не надо Не могу понять, почему включая в программу = TABLEUPDATE(.T.) фото добавляется, но с возникновением ошибки :"Для функции требуется режим буферизации строк или таблиц" А при удалении из кода = TABLEUPDATE(.T.) (смотрите вложенный файл) Как выйти из положения, может кто знает. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 07.07.2008, 15:01 |
|
||
|
добавление записи
|
|||
|---|---|---|---|
|
#18+
Кажется разобрался. Всем спасибо. SELECT tovar LOCATE FOR atov=otbatov.atov myfoto=GETPICT() IF !EMPTY(myfoto) AND FILE((myfoto)) replace tovar.foto WITH FILETOSTR(myfoto) IN tovar DO \data\qprrr\otbatov.qpr thisform.image1.PictureVal= tovar.foto thisform.image1.visible= .T. thisform.Refresh() ENDIF ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 07.07.2008, 15:41 |
|
||
|
|

start [/forum/topic.php?fid=41&tid=1587575]: |
0ms |
get settings: |
5ms |
get forum list: |
14ms |
check forum access: |
2ms |
check topic access: |
2ms |
track hit: |
24ms |
get topic data: |
8ms |
get forum data: |
3ms |
get page messages: |
45ms |
get tp. blocked users: |
1ms |
| others: | 189ms |
| total: | 293ms |

| 0 / 0 |
