VBA Не найдено имя аргумента для процедуры PL/SQL
Формулировка задачи:
Коллеги,
Имеется следующий код для вызова функции Oracle:
На строке Set oRS = oCMD.Execute получаю сообщение (во вложении)
Что не так? Аргументы зацепились. Значения им присвоены. Куда копать?
Имеется следующий код для вызова функции Oracle:
Листинг программы
- strCon = "Provider=MSDAORA.1; Data Source=test; User ID=test; Password=test"
- Set oCMD = CreateObject("ADODB.Command")
- Set oCon = CreateObject("ADODB.Connection")
- Set oRS = CreateObject("ADODB.Recordset")
- oCon.Open strCon
- oCMD.ActiveConnection = oCon
- oCMD.CommandText = "{call tctdbs.test.CheckConnection(?,?,{resultset 0, aResult})}"
- oCMD.Parameters.Refresh
- oCMD.Parameters("aDateFrom").Value = "111"
- oCMD.Parameters("aDateTo").Value = "222"
- Set oRS = oCMD.Execute
- y = 2
- While Not oRS.EOF
- Cells(y, 1).Value = oRS("DAT")
- Cells(y, 2).Value = oRS("DT")
- Cells(y, 3).Value = oRS("TXT")
- y = y + 1
- oRS.MoveNext
- Wend
- oCon.Close
На строке Set oRS = oCMD.Execute получаю сообщение (во вложении)
Что не так? Аргументы зацепились. Значения им присвоены. Куда копать?
Решение задачи: «VBA Не найдено имя аргумента для процедуры PL/SQL»
textual
Листинг программы
- cmd.Parameters.Append cmd.CreateParameter(...)
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д