ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Нужна помощь
25 сообщений из 27, страница 1 из 2
  1  все
Нужна помощь
    #34331086
algorithm
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
algorithm
Гость
Уважаемые, помогите новичку.
Есть БД Oracle надо к ней подключиться и вывести определенные поля. Есть SQL запрос рабочий.
Необходимо все это сделать на VB. Каким образом это осуществимо?
...
Рейтинг: 0 / 0
14.02.2007, 16:43
| Ответить | Цитировать | Написать  
Нужна помощь
    #34331171
Проходящий
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проходящий
Участник
Тынц
...
Рейтинг: 0 / 0
14.02.2007, 17:03
| Ответить | Цитировать | Написать  
Нужна помощь
    #34332096
algorithm
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
algorithm
Гость
Спасибо за ответ, а не мог бы пояснить какой оператор че делает. Где подключение к базе и т.д.? Заранее благодарен.
...
Рейтинг: 0 / 0
15.02.2007, 09:14
| Ответить | Цитировать | Написать  
Нужна помощь
    #34332230
Melkiades
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Melkiades
Участник
Может стоит книжку купить?
...
Рейтинг: 0 / 0
15.02.2007, 09:58
| Ответить | Цитировать | Написать  
Нужна помощь
    #34332325
algorithm
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
algorithm
Гость
А в электронном виде нету книжек?
...
Рейтинг: 0 / 0
15.02.2007, 10:27
| Ответить | Цитировать | Написать  
Нужна помощь
    #34332446
MSDN__
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
MSDN__
Гость
Я - вот твое спасение! У меня есть описание и ADO и VB6... кроме того, я даже доступна он-лайн на сайте моего производителя Microsoft.
...
Рейтинг: 0 / 0
15.02.2007, 11:01
| Ответить | Цитировать | Написать  
Нужна помощь
    #34335447
algorithm
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
algorithm
Гость
Скажи мне тогда пожалуйста :)) Как послать SQL запрос из VBA в БД Oracle?
...
Рейтинг: 0 / 0
16.02.2007, 08:59
| Ответить | Цитировать | Написать  
Нужна помощь
    #34335452
Фотография HandKot
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
HandKot
Участник
algorithm Скажи мне тогда пожалуйста :)) Как послать SQL запрос из VBA в БД Oracle?

Код: plaintext
1.
2.
3.
Dim cmd as ADODB.Command
...
cmd.Execute "Мой скл запрос"


I Have Nine Lives You Have One Only
THINK!
...
Рейтинг: 0 / 0
16.02.2007, 09:02
| Ответить | Цитировать | Написать  
Нужна помощь
    #34335529
algorithm
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
algorithm
Гость
Спасибо, вот только почему-то не работает:
Код: plaintext
Dim cmd As ADODB.Command
- так не хочет определяться. Только так:
Код: plaintext
Set cmd = CreateObject("ADODB.Command")
Почему? А вообще так можно?
но при этом выдает:
"Невозможно использование подключения для выполнения операции.
Оно закрыто или не допускается в данном контексте."
...
Рейтинг: 0 / 0
16.02.2007, 09:42
| Ответить | Цитировать | Написать  
Нужна помощь
    #34335564
FAndrew
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
FAndrew
Участник
algorithmтак не хочет определяться.
А подключить ADODB в References?

А еще нужно настроить соединение с БД.
...
Рейтинг: 0 / 0
16.02.2007, 09:57
| Ответить | Цитировать | Написать  
Нужна помощь
    #34335599
algorithm
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
algorithm
Гость
Во, про подключение ADODB я и не знал. Теперь определяется.
А настройка соединения с базой так:
Код: plaintext
1.
2.
3.
Dim Conn As ADODB.Connection
...
Conn.Open "Строка соединения"
???
...
Рейтинг: 0 / 0
16.02.2007, 10:09
| Ответить | Цитировать | Написать  
Нужна помощь
    #34336023
FAndrew
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
FAndrew
Участник
Похоже, что так.
Проблема может быть в самой строке соединения.
И может быть (я не уверен, что это нужно для Oracle) в последней версии MDAC.
...
Рейтинг: 0 / 0
16.02.2007, 12:03
| Ответить | Цитировать | Написать  
Нужна помощь
    #34336141
algorithm
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
algorithm
Гость
Господа, спасибо за помощь - разобрался все заработало. Данные из базы по запросу рисует.
Теперь другой вопрос, как данные, вводимые в форме, вставить в SQL запрос (например Дату)?
...
Рейтинг: 0 / 0
16.02.2007, 12:30
| Ответить | Цитировать | Написать  
Нужна помощь
    #34336242
Melkiades
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Melkiades
Участник
MSDN__Я - вот твое спасение! У меня есть описание и ADO и VB6... кроме того, я даже доступна он-лайн на сайте моего производителя Microsoft.
...
Рейтинг: 0 / 0
16.02.2007, 12:51
| Ответить | Цитировать | Написать  
Нужна помощь
    #34336991
algorithm
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
algorithm
Гость
Melciades , уважаемый, посмотрел MSDN не нашел ответа на свой вопрос:
...
Рейтинг: 0 / 0
16.02.2007, 15:57
| Ответить | Цитировать | Написать  
Нужна помощь
    #34337014
FAndrew
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
FAndrew
Участник
Н-да...
Код: plaintext
 strSQL="SELECT * FROM my_table WHERE my_date=" & txtMyDate.text
...
Рейтинг: 0 / 0
16.02.2007, 16:00
| Ответить | Цитировать | Написать  
Нужна помощь
    #34337015
algorithm
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
algorithm
Гость
Melciades , уважаемый, посмотрел MSDN не нашел ответа на свой вопрос.
Как сделать в VB так, чтобы SQL запрос вида:
Код: plaintext
1.
2.
3.
4.
5.
query = "select b.description as turn, trunc (a.date_time) as Data ,sum(a.SPOINTS), sum(a.stikets), 
sum(a.stimes), count (*) as Data from tranz a, physical_device b where date_time between to_date
('10.02.2007 8:50:00', 'dd.mm.yyyy hh24:mi:ss') and to_date('15.02.2007 23:20:00', 'dd.mm.yyyy 
hh24:mi:ss')and a.flags in (1)  and a.adr_dev = b.idfromtree group by trunc (a.date_time), b.description"

вот надо в этот запрос вставить дату, введенную из формы?
Модератор: Уважаемый, просьба резать длинные строки в теге код переносом строки. Видите как страницу разворотило?
...
Рейтинг: 0 / 0
16.02.2007, 16:01
| Ответить | Цитировать | Написать  
Нужна помощь
    #34337996
AndreyMp
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AndreyMp
Участник
Ну с датами в VB вечная проблема. Где # нужен, где хитрый ум. С Ораклием особенно.
...
Рейтинг: 0 / 0
17.02.2007, 00:19
| Ответить | Цитировать | Написать  
Нужна помощь
    #34340009
algorithm
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
algorithm
Гость
Господа, ну все же неужели никто не знает???
...
Рейтинг: 0 / 0
19.02.2007, 09:50
| Ответить | Цитировать | Написать  
Нужна помощь
    #34340025
algorithm
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
algorithm
Гость
Господа, ну все же неужели никто не знает???
Пробовал так
Код: plaintext
1.
Rs.Filter = "Data='14.02.2007'"
фильтрует, а если так:
Код: plaintext
1.
2.
3.
4.
5.
Dim data_string As String
...
data_string="14.02.2007"
...
Rs.Filter = "Data='data_string'"
не хочет работать.
...
Рейтинг: 0 / 0
19.02.2007, 09:54
| Ответить | Цитировать | Написать  
Нужна помощь
    #34340138
FAndrew
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
FAndrew
Участник
algorithmГоспода, ну все же неужели никто не знает???
А что конкатенация строк с форматированием у нас уже не работает?
ИМХО, автор задает один вопрос, а хочет получить другой ответ.
...
Рейтинг: 0 / 0
19.02.2007, 10:31
| Ответить | Цитировать | Написать  
Нужна помощь
    #34340147
FAndrew
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
FAndrew
Участник
algorithm
Код: plaintext
1.
2.
3.
4.
5.
Dim data_string As String
...
data_string="14.02.2007"
...
Rs.Filter = "Data='data_string'"
не хочет работать.

Я бы тоже не стал работать

Код: plaintext
Rs.Filter = "Data=" & data_string
...
Рейтинг: 0 / 0
19.02.2007, 10:32
| Ответить | Цитировать | Написать  
Нужна помощь
    #34340183
algorithm
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
algorithm
Гость
FAndrew огромное спасибо, все заработало. Сорри за возможно глупые вопросы.
...
Рейтинг: 0 / 0
19.02.2007, 10:43
| Ответить | Цитировать | Написать  
Нужна помощь
    #34340309
Garrick
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Garrick
Участник
FAndrewН-да...
Код: plaintext
 strSQL="SELECT * FROM my_table WHERE my_date=" & txtMyDate.text


В Oracle надо делать так

Код: plaintext
 strSQL="SELECT * FROM my_table WHERE my_date = to_date('" & Formta(txtMyDate.text, "ddmmyyy") & "', 'ddmmyyy')"
...
Рейтинг: 0 / 0
19.02.2007, 11:23
| Ответить | Цитировать | Написать  
Нужна помощь
    #34340619
FAndrew
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
FAndrew
Участник
GarrickВ Oracle надо делать так

Ну мы все-таки программисты... Нужно хоть немного думать. Я показал методику, а уж развить её дальше...
Я, например, использую функцию, которая сама форматирует дату, как требуется БД. И поэтому программе без разницы с чем работать - MS SQL, Oracle, Access. Наверное на других БД будет работать, не проверял.
...
Рейтинг: 0 / 0
19.02.2007, 12:45
| Ответить | Цитировать | Написать  
25 сообщений из 27, страница 1 из 2
  1  все
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Нужна помощь
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=60&msg=34337015&tid=2164481]:
 0ms
get settings:
 8ms
get forum list:
 14ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 156ms
get topic data:
 9ms
get forum data:
 2ms
get page messages:
 70ms
get tp. blocked users:
 1ms
others: 213ms
total:  479ms
созд. / загр.: 479ms
x
x
Закрыть


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