powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Помогите с процедурой........
19 сообщений из 19, страница 1 из 1
Помогите с процедурой........
    #34442954
Tommy_GuN
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Допустим мы имеем простую процедуру:

Create procedure TTT (@peremen int)
as
begin
select SUM(Price)
from dbo.Inform
where (ID = @peremen)
end

Как сделать так, чтобы в Бейсике при запуске данной процедуры, если мы кликаем на ID=5, то процедура запускалась с @peremen = 5? Ведь обычно при запуске процедуры появляется поле в котором мы вводим переменную
...
Рейтинг: 0 / 0
Помогите с процедурой........
    #34443041
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Смысл теряется за потоком сознания...

"если мы кликаем на ID=5" - что это за абстракция? Кликнуть можно по кнопке, гриду, окну короче.

"при запуске данной процедуры" - как конкретно она запускается?

"обычно при запуске процедуры появляется поле" - обычно это в Аксессе, и это именно он показывает диалог ввода значения. А из синтаксиса процедуры даже не понятно что за база используется. dbo .Inform - вроде SQL Server, ( @peremen int ) - вроде не он.
...
Рейтинг: 0 / 0
Помогите с процедурой........
    #34443057
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Насчет скобок ошибся - SQL Server их понимает, просто я никогда ими не пользовался. Третий вопрос отпадает.
...
Рейтинг: 0 / 0
Помогите с процедурой........
    #34443160
Tommy_GuN
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Данная процедура испоьзуется в Access.... dbo.Inform это таблица из MS SQL server... Понимаешь, у меня в Access (DBO) есть форма на которой расположена таблица Inform, для нее я и использую данную процедуру. В Access при запуске процедуры, надо вводить значение переменной, а как сделать так, что бы при двойном клике на любом поле (Например ID=2) процедура срабатывала так, что бы @peremen приравнивалась к 2???
...
Рейтинг: 0 / 0
Помогите с процедурой........
    #34443589
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
rs.open "exec TTT " & ID, cn
?
...
Рейтинг: 0 / 0
Помогите с процедурой........
    #34444637
Tommy_GuN
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Так не получается..... А есть еще варианты?
...
Рейтинг: 0 / 0
Помогите с процедурой........
    #34444663
Фотография Дадахан
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Tommy_GuNТак не получается..... А есть еще варианты?
что значит не получается? ошибку какую выдает?
...
Рейтинг: 0 / 0
Помогите с процедурой........
    #34444789
Tommy_GuN
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ошибка:>>> Object Required
...
Рейтинг: 0 / 0
Помогите с процедурой........
    #34444791
Tommy_GuN
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Я прописал (rs.open "exec TTT " & ID, cn) в кнопке которая находится на форме с таблицей....
...
Рейтинг: 0 / 0
Помогите с процедурой........
    #34444837
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Н-да, еще один секретный агент, слова не вытянешь о состоянии дел. Аббревиатура ADODB о чем нибудь говорит? А хотя бы то, что объекты, rs в частности, не берутся из воздуха?
...
Рейтинг: 0 / 0
Помогите с процедурой........
    #34444883
Tommy_GuN
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Я в этом еще новичек, но абрревиатура ADODB мне известна..... лучше бы рассказал мне как сделать, чем издеваться...
...
Рейтинг: 0 / 0
Помогите с процедурой........
    #34444897
shady
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Object Required = Необходим объект.

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
dim cn as adodb.connection
set cn=new adodb.connection
cn.CursorLocation = adUseClient
cn.CommandTimeout =  15 
cn.Open "microsoft JET и че-то там еще непомню..посмотри на connectionstrings.com"

dim rs as adodb.recordset
set rs=new adodb.recordset
rs.open "exec TTT " & ID, cn
...
Рейтинг: 0 / 0
Помогите с процедурой........
    #34445082
BCP
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BCP
Гость
Код: plaintext
cn.open "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" & "ТвойФайл.mdb"

