|
Как отредактировать поле в DBF файле
| ☑ |
0
VBMADD
28.04.18
✎
14:42
|
Привет братьям по разуму.
Подскажите пож-ста как через ADODB при помощи запроса отредактировать поле в DBF файле. Какой либо опыт в данном вопросе у меня отсутствует
На этом примере:
//==================================================
Процедура ВыполнитьADODB()
//==================================================
Путь = "c:\Base";
ИмяТаблицы = "tov.dbf";
Подключение = Новый COMОбъект("ADODB.Connection");
Стринг = "Provider=Microsoft.Jet.OLEDB.4.0;" + "Data Source=""" + Путь + """;" + "Extended Properties=""DBASE IV;"";";
Попытка
Подключение.Open(Стринг);
Исключение
Сообщить ("Проблемы с подключением" );
Сообщить(ОписаниеОшибки());
Возврат;
КонецПопытки;
Команда = Новый COMОбъект("ADODB.Command");
Команда.ActiveConnection = Подключение;
ТекстЗапроса = "SELECT CODE,NAME.PRICE FROM tov.dbf WHERE CODE='12345'";
Команда.CommandText = ТекстЗапроса;
Команда.CommandType = 1;
Запрос = Новый COMОбъект("ADODB.RecordSet");
Запрос = Команда.Execute();
// Далее нужно поменять значение в поле PRICE файла tov.dbf и сохранить измененный файл.
КонецПроцедуры
Спасибо всем, кто откликнулся.
|
|
1
VBMADD
28.04.18
✎
15:22
|
Никто не знает как помочь бедному крестьянину в этом вопросе?...
|
|
2
Garykom
гуру
28.04.18
✎
15:24
|
"adodb alter table"
|
|
3
Garykom
гуру
28.04.18
✎
15:26
|
тьфу тебе просто "update" нужен
|
|
4
VBMADD
28.04.18
✎
16:07
|
(3) Спасибо, посмотрел,...но мне трудно понять что там написано. Браток, подмогни, мне бы просто добавить нужный код в приведенный выше пример сам не смогу.
Если конечно не трудно...
|
|
5
Garykom
гуру
28.04.18
✎
16:49
|
ТекстЗапроса = "SELECT CODE,NAME.PRICE FROM tov.dbf WHERE CODE='12345'";
SQL совсем не знаем?
ТекстЗапроса = "UPDATE tov.dbf SET PRICE="+НоваяЦена+" WHERE CODE='12345'";
|
|
6
VBMADD
28.04.18
✎
17:00
|
(5) Спасибо огромное!
Извини бедного крестьянина за бестолковость.
Пусть сбудутся все твои мечты...
|
|