Добро пожаловать в форум, Guest  >>   Войти | Регистрация | Поиск | Правила | В избранное | Подписаться
Все форумы / Microsoft Access Новый топик    Ответить
 Как вывести в запросе строку n раз?  [new]
Любопыт
Member

Откуда:
Сообщений: 1599
Есть таблица с одним полем - тип integer.
например:
2
3
1
Нужно вывести каждую строку n раз в зависимости от значения поля в таблице, и пронумеровать в каждой группе.
2 1
2 2
3 1
3 2
3 3
1 1
Можно ли это?
20 апр 07, 10:34    [4046744]     Ответить | Цитировать Сообщить модератору
 Re: Как вывести в запросе строку n раз?  [new]
sdfgsdfgsdf
Member

Откуда:
Сообщений: 5996
Пока на ум приходит только одно:
Сделать другую таблицу и процедуркой туда всё и загнать, типа :


rs = CurrentDB().OpenRecordset("SELECT Nom FROM T_Nom")
rs2 = CurrentDB().OpenRecordset("SELECT * FROM T_NomOUT")

Do While NOT rs.EOF()
    
     for i = 1 to rs![Nom] 
          rs2.AddNew
          rs2![Nom] = rs![Nom]
          rs2![id] = i
     Next
          
    rs.MoveNext

Loop
20 апр 07, 13:30    [4048333]     Ответить | Цитировать Сообщить модератору
 Re: Как вывести в запросе строку n раз?  [new]
Любопыт
Member

Откуда:
Сообщений: 1599
Ну да только с доп.таблицей. Это долго. Уж лучше циклы прокрутить.
20 апр 07, 13:32    [4048354]     Ответить | Цитировать Сообщить модератору
 Re: Как вывести в запросе строку n раз?  [new]
sdfgsdfgsdf
Member

Откуда:
Сообщений: 5996
Сори , UPDETE забил :)

rs = CurrentDB().OpenRecordset("SELECT Nom FROM T_Nom")
rs2 = CurrentDB().OpenRecordset("SELECT * FROM T_NomOUT")

Do While NOT rs.EOF()

for i = 1 to rs![Nom]
rs2.AddNew
rs2![Nom] = rs![Nom]
rs2![id] = i

rs2.Udate

Next

rs.MoveNext

Loop
20 апр 07, 13:32    [4048362]     Ответить | Цитировать Сообщить модератору
Все форумы / Microsoft Access Ответить