К тому же, надо добавить в твою базу Access ссылку на библиотеку ADO.
Если, конечно, таковая не стоит по умолчанию. В редакторе модуля VB: "Tools" - "References" - Найти "Microsoft ActiveX data objects x.x" и отметить.
...
Рейтинг: 0 / 0
Помогите с процедурой........
    #34448471
Tommy_GuN
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Спасибо всем за помощь..... У меня еще один вопрос.... Как мне прописать на VB код, что бы он выполнял следующее:
При нажатии на [Button_1] выполнялась та же процедура с теми же требованиями, но ответ бы записывался в [Поле_1]? Еще раз всем спасибо за участие!!!
...
Рейтинг: 0 / 0
Помогите с процедурой........
    #34448573
Фотография Дадахан
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Tommy_GuNСпасибо всем за помощь..... У меня еще один вопрос.... Как мне прописать на VB код, что бы он выполнял следующее:
При нажатии на [Button_1] выполнялась та же процедура с теми же требованиями, но ответ бы записывался в [Поле_1]? Еще раз всем спасибо за участие!!!
мдаа, а так хорошо начинал... :)
...
Рейтинг: 0 / 0
Помогите с процедурой........
    #34448683
Tommy_GuN
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Дадахан Tommy_GuNСпасибо всем за помощь..... У меня еще один вопрос.... Как мне прописать на VB код, что бы он выполнял следующее:
При нажатии на [Button_1] выполнялась та же процедура с теми же требованиями, но ответ бы записывался в [Поле_1]? Еще раз всем спасибо за участие!!!
мдаа, а так хорошо начинал... :)

Нет конечно я понимаю, что это звучит глупо.... дело в том, что я ПолеСоСписком преобразую в поле.... По-сути, к полюСоСписком можно прицепить и так процедуру [ПолеСоСписком1.RowCourse = "Exec TTT" & Room_pod.Form!ID]... Я видал что в VB к полю обращаются так [Поле1.text=....], но в моем случае при подобном обращении процедура не выполняется... Почему? (Я использовал такой метод только ради интереса)
...
Рейтинг: 0 / 0
Помогите с процедурой........
    #34451428
BCP
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BCP
Гость
мдя... ((С)Дадахан)..
Microsoft следовало ограничить доступ к программированию на VBA. Скажем, поставить какой-нибудь пароль, например "полиморфизм", "рекурсивный спуск" или ещё что-нибудь в этом роде. Или номер диплома (Brain Bench ??) спрашивать что-ли...
А так все форумы по VBA превращаются в детский сад, где думают, что это LEGO.

P.S. Особенно порадовало "ПолеСоСписком1.RowCourse" - а почему бы не RowCurse? (а что, звучит: "проклятье строк"...)
...
Рейтинг: 0 / 0
Помогите с процедурой........
    #34451649
Фотография Дадахан
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
BCPмдя... ((С)Дадахан)..
Microsoft следовало ограничить доступ к программированию на VBA. Скажем, поставить какой-нибудь пароль, например "полиморфизм", "рекурсивный спуск" или ещё что-нибудь в этом роде. Или номер диплома (Brain Bench ??) спрашивать что-ли...
А так все форумы по VBA превращаются в детский сад, где думают, что это LEGO.

P.S. Особенно порадовало "ПолеСоСписком1.RowCourse" - а почему бы не RowCurse? (а что, звучит: "проклятье строк"...)
+512
последний брайнбенч у меня пылится как юзер-98 :)
...
Рейтинг: 0 / 0
Помогите с процедурой........
    #34457548
Tommy_GuN
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Спасибо BCP и Дадахану за столь вразумительные ответы.... Я понимаю что вы профи в VB (или наоборот), но всеравно спасибо за участие в моей теме! Может я пока и не понимаю сильно в VB, но это поправимо.... А я считаю, хвалиться своими качествами - удел слабых...
...
Рейтинг: 0 / 0
19 сообщений из 19, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Помогите с процедурой........
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]