powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / HELP: Не заполняется DBF данными из MS SQL SERVER 2000
3 сообщений из 3, страница 1 из 1
HELP: Не заполняется DBF данными из MS SQL SERVER 2000
    #32923999
andrew1981
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Народ подскажите в чем дело: Экспортируется табличка из MS SQL SERVER 2000 в DBF IV. Под ОС Windows 2000 все нормально, а в WINDOWS 98 Возникает ошибка: Cannot update. Database or object is read-only.

'---CREATE DBASE IV
Dim dbfConn As New ADODB.Connection, dbfCmd As New ADODB.Command, rs As New ADODB.Recordset
dbfConn.Provider = "Microsoft.Jet.OLEDB.4.0"
dbfConn.Properties("Data Source") = pathDbf
dbfConn.Properties("Extended Properties") = "dBase IV"
dbfConn.Open
dbfCmd.ActiveConnection = dbfConn
dbfCmd.CommandText = "create table " + Left(v_fileName, 8) + " (" + str + ")"
dbfCmd.Execute

Dim dbfrs As New ADODB.Recordset
If Form1.rs.State = 1 Then Form1.rs.Close
Form1.rs.Open "select * from " + Form1.dbName("tempdb", Form1.conn) + "#" + v_fileName, Form1.conn, adOpenDynamic, adLockOptimistic
dbfrs.Open "select * from " + Left(v_fileName, 8), dbfConn, adOpenDynamic, adLockOptimistic
While Form1.rs.EOF = False
dbfrs.AddNew
For k = 1 To Form1.rs.Fields.Count
dbfrs.Fields(k - 1) = Form1.rs.Fields(k - 1)
dbfrs.Update
Next k

Form1.rs.MoveNext
Wend
...
Рейтинг: 0 / 0
HELP: Не заполняется DBF данными из MS SQL SERVER 2000
    #32924027
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
попробуй заюзать Visual Fox Pro driver
...
Рейтинг: 0 / 0
HELP: Не заполняется DBF данными из MS SQL SERVER 2000
    #32925985
Фотография Программист-Любитель
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Очень быструю перекачку из SQL в DBF можно сделать полностью SQL-евскими средствами. Либо через DTS либо через LinkedServer. Я бы выбрал второе.
...
Рейтинг: 0 / 0
3 сообщений из 3, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / HELP: Не заполняется DBF данными из MS SQL SERVER 2000
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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