запись в БД многомерного масива

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
НиколайП
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 125
Зарегистрирован: 06.12.2005 (Вт) 22:16

запись в БД многомерного масива

Сообщение НиколайП » 10.02.2006 (Пт) 0:41

подскажите что я делаю не правильно

Код: Выделить всё
Dim compl() As Variant
Dim b As Integer
Dim c As Integer

c = Form1.MSFlexGrid1.Rows
ReDim compl(c, 5)

For b = Form1.MSFlexGrid1.FixedRows To Form1.MSFlexGrid1.Rows - 1
compl(b, 0) = Form1.MSFlexGrid1.TextArray(GetCellIndex(b, 0))
compl(b, 1) = Form1.MSFlexGrid1.TextArray(GetCellIndex(b, 1))
compl(b, 2) = Form1.MSFlexGrid1.TextArray(GetCellIndex(b, 2))
compl(b, 3) = Form1.MSFlexGrid1.TextArray(GetCellIndex(b, 3))
compl(b, 4) = Form1.MSFlexGrid1.TextArray(GetCellIndex(b, 4))
Next

S = "SELECT nzak,dataz,cpuz,sumz,kompl,statz,oper FROM zakkomp"
Set R = D.OpenRecordset(S)
n = R.RecordCount
Form1.Label34.Caption = n + 1
R.AddNew
R!dataz = Label9.Caption
R!sumz = Label14.Caption
R!nzak = Form1.Label34.Caption
R!cpuz = Form1.MSFlexGrid1.TextArray(GetCellIndex(1, 1))
R!compl = compl(c, 5) 'в БД это поле типа MEMO
R!statz = Form1.Label20.Caption

R.Update

SergT
Бывалый
Бывалый
Аватара пользователя
 
Сообщения: 237
Зарегистрирован: 22.06.2005 (Ср) 21:50
Откуда: Москва

Re: запись в БД многомерного масива

Сообщение SergT » 10.02.2006 (Пт) 9:27

НиколайП писал(а):подскажите что я делаю не правильно...
R!compl = compl(c, 5) 'в БД это поле типа MEMO
R.Update[/code]

Я думаю, что такой вариант не пройдет! Я бы создал текстовую запись с разделителями и уже ее положил в таблицу. Думаю, что надо правильно понимать как устроен массив. И если бы ты все таки уложил массив в поле МЕМО - как позже его читать? Как узнать его параметры (строк? столбцов?)

Не очень в тему, но первое,что нашел:
http://bbs.vbstreets.ru/viewtopic.php?t ... ight=vbtab
Может натолкнет на мысли об изменении своего кода :wink:
Л. Толстой, «зачем обдумывать обдуманное, бери готовое и иди дальше, в этом сила человечества»
"Всё в наших руках, поэтому их нельзя опускать" (Коко Шанель)

Twister
Теоретик
Теоретик
Аватара пользователя
 
Сообщения: 2251
Зарегистрирован: 28.06.2005 (Вт) 12:32
Откуда: Алматы

Сообщение Twister » 10.02.2006 (Пт) 12:31

Я бы создал текстовую запись с разделителями и уже ее положил в таблицу

А я бы создал еще одну таблицу...
А я все практикую лечение травами...

НиколайП
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 125
Зарегистрирован: 06.12.2005 (Вт) 22:16

Сообщение НиколайП » 16.02.2006 (Чт) 13:12

Twister писал:
А я бы создал еще одну таблицу...


а если таких таблиц получится за год несколько тысяч ? :D
я думаю это будет не лучший вариант ... :wink:

Andrey Fedorov
Член-корреспондент академии VBStreets
Член-корреспондент академии VBStreets
 
Сообщения: 3287
Зарегистрирован: 21.05.2004 (Пт) 9:28
Откуда: Москва

Сообщение Andrey Fedorov » 16.02.2006 (Чт) 16:44

НиколайП писал(а):
Twister писал:
А я бы создал еще одну таблицу...


а если таких таблиц получится за год несколько тысяч ? :D
я думаю это будет не лучший вариант ... :wink:


И все таблицы разные? Если да, то XML их... Если структура таблиц одинакова, то еще одной таблицы вполне хватит.
Фиг Вам! - Сказал Чебурашка, обгладывая Крокодила Гену...

CORBA
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 179
Зарегистрирован: 22.11.2003 (Сб) 13:41
Откуда: Ukraine-Crimea-Feodosia

Сообщение CORBA » 16.02.2006 (Чт) 23:56

НиколайП писал(а):
Twister писал:
А я бы создал еще одну таблицу...


а если таких таблиц получится за год несколько тысяч ? :D
я думаю это будет не лучший вариант ... :wink:


получится одна таблица, в которой несколько тысяч строк за год и что тут такого??? :D
У каждой сложной задачи есть множество простых для понимания, но неправильных решений.


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: AhrefsBot и гости: 88

    TopList