Access ASP SQL Server VBA NET - Форумы по проектированию

LEADERSOFT.ru Разработка на заказ программ и сайтов

Форумы по информационным технологиям

Начало

Forums

Регистрация | Вход

Форумы

Поиск

Список форумов

Программирование

Microsoft Access. Файлы mdb и accdb

Тема: No Subjec...

Тема: No Subject

15.06.2007 21:03:48

Toliks

1 сообщения

Тема: No Subject

Есть таблица вида:

Field1 Field2
A A1
A A2
A A3
B B1
B B2
C C1
C C2
C C3

На ее основе нужно получить таблицу вида:

Field3 Field4
A A1+A2+A3
B B1+B2
C C1+C2+C3

Все значения полей - текстовые. Число строк в исходной таблице - любое. Под значением в поле Field4 понимается обьединение строк.
Спасибо.

P.S. Общий раздел по запросам
Автор: Toliks от 16.03.2003 14:21:20 Источник ...

15.06.2007 21:03:48

All

4316 сообщения

RE: No Subject

Пишется запрос на группировку, а функция суммирования строк сохраняется в модуле VBA как Public

SELECT Table1.f1, strSum([f1]) AS str
FROM Table1 GROUP BY Table1.f1;

Public Function strSum(id As String) As String
Dim dbs As DAO.Database
Dim rst As DAO.Recordset
Set dbs = CurrentDb
Set rst = dbs.OpenRecordset("SELECT * FROM [Table1] WHERE [f1]='" & id & "'")
rst.MoveLast
rst.MoveFirst
strSum = ""
For i = 0 To rst.RecordCount - 1
strSum = strSum & rst!f2
Next
'...
End Function

P.S. Общий раздел по запросам
Автор: Expert от 0:00:00 Источник ...

Страница 1 из 1

Программирование

Microsoft Access. Файлы mdb и accdb

Тема: No Subjec...

Поиск

Список форумов

Начало | Forums