Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Нужна помощь / 25 сообщений из 27, страница 1 из 2
  1  все
14.02.2007, 16:43
    #34331086
algorithm
algorithm
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужна помощь
Уважаемые, помогите новичку.
Есть БД Oracle надо к ней подключиться и вывести определенные поля. Есть SQL запрос рабочий.
Необходимо все это сделать на VB. Каким образом это осуществимо?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.02.2007, 17:03
    #34331171
Проходящий
Проходящий
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужна помощь
Тынц
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.02.2007, 09:14
    #34332096
algorithm
algorithm
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужна помощь
Спасибо за ответ, а не мог бы пояснить какой оператор че делает. Где подключение к базе и т.д.? Заранее благодарен.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.02.2007, 09:58
    #34332230
Melkiades
Melkiades
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужна помощь
Может стоит книжку купить?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.02.2007, 10:27
    #34332325
algorithm
algorithm
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужна помощь
А в электронном виде нету книжек?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.02.2007, 11:01
    #34332446
MSDN__
MSDN__
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужна помощь
Я - вот твое спасение! У меня есть описание и ADO и VB6... кроме того, я даже доступна он-лайн на сайте моего производителя Microsoft.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.02.2007, 08:59
    #34335447
algorithm
algorithm
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужна помощь
Скажи мне тогда пожалуйста :)) Как послать SQL запрос из VBA в БД Oracle?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.02.2007, 09:02
    #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:42
    #34335529
algorithm
algorithm
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужна помощь
Спасибо, вот только почему-то не работает:
Код: plaintext
Dim cmd As ADODB.Command
- так не хочет определяться. Только так:
Код: plaintext
Set cmd = CreateObject("ADODB.Command")
Почему? А вообще так можно?
но при этом выдает:
"Невозможно использование подключения для выполнения операции.
Оно закрыто или не допускается в данном контексте."
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.02.2007, 09:57
    #34335564
FAndrew
FAndrew
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужна помощь
algorithmтак не хочет определяться.
А подключить ADODB в References?

А еще нужно настроить соединение с БД.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.02.2007, 10:09
    #34335599
algorithm
algorithm
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужна помощь
Во, про подключение ADODB я и не знал. Теперь определяется.
А настройка соединения с базой так:
Код: plaintext
1.
2.
3.
Dim Conn As ADODB.Connection
...
Conn.Open "Строка соединения"
???
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.02.2007, 12:03
    #34336023
FAndrew
FAndrew
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужна помощь
Похоже, что так.
Проблема может быть в самой строке соединения.
И может быть (я не уверен, что это нужно для Oracle) в последней версии MDAC.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.02.2007, 12:30
    #34336141
algorithm
algorithm
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужна помощь
Господа, спасибо за помощь - разобрался все заработало. Данные из базы по запросу рисует.
Теперь другой вопрос, как данные, вводимые в форме, вставить в SQL запрос (например Дату)?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.02.2007, 12:51
    #34336242
Melkiades
Melkiades
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужна помощь
MSDN__Я - вот твое спасение! У меня есть описание и ADO и VB6... кроме того, я даже доступна он-лайн на сайте моего производителя Microsoft.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.02.2007, 15:57
    #34336991
algorithm
algorithm
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужна помощь
Melciades , уважаемый, посмотрел MSDN не нашел ответа на свой вопрос:
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.02.2007, 16:00
    #34337014
FAndrew
FAndrew
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужна помощь
Н-да...
Код: plaintext
 strSQL="SELECT * FROM my_table WHERE my_date=" & txtMyDate.text
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.02.2007, 16:01
    #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
| Ответить | Цитировать | Написать  
17.02.2007, 00:19
    #34337996
AndreyMp
AndreyMp
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужна помощь
Ну с датами в VB вечная проблема. Где # нужен, где хитрый ум. С Ораклием особенно.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.02.2007, 09:50
    #34340009
algorithm
algorithm
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужна помощь
Господа, ну все же неужели никто не знает???
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.02.2007, 09:54
    #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, 10:31
    #34340138
FAndrew
FAndrew
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужна помощь
algorithmГоспода, ну все же неужели никто не знает???
А что конкатенация строк с форматированием у нас уже не работает?
ИМХО, автор задает один вопрос, а хочет получить другой ответ.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.02.2007, 10:32
    #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:43
    #34340183
algorithm
algorithm
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужна помощь
FAndrew огромное спасибо, все заработало. Сорри за возможно глупые вопросы.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.02.2007, 11:23
    #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, 12:45
    #34340619
FAndrew
FAndrew
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нужна помощь
GarrickВ Oracle надо делать так

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


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