ReSQL.ru
     
powered by simpleCommunicator - 2.0.59     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / VB и SQL
13 сообщений из 13, страница 1 из 1
VB и SQL
    #37823176
Slash232
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Slash232
Участник
Напишите пожалуйста простой пример кода, когда программа написанная на VB получает значение некоторой строчки с sql бд расположенной на удаленном сервере.
...
Рейтинг: 0 / 0
03.06.2012, 15:09
| Ответить | Цитировать | Написать  
VB и SQL
    #37823188
скукотища
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
скукотища
Гость
Slash232,

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
dim cn as object, rs as object
dim cs as string, q as string

set cn = createobject("adodb.connection")
' описание объекта: http://www.w3schools.com/ado/ado_ref_connection.asp

cs = "строка подключения к источнику данных. Примеры на  http://connectionstrings.com"

cn.open cs

if cn.state=1 then
  set rs = createobject("adodb.recordset")
  ' описание объекта: http://www.w3schools.com/ado/ado_ref_recordset.asp 
  
  q = "строка запроса к источнику данных"

  rs.open q, cn

  if not rs.bof
  do until rs.eof
    ' {Ваш код обработки записей}
    rs.movenext
  loop  
  end if

  rs.close: set rs=nothing
  cn.close
end if

set cn=nothing
...
Рейтинг: 0 / 0
03.06.2012, 15:32
| Ответить | Цитировать | Написать  
VB и SQL
    #37823205
Slash232
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Slash232
Участник
Еще вопрос: что мне необходимо сделать для того чтобы получить это значение? имею в виду в vb. Начинающий программист)
Я так понимаю нужно добавить драйвер ODBC и какие то компоненты в среде разработки vb??
...
Рейтинг: 0 / 0
03.06.2012, 15:50
| Ответить | Цитировать | Написать  
VB и SQL
    #37823212
Slash232
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Slash232
Участник
То есть если можно напиши действия от открытия vb (вплоть до выбора типа проекта) до момента получения данных.
...
Рейтинг: 0 / 0
03.06.2012, 15:56
| Ответить | Цитировать | Написать  
VB и SQL
    #37823216
скукотища
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
скукотища
Гость
Slash232,
посмотрите Visual Basic 6.0 programming for beginners . Возможно как раз то, что Вам нужно.
...
Рейтинг: 0 / 0
03.06.2012, 16:02
| Ответить | Цитировать | Написать  
VB и SQL
    #37823224
Slash232
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Slash232
Участник
Если все таки кому не сложно напишите плз
...
Рейтинг: 0 / 0
03.06.2012, 16:12
| Ответить | Цитировать | Написать  
VB и SQL
    #37823235
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
Необходимая информация:
1) версия и локализация ОС
2) установлена ли уже среда, какая, какая версия, какая локализация
3) в какую папку она установлена, в какой конфигурации, в какую папку установлены ярлыки, какие имена они имеют (не переименованы ли)
4) что видно на экране при запуске среды (скриншоты приветствуются)
5) какие устройства ввода присутствуют на компьютере (клавиатура, мышь, тачпад, планшет, тачскрин), их модели и конфигурация
6) имеющиеся навыки работы с виндовс (сертификаты с курсов приветствуются), владения навыками копипаста, умения открывать и закрывать окна в виндовсе, понимание, что такое текстовый и "мышиный курсор", владение двойным кликом, понимание, что такое контекстное меню и т.п.
7) конфигурация пользователя (наличие и исправность рук, пальцев, зрения, умение различать цвета)
8) указание версии сервера, к которому надо подключиться, установленная СУБД, версия, адрес сервера, открытые порты для подключения
9) имя базы данных, логин и пароль к базе данных.
10) перечень таблиц базы данных, указание, к какой таблице базы данных необходимо обратиться, структура таблицы (желательно в виде скрипта создания), указание, какие данные и из какой строки требуется получить.
11) четкое указание, куда именно требуется получить данные из базы данных, в каком виде, формате, типе данных, куда вывести.

Наиболее полное и подробное описание вышеперечисленное позволит нам наиболее полно и подробно составить для вас инструкцию.
...
Рейтинг: 0 / 0
03.06.2012, 16:42
| Ответить | Цитировать | Написать  
VB и SQL
    #37823298
Slash232
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Slash232
Участник
Win 7, Visual Basic 6.0 sp5, установлена по умолчанию, при загрузке спрашивает тип создаваемого проекта, все типы устройств ввода имеються) , опытное владение виндовс, SQL Server 2000 Developer Edition, имя базы данных Name, логин Slash, пароль Pass,
таблица одна называется login из 2 колонок Login_name и Login_pass
Допустим бд расположена по адресу ***.***.***.*** . Просьба написать любой элементарный запрос. Использовать ADO
...
Рейтинг: 0 / 0
03.06.2012, 18:21
| Ответить | Цитировать | Написать  
VB и SQL
    #37823321
kiv-1980
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
kiv-1980
Участник
Подключить библиотеку Microsoft Activex Data Objects
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
Private rsset As Object
Private cn As Object
Private ConnectString_MS As String
Private Sql As String

ConnectString_MS = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Password=12345;Initial Catalog=TestDB;Data Source=192.168.1.1"
Set cn = New ADODB.Connection
Set rsset = New ADODB.Recordset
cn.ConnectionString = ConnectString_MS
cn.Open

If cn.state = 1 Then
Sql = "select name from table"
Set rsset = cn.Execute(Sql)

Do Until rsset.EOF
Combo1.AddItem rsset("name")
rsset.MoveNext
Loop

Set rsset = Nothing
cn.close
End If
Set cn = Nothing
...
Рейтинг: 0 / 0
03.06.2012, 19:01
| Ответить | Цитировать | Написать  
VB и SQL
    #37823324
Slash232
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Slash232
Участник
Спасибо большое! Правда библиотеки этйо у меня нету и не знаю как добавить(
...
Рейтинг: 0 / 0
03.06.2012, 19:06
| Ответить | Цитировать | Написать  
VB и SQL
    #37823333
kiv-1980
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
kiv-1980
Участник
Зайти в меню:
Project - References - найти Microsoft ActiveX Data Objects 2.5 Library, поставить галку.
И использовать вышеуказанный код.
...
Рейтинг: 0 / 0
03.06.2012, 19:12
| Ответить | Цитировать | Написать  
VB и SQL
    #37823340
Slash232
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Slash232
Участник
В том и то и дело что его там нет!
...
Рейтинг: 0 / 0
03.06.2012, 19:20
| Ответить | Цитировать | Написать  
VB и SQL
    #37823342
kiv-1980
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
kiv-1980
Участник
Скачать и установить .NetFrameWork
.NET Framework Downloads
...
Рейтинг: 0 / 0
03.06.2012, 19:25
| Ответить | Цитировать | Написать  
13 сообщений из 13, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / VB и SQL
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=60&msg=37823333&tid=2157739]:
 0ms
get settings:
 9ms
get forum list:
 13ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 67ms
get topic data:
 9ms
get forum data:
 2ms
get page messages:
 52ms
get tp. blocked users:
 1ms
others: 243ms
total:  402ms
созд. / загр.: 402ms
x
x
Закрыть


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