Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Другие СУБД [игнор отключен] [закрыт для гостей] / Выгрузить из лотуса через ODBC в MSSQL / 4 сообщений из 4, страница 1 из 1
28.01.2010, 17:01
    #36436807
Lotus_?
Lotus_?
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Выгрузить из лотуса через ODBC в MSSQL
Добрый день!

Есть база на лотусе, в которой хранится некий документооборот. Хотелось бы определенные поля документа выгрузить в базу MSSQL, для того, чтобы потом из таблички их забрала другая сторонняя программа.
Установил NotesSQL, создал новый DSN, указал там базу лотуса. Проверил этим кодом(из help):

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
Uselsx "*LSXODBC"
	Dim con As New ODBCConnection
	con.ConnectTo(Inputbox("ODBC data source name", "DSN"))
	While Not con.IsConnected
		dsn = Inputbox("ODBC data source name", _
		"Connection not made ...")
		If dsn = "" Then Exit Sub
		con.ConnectTo(dsn)
	Wend
	Messagebox "Connected to " & con.DataSourceName,, _
	"Connection made ..."
	con.Disconnect

Показывает, что все ОК. Как дальше идти, что-то не пойму. Спасибо.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
28.01.2010, 18:03
    #36437038
Lotus_?
Lotus_?
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Выгрузить из лотуса через ODBC в MSSQL
Lotus_?Добрый день!

Есть база на лотусе, в которой хранится некий документооборот. Хотелось бы определенные поля документа выгрузить в базу MSSQL, для того, чтобы потом из таблички их забрала другая сторонняя программа.
Установил NotesSQL, создал новый DSN, указал там базу лотуса. Проверил этим кодом(из help):

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
Uselsx "*LSXODBC"
	Dim con As New ODBCConnection
	con.ConnectTo(Inputbox("ODBC data source name", "DSN"))
	While Not con.IsConnected
		dsn = Inputbox("ODBC data source name", _
		"Connection not made ...")
		If dsn = "" Then Exit Sub
		con.ConnectTo(dsn)
	Wend
	Messagebox "Connected to " & con.DataSourceName,, _
	"Connection made ..."
	con.Disconnect

Показывает, что все ОК. Как дальше идти, что-то не пойму. Спасибо.

Разобрался. Пока добавил через addrow метод. А граблей никаких не будет, если мне надо будет из документа поля цеплять? То есть, передать значение поля в документе, сейчас делал просто как через диалоговое окно, ввел значение, оно появилось в таблице мсскл.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
31.01.2010, 22:11
    #36441190
Lotus_?
Lotus_?
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Выгрузить из лотуса через ODBC в MSSQL
Всем привет! Выгрузка работает, но после того, как добавил одну строчку, пытаюсь добавить вторую, выскакивает ошибка connection is busy with results for another command.
Как побороть данную ошибку? Спасибо за ответы.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
01.02.2010, 11:55
    #36441780
Lotus_?
Lotus_?
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Выгрузить из лотуса через ODBC в MSSQL
Lotus_?,

Решил проблему:) В ConnectTO добавил MARS_Connection=yes. Всем спасибо!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Другие СУБД [игнор отключен] [закрыт для гостей] / Выгрузить из лотуса через ODBC в MSSQL / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 386ms
Закрыть
start [/forum/topic.php?fid=56&mobile=1&tid=2015642]:
 0ms
get settings:
 10ms
get forum list:
 13ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 72ms
get topic data:
 12ms
get forum data:
 2ms
get page messages:
 34ms
get tp. blocked users:
 2ms
others: 233ms
total:  386ms
x
x
Закрыть


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