|
|
|
Как передать параметр...
|
|||
|---|---|---|---|
|
#18+
Dim sql As String Dim rs As New ADODB.Recordset rs.Open sql, CurrentProject.Connection, adOpenForwardOnly, adLockOptimistic В этом случае запрашивает параметр: No value given for onу or more required parameters. Дело в том что запрос ссылается на другой сохраненный запрос где уже указаны условия. Понятно что надо через объект Command. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 11.11.2004, 10:15:58 |
|
||
|
Как передать параметр...
|
|||
|---|---|---|---|
|
#18+
Dim cmd As New ADODB.Command Dim rs As New ADODB.Recordset Dim prm As ADODB.Parameter cmd.ActiveConnection = "DSN=pubs;uid=sa" cmd.CommandText = "myADOParaProc" cmd.CommandType = adCmdTable cmd.CommandTimeout = 15 Set prm = Cmd.CreateParameter("Type", adChar, adParamInput, 12, "Business") Cmd.Parameters.Append prm Set rs = Cmd.Execute ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 11.11.2004, 10:29:21 |
|
||
|
|
start [/forum/topic.php?fid=45&fpage=1526&tid=1670435]: |
0ms |
get settings: |
7ms |
get forum list: |
11ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
39ms |
get topic data: |
14ms |
get forum data: |
3ms |
get page messages: |
27ms |
get tp. blocked users: |
1ms |
| others: | 226ms |
| total: | 334ms |
| 0 / 0 |
