Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 24.12.2020, 21:20   #1
iskurt
Форумчанин
 
Регистрация: 02.06.2009
Сообщений: 228
По умолчанию Создать Пользовательский DSN скриптом

Всем добрый день, знатоки.
Есть программа на Делфи + MySQL. MySQL установлен на отдельном серваке.
Клиенты коннектятся по локалке. Клиенты периодически добавляются. Местного админа нет (есть только на аутсорсинге).
Прошу помощи или подсказки, как лучше организовать быстрое (а главное одинаковое) создание пользовательского DSN 32bit ODBC для MySQL сервера.

Сначала думал создать на VBS - но поискав на просторах, понял, что там нет возможности установить пользователя БД и пароль.

Весть текст скрипта не буду впихивать, только обратите внимание, что пользователь не указывается.
Код:
Sub CreateOrUpdateDSN 
  Dim RegEdPath 
  DriverName = "SQL Server" 
  Set WshShell = WScript.CreateObject("WScript.Shell") 
  RegEdPath= "HKCU\SOFTWARE\ODBC\ODBC.INI\" & DataSourceName & "\" 
  WshShell.RegWrite  RegEdPath & "Database" , DatabaseName 
  WshShell.RegWrite  RegEdPath & "Description" , Description 
  WshShell.RegWrite  RegEdPath & "Driver" , DriverPath 
  WshShell.RegWrite  RegEdPath & "Server" , Server 
  WshShell.RegWrite  RegEdPath & "LastUser" , LastUser 
  WshShell.RegWrite  RegEdPath & "UseProcForPrepare" , "0" 
  WshShell.RegWrite "HKCU\SOFTWARE\ODBC\ODBC.INI\ODBC Data Sources\" & DataSourceName , DriverName 
'  WshShell.RegWrite "HKCU\Software\Microsoft\MSSQLServer\Client\ConnectTo\" & _ 
'        server, "DBMSSOCN," & server & ",1433" 
End Sub
Я не знаком с VBS. Знаком с делфи. Может подскажете как лучше и как быстрее на клиентском ПК разворачивать доступ к БД ?

Заранее благодарен.
iskurt вне форума Ответить с цитированием
Старый 25.12.2020, 05:37   #2
ichi
Форумчанин
 
Регистрация: 14.03.2012
Сообщений: 147
По умолчанию

Может так попробовать (надо с правами админа делать, в реестр пишет):
Код:
ODBCConf ConfigSysDSN "MySQL" "DSN=LocalODBCConnection|SERVER=MySQL_ServerName"
ichi вне форума Ответить с цитированием
Старый 25.12.2020, 10:10   #3
iskurt
Форумчанин
 
Регистрация: 02.06.2009
Сообщений: 228
По умолчанию

Это в скрипте?
Если в нем, то я даже не пойму где это писать?
Может это можно реализовать программно через делфи? ;-)
iskurt вне форума Ответить с цитированием
Старый 25.12.2020, 10:35   #4
ichi
Форумчанин
 
Регистрация: 14.03.2012
Сообщений: 147
По умолчанию

это в командной строке прописывать (справка): odbcconf /H
ichi вне форума Ответить с цитированием
Старый 25.12.2020, 10:48   #5
ichi
Форумчанин
 
Регистрация: 14.03.2012
Сообщений: 147
По умолчанию

еще когда ставишь odbc connector mysql, то должна установиться консольная программа myodbc-installer.exe, это программа по ходу умеет dsn прописывать на локальном компьютере:
Код:
myodbc-installer -a -s -t"DSN=mydb;DRIVER=MySQL ODBC 8.0 Driver;SERVER=mysql;USER=username;PASSWORD=pass"
Сам не пробовал использовать эту программу, по ее работе не смогу подсказать.
ichi вне форума Ответить с цитированием
Старый 25.12.2020, 11:47   #6
ichi
Форумчанин
 
Регистрация: 14.03.2012
Сообщений: 147
По умолчанию

Еще вариант, на заведомо настроенном компьютере, где соединение к mysql работает, выгрузить ветку реестра с параметрами подключения, сохранить в reg файл. Потом из reg файла выгрузить на другой компьютер, любыми средствами, например скриптом.
ichi вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Создать пользовательский сценарий регистрации в домене Windows 2003 Server xbarmaleyx Помощь студентам 1 29.03.2011 23:28
Программно создать DSN LittleFatCat Microsoft Office Access 2 10.12.2010 17:16
Получить список DSN средствами WinApi fedakdenis Win Api 1 14.10.2010 11:59
Возможно ли создать такой пользовательский формат? motorway Microsoft Office Excel 16 21.05.2010 00:45
Создание dsn из Дельфи Demonk БД в Delphi 2 01.09.2009 08:40