Новые сообщения [новые:0]
Дайджест
Горячие темы
Избранное [новые:0]
Форумы
Пользователи
Статистика
Статистика нагрузки
Мод. лог
Поиск
|
|
07.02.2005, 12:56:53
|
|||
|---|---|---|---|
|
|||
VB + dbf |
|||
|
#18+
Есть такой код в Access: Dim db As Database, rst As Recordset Set db = CurrentDb Dim strSql As String strSql = "SELECT *****;" Set rst = db.OpenRecordset(strSql) Как сделать то же самое в VB с таблицей dbf? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
11.02.2005, 02:16:49
|
|||
|---|---|---|---|
|
|||
VB + dbf |
|||
|
#18+
Set cnn = CreateObject("ADODB.Connection") Set rst = CreateObject("ADODB.Recordset") cnn.Provider = "Microsoft.Jet.OLEDB.4.0" cnn.Properties("Extended Properties") = "dBase IV" cnn.Properties("Data Source") = App.Path & "\" cnn.Open rst.ActiveConnection = cnn rst.Source = "charSet.dbf" rst.Open rst.MoveFirst MsgBox rst(1) Все работает, а вот как сделать так, чтобы в качестве источника данных указать не таблицу, а запрос, основанный на ней? То есть, чтобы rst = SELECT ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
11.02.2005, 09:30:00
|
|||
|---|---|---|---|
VB + dbf |
|||
|
#18+
Set cnn = CreateObject("ADODB.Connection") Set rst = CreateObject("ADODB.Recordset") cnn.Provider = "Microsoft.Jet.OLEDB.4.0" cnn.Properties("Extended Properties") = "dBase IV" cnn.Properties("Data Source") = Имя базы cnn.Open rst.Open "SELECT ...", cn, тип рекорда, тип блокировки rst.MoveFirst MsgBox rst(1) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
11.02.2005, 14:34:45
|
|||
|---|---|---|---|
|
|||
VB + dbf |
|||
|
#18+
Извините, как должно выглядеть "имя базы", "тип рекорда", "тип блокировки"?... На App.Path & "\charSet.dbf" ругается. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
14.02.2005, 10:50:58
|
|||
|---|---|---|---|
VB + dbf |
|||
|
#18+
Путь вроде правильный, надо проверить есть ли там вообще файл с данными а про тип рекордсета,то можно такой rs.Open strSQL, cn, adOpenKeySet, adLockReadOnly тип рекорда - динамический и только для чтения (лучше ХЕЛП посмотреть, там все описано) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
start [/forum/topic.php?fid=60&tablet=1&tid=2168225]: |
0ms |
get settings: |
8ms |
get forum list: |
13ms |
check forum access: |
2ms |
check topic access: |
2ms |
track hit: |
31ms |
get topic data: |
6ms |
get forum data: |
2ms |
get page messages: |
32ms |
get tp. blocked users: |
1ms |
| others: | 234ms |
| total: | 331ms |
| 0 / 0 |
