|
|
|
IIF
|
|||
|---|---|---|---|
|
#18+
cmd.Parameters.Append cmd.CreateParameter("@origin_id", adTinyInt, adParamInput, , Osnovan) cmd.Parameters.Append cmd.CreateParameter("@comments", adVarChar, adParamInput, 255, iif ((Osnovan)=1, [введите источник указания], "") ) Подскажите, как мне правильно во второй стоке предложить пользователю окошко для введения им информации в случае, если Osnovan=1 ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 08.12.2004, 11:23:39 |
|
||
|
IIF
|
|||
|---|---|---|---|
|
#18+
Так не получится, т.к. функция IIF будет вычислять оба выражения и окошко для пользователя будет появляться в любом случае. Сделай через обычный If ... Then ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 08.12.2004, 11:36:28 |
|
||
|
IIF
|
|||
|---|---|---|---|
|
#18+
cmd.Parameters.Append cmd.CreateParameter("@origin_id", adTinyInt, adParamInput, , Osnovan) If Osnovan = 1 Then _ iu = InputBox("введите источник указания",,"") cmd.Parameters.Append cmd.CreateParameter("@comments", adVarChar, adParamInput, 255, iu Если параметры в ХП существуют, не проще ли передавать их без создания их? cmd.Parameters("@origin_id") = Osnovan iu = InputBox("введите источник указания",,"") cmd.Parameters("@comments") = iu ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 08.12.2004, 11:37:48 |
|
||
|
IIF
|
|||
|---|---|---|---|
|
#18+
PAТак не получится, т.к. функция IIF будет вычислять оба выражения и окошко для пользователя будет появляться в любом случае. Сделай через обычный If ... Then ну уж тогда наверное лучше ввести переменную и сюда её подставлять? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 08.12.2004, 11:39:50 |
|
||
|
IIF
|
|||
|---|---|---|---|
|
#18+
2 Rivkin Dmitry : Да проще, но тогда ADO должно запросить типы параметров, лишний RPC вызов sp_procedure_params_rowset так что вопрос - что экономить на тексте программы или на времени исполнения ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 08.12.2004, 11:51:55 |
|
||
|
IIF
|
|||
|---|---|---|---|
|
#18+
Rivkin Dmitrycmd.Parameters.Append cmd.CreateParameter("@origin_id", adTinyInt, adParamInput, , Osnovan) If Osnovan = 1 Then _ iu = InputBox("введите источник указания",,"") cmd.Parameters.Append cmd.CreateParameter("@comments", adVarChar, adParamInput, 255, iu спасибо, воспрользовалась этим вариантом:-) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 08.12.2004, 12:06:02 |
|
||
|
|

start [/forum/topic.php?fid=45&fpage=1512&tid=1669886]: |
0ms |
get settings: |
5ms |
get forum list: |
9ms |
check forum access: |
2ms |
check topic access: |
2ms |
track hit: |
13ms |
get topic data: |
6ms |
get forum data: |
1ms |
get page messages: |
22ms |
get tp. blocked users: |
1ms |
| others: | 190ms |
| total: | 251ms |

| 0 / 0 |
