ReSQL.ru
     
powered by simpleCommunicator - 2.0.36     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / VB6 + MS SQL2000. Подключение.
6 сообщений из 6, страница 1 из 1
VB6 + MS SQL2000. Подключение.
    #32070173
al_addin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
al_addin
Гость
Люди! Не дайте погибнуть! Написал прогу на VB6, которая обращается к MS SQL2000. На моем компе с установленным клиентом от MSSQL все работает (через name pipe или tcp/ip), а на других машинах нет!!
А поставить ее надо многим. Так что же? Всем клиента MSSQL устанавливать?

Строка подключения такая:
Set cn = New ADODB.Connection
cn.Provider = "SQLOLEDB.1"
cn.ConnectionString = "Persist Security Info=False;Password=" + password + ";User ID=" + login + ";Initial Catalog=myBase;Data Source=server\serversql"
cn.Open

Как быть? Что делать? Теряется вера во что-то светлое ...
...
Рейтинг: 0 / 0
20.11.2002, 14:19
| Ответить | Цитировать | Написать  
VB6 + MS SQL2000. Подключение.
    #32070187
Фотография Lexis
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Lexis
Участник
не уверен, что оно...но все же
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
Private Sub Connect_Click()
    Set oConnection = New ADODB.Connection
  On Error GoTo ErrorHandler:
    oConnection.CommandTimeout =  5 
    oConnection.Provider =  "SQLOLEDB" 
    oConnection.Properties( "Data source" ) = txtServer.Text
    oConnection.Properties( "Initial Catalog" ) =  "SMML" 
    oConnection.Properties( "User ID" ) = txtLogin.Text
    oConnection.Properties( "Password" ) = txtPassword.Text
    oConnection.Open
    disConnect.Enabled = True
    Connect.Enabled = False
    Clear.Enabled = True
    Exit Sub
ErrorHandler:
    If Err.Number = - 2147267259  Then
        MsgBox  "209 ; 229 ; 240 ; 226 ; 229 ; 240 ;  237 ; 229 ;  237 ; 224 ; 233 ; 228 ; 229 ; 237 ;"
    End If
    If Err.Number = - 2147217843  Then
        MsgBox  "205 ; 229 ; 239 ; 240 ; 224 ; 226 ; 232 ; 235 ; 252 ; 237 ; 238 ; 229 ;  232 ; 236 ; 255 ;  232 ; 235 ; 232 ;  239 ; 224 ; 240 ; 238 ; 235 ; 252 ;"
    End If
    Err.Clear
End Sub
...
Рейтинг: 0 / 0
20.11.2002, 14:29
| Ответить | Цитировать | Написать  
VB6 + MS SQL2000. Подключение.
    #32070208
Warlock
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Warlock
Гость
Если ты используешь ADO, то, скорее всего, придется ставить клиента MS SQL Server. Если пишешь на C++, то есть библиотека SQLAPI, которая соединяется с SQL сервером напрямую, попробуй написать какую-нибудь proxy-dll для этой библиотеки, чтобы получать к ней доступ через Visual Basic
...
Рейтинг: 0 / 0
20.11.2002, 15:09
| Ответить | Цитировать | Написать  
VB6 + MS SQL2000. Подключение.
    #32070226
Фотография Lexis
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Lexis
Участник
1. SQLOLEDB - это что будет..ADO?
2. часть драйверов устанавливается в Windows вместе с пакетом Office
я имею ввиду MDAC
MDAC
полагаю, что скорее всего можно использовать его dll
...
не программист я....поэтому путаюсь в терминах :)
...
Рейтинг: 0 / 0
20.11.2002, 15:36
| Ответить | Цитировать | Написать  
VB6 + MS SQL2000. Подключение.
    #32070244
dao
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
dao
Участник
Для подключения из vb6 к сиквелу 2000 надо на всех клиетах ставить mdac желательно версии 2.6 или из сетапа сиквела запускать инсталяцию клиента - эт проще всего при этом ставиться усё что нужно и при установки можно всё подстроить. Я столкнулся с проблемами при установке на 98.
...
Рейтинг: 0 / 0
20.11.2002, 15:53
| Ответить | Цитировать | Написать  
VB6 + MS SQL2000. Подключение.
    #32070601
Фотография tpg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
tpg
Участник
ИМХО, не надо городить огород с клиентскими приложениями SQL сервера. Ставишь на все клиентские машины ADO (лучше скачать у мелкомягких MDAC_TYP.EXE версии 2.6, вести он 5 метров). Кстати, он хорошо интегрируется в инсталяшку. Дальше делаешь в каталоге, в котором лежит EXE файл проги текстовый файл с расширением ".UDL". Эксплорер однозначно определит, как открывать этот файл. Открываешь его через эксплорер - появляется окно настройки соединения. Там делаешь какие надо установки (выбираешь провайдера, сервер, базу, способ подключения и т.п.).
В коде пишешь примерно следующее:
Код: plaintext
1.
2.
3.
4.
5.
Option Explicit
Public conMain As ADODB.Connection 

Set conMain = New ADODB.Connection
conMain.Open  "File Name="  & App.Path &  "\MyConn.udl"


И всё. Дальше настраиваешь соответствующим образом другие используемые объекты ADO. Очень удобно и коду минимум.
...
Рейтинг: 0 / 0
21.11.2002, 10:35
| Ответить | Цитировать | Написать  
6 сообщений из 6, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / VB6 + MS SQL2000. Подключение.
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru             Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=60&msg=32070244&tid=2171557]:
 0ms
get settings:
 10ms
get forum list:
 14ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 25ms
get topic data:
 9ms
get forum data:
 2ms
get page messages:
 43ms
get tp. blocked users:
 1ms
others: 299ms
total:  411ms
созд. / загр.: 411ms
x
x
Закрыть


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