|
|
|
Помогите,пожалуйста!
|
|||
|---|---|---|---|
|
#18+
Помогите! Ситуация такая. Есть программа для заполнения табелей рабочего времени. Табель заполняется на основе графика. Графики работы хранятся в отдельной таблице. Сам табель хранится в другой таблице. Поступаю так, загружаю в listbox графики из таблицы графиков и потом c помощью метода Column списка беру оттуда данные и присваиваю полям таблицы где хранится табель. Для перехода к следующей записи использую docmd и снова вызываю эту процедудуру загрузки из списка графиков. Таким образом заполняются табеля для 1200 человек. Но с большим торможением. Может быть подскажете.Можно ли использовать объект recordset для подобных действий (т.е. ,брать данные из одной таблицы и записывать их в поля другой таблицы). По моему с recordset все должно действовать на порядок быстрей. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 08.07.2003, 10:10 |
|
||
|
Помогите,пожалуйста!
|
|||
|---|---|---|---|
|
#18+
не можно, а нужно. открываешь 2 recordset-a, по одному на каждую таблицу и перекачиваешь чего и куда хочешь. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 08.07.2003, 10:19 |
|
||
|
Помогите,пожалуйста!
|
|||
|---|---|---|---|
|
#18+
а если удасться - то лучше всего с помощью запросов вставить или проапдейтить... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 08.07.2003, 10:23 |
|
||
|
Помогите,пожалуйста!
|
|||
|---|---|---|---|
|
#18+
Так подскажите примерно механизм перекачки Dim db as database,rs1 as recordset,rs2 as recordset set db=currentdb set rs1=db.openrecordset("Table1") set rs2=db.openrecordset("Table2") вот открыли рекордсеты. Как дальше поступить? Сложность заключается в том что нужно в каждую из 1200 записей таблицы table1 где хранятся табеля работников,записать соответствующий график из таблицы table2. Тип и номер графика указывается в поле таблицы table1. После работы этого кода,каждому работнику в его табель должен записаться его график работы. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 08.07.2003, 10:29 |
|
||
|
Помогите,пожалуйста!
|
|||
|---|---|---|---|
|
#18+
while not rs1.eof rs2.findfirst "[Код соответсвия]=" & rs1![Код соответсвия] rs1.edit rs1.Поле1=rs2.Поле1 ... rs1.ПолеN=rs2.ПолеN rs1.update rs1.movenext wend ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 08.07.2003, 10:34 |
|
||
|
Помогите,пожалуйста!
|
|||
|---|---|---|---|
|
#18+
Sasha 1 Огромное спасибо. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 08.07.2003, 10:43 |
|
||
|
Помогите,пожалуйста!
|
|||
|---|---|---|---|
|
#18+
А что мешает выполнить запрос Код: plaintext 1. 2. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 08.07.2003, 11:01 |
|
||
|
|

start [/forum/topic.php?fid=45&msg=32201606&tid=1680687]: |
0ms |
get settings: |
7ms |
get forum list: |
14ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
47ms |
get topic data: |
8ms |
get forum data: |
2ms |
get page messages: |
35ms |
get tp. blocked users: |
1ms |
| others: | 192ms |
| total: | 312ms |

| 0 / 0 |
