Указать параметр в запросе на англ.
☑
0
west246
30.11.18
✎
16:11
Вот кусок кода, там в запросе есть параметр ID как его зарегить, в обычном запросе было УстановитьПараметр() и тд. А тут не знаю
Помогите
StringConnetion = "Provider=Microsoft.Jet.OLEDB.4.0;" +"Data Source=" + "D:\DBF\KORM" + ";Extended Properties=""DBASE IV;"";";
Com = New COMОбъект("ADODB.Connection");
Query = "SELECT
| RCP_CONT.RCP_ID,
| RCP_CONT.RAW_NAME,
| RCP_CONT.PERCENT
|FROM
| [RCP_CONT.DBF] AS RCP_CONT
|WHERE
| RCP_CONT.RCP_ID = &ID";
//Query.SetParameter("ID",ID);
Com.ConnectionString = StringConnetion;
Try
Com.Open();
Except
экзОбщегоНазначения.ВывестиСообщение("Подключитесь к серверу Novell : "+ErrorDescription());
EndTry;
Команда = Новый COMОбъект("ADODB.Command");
Команда.ActiveConnection = Com;
Команда.CommandText = Query;
Команда.CommandType = 1;
record = Новый COMОбъект("ADODB.RecordSet");
record = Команда.Execute();
Порядок = 1;
While NOT record.EOF() do
UserInterruptProcessing();
СтрокаТЗ = ТаблицаCONT.Добавить();
СтрокаТЗ.RCP_ID = record.fields("RCP_ID").Value;
СтрокаТЗ.RAW_NAME = record.fields("RAW_NAME").Value;
СтрокаТЗ.PERCENT = record.fields("PERCENT").Value;
СтрокаТЗ.Вес = Вес * record.fields("PERCENT").Value;
СтрокаТЗ.N = Порядок;
record.MoveNext();
Порядок = Порядок + 1;
EndDo;
Com.Close();
1
youalex
30.11.18
✎
16:28
самое простое - подсунуть литералом.
а так для command есть:
CreateParameter() , Parameters.Append()
2
Ёпрст
гуру
30.11.18
✎
16:31
или еще проще - динамически формировать текст запроса без параметров
Требовать и эффективности, и гибкости от одной и той же программы — все равно, что искать очаровательную и скромную жену... по-видимому, нам следует остановиться на чем-то одном из двух. Фредерик Брукс-младший