Форум программистов, компьютерный форум, киберфорум
Наши страницы
Visual Basic
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.67/6: Рейтинг темы: голосов - 6, средняя оценка - 4.67
Aleksey_demon
0 / 0 / 0
Регистрация: 10.09.2007
Сообщений: 13
1

На VB6 используя ADO в Таблицу MDB данные их TXT файла!

10.09.2007, 15:04. Просмотров 1028. Ответов 1
Метки нет (Все метки)

Как на VB6 в таблицу MDB базы закачать данные из
текстового файла в котором данные (столбцы) фиксированной длины?
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
10.09.2007, 15:04
Ответы с готовыми решениями:

Возможно ли открыть БД(mdb) из VB6 через ADO без образования файла блокировки?
Хочу взять данные с файл сервера с правом только на чтение! Возможно ли открыть...

Доступ к MDB из VB6
Может у кого-нить есть пример работы с базами данных (*.mdb - делал в VisData)....

Имеется ли возможность открывать отчеты в *.mdb из VB6.0?
В уже готовой *.mdb есть несколько отчетов, вопрос, могу ли я из VB как то...

Возможно ли поднять/прочитать/запустить на VB6 file.mdb?
есть 2 вопроса 1: где можно найти VB6 2: возможно ли...

Как поместить данные из столбцов нескольких таблиц одного файла mdb в поля одной формы?
Как поместить данные из столбцов нескольких таблиц одного файла mdb в поля...

1
Леон
0 / 0 / 1
Регистрация: 28.07.2007
Сообщений: 177
10.09.2007, 16:21 2
Чем проще, тем лучше. Процедура считает из файла два поля шириной 10 и 20 соответственно и внесёт их в таблицу tblTest (в поля aa,bb):
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Private Sub ReadFile()
Dim cn As ADODB.Connection
Dim strLine As String
Dim strSQL As String
 
Set cn = New ADODB.Connection
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\test.mdb"
Open "c:\test.txt" For Input Access Read As #1
Do While Not EOF(1)
   Line Input #1, strLine
   strSQL = "insert into tblTest (aa, bb) " & _
      "values('' & Mid(strLine, 1, 10) & '','' & _
      Mid(strLine, 11, 20) & '')"
   cn.Execute strSQL, , adExecuteNoRecords
Loop
 
Close #1
Set cn = Nothing
End Sub
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
10.09.2007, 16:21

Проблема Подключение к *.MDB(pwd) с помощью ADO
База данных *.MDB защищена паролем. Обычная защита. Не могу подключится к ней...

Проблема подключения к MySQL из VB6 с помощью ADO
цель: программа на ВБ подключиться в ИНете к базе данных для управления...

Как поставить пароль в run-time-е на mdb через простой ADO?
Открываю базу так: MainDB.Open "c:projectsastelphones.mdb", "admin", Pass,...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru