|
|
|
1C 7.7 - Из 1С в DBF с помощью ADO
|
|||
|---|---|---|---|
|
#18+
Добрый день! подскажите пожалуйста, уже устала голову ломать и лопатить Интернет. Есть процедурка, которая переносит документ в базу данных. Имя базы большое, поэтому не могу пользоваться объектом XBase. Пишу процедуру: DBConn = CreateObject("ADODB.Connection"); DBConn.Open("Provider=Microsoft.Jet.OLEDB.4.0;" + "Data Source=" + ИмяФайла + ";" + "Extended Properties=""DBASE IV;"";"); DBConn.Execute("Create Table " + ИмяФайла + "(Nnak numeric(6,0), Datn date, obiz char(6), kolp numeric(5,0), gr numeric(15,0), datvz date, cena numeric(9,2), skidd numeric(9,2))"); ВыбратьСтроки(); Пока ПолучитьСтроку() = 1 Цикл DBConn.Execute("Insert into " + ИмяФайла + " (obiz) Values (ob)"); DBConn.Parameters.Append(DBConn.CreateParameter("ob")); DBConn.Parameters("ob").Value = Товар.КодПродукта; КонецЦикла; Так вот, ругается на строке: DBConn.Execute("Insert into " + ИмяФайла + " (obiz) Values (ob)"); Не видит параметр. Как правильно его передать? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 15.10.2009, 13:30 |
|
||
|
1C 7.7 - Из 1С в DBF с помощью ADO
|
|||
|---|---|---|---|
|
#18+
HSV, А чё это вы определяете параметры после вызова Execute? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 15.10.2009, 13:35 |
|
||
|
1C 7.7 - Из 1С в DBF с помощью ADO
|
|||
|---|---|---|---|
|
#18+
bascomo, Сбило с толку то, что во всех примерах именно такой порядок. Переписала код: ВыбратьСтроки(); Пока ПолучитьСтроку() = 1 Цикл DBConn.Parameters.Add("").value = Товар.КодПродукта; DBConn.Execute("Insert into " + ИмяФайла + " (obiz) Values (ob)"); КонецЦикла; Теперь ругается на строку: DBConn.Parameters.Add("ob").value = Товар.КодПродукта; Говорит, что аргументы имеют неверный тип, выходят за пределы допустимого диапазона или вступают в конфликт друг с другом ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 15.10.2009, 13:45 |
|
||
|
1C 7.7 - Из 1С в DBF с помощью ADO
|
|||
|---|---|---|---|
|
#18+
Сорри неправильно написала DBConn.Parameters.Add("ob").value = Товар.КодПродукта; DBConn.Execute("Insert into " + ИмяФайла + " (obiz) Values (ob)"); ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 15.10.2009, 13:47 |
|
||
|
1C 7.7 - Из 1С в DBF с помощью ADO
|
|||
|---|---|---|---|
|
#18+
Все оказалось просто, очень просто, даже обидно, что столько времени на это убила. Хотя ... много интересного узнала. В общем пишу, вдруг кому пригодится ВыбратьСтроки(); Пока ПолучитьСтроку() = 1 Цикл DBConn.Execute("Insert into " + ИмяФайла + " (obiz) Values ('"+Товар.КодПродукта+"')"); КонецЦикла; Вот. И не надо никаких параметров передавать. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 15.10.2009, 16:13 |
|
||
|
1C 7.7 - Из 1С в DBF с помощью ADO
|
|||
|---|---|---|---|
|
#18+
Спасибо... Очень ценная информация! ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 15.10.2009, 23:47 |
|
||
|
|

start [/forum/topic.php?fid=28&msg=36253588&tid=1523203]: |
0ms |
get settings: |
10ms |
get forum list: |
21ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
184ms |
get topic data: |
11ms |
get forum data: |
2ms |
get page messages: |
51ms |
get tp. blocked users: |
1ms |
| others: | 211ms |
| total: | 497ms |

| 0 / 0 |
