Динамическая генерация отчётов

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

Динамическая генерация отчётов

Сообщение borg » 05.06.2005 (Вс) 20:08

Привет всем!
задумка такая
перед генерацией отчёта вылетает формочка
на ней куча флажков
в зависимости от того какие флажки выбраны
меняется информация в отчёте
как такое забодяжить???
проблема в том, что я не могу найти в хелпе каким макаром самому
бомбить отчёт
поможите люди добрыя

Tin
Woodsman
Woodsman
Аватара пользователя
 
Сообщения: 1001
Зарегистрирован: 08.12.2001 (Сб) 11:00
Откуда: Kazakhstan

Сообщение Tin » 06.06.2005 (Пн) 7:07

Ну ты и загнул...

"У меня есть магнитола
У нее есть куча кнопочек
Куча функций
Громкость, тюнинг
Проблема в том
как самому записать компакт диск"

Из чего делаются отчеты? какие галочки должны быть? вообще что ты хочешь сделать?
888888__88__88____88
__88________8888__88
__88____88__88__8888
__88____88__88____88

borg
Обычный пользователь
Обычный пользователь
 
Сообщения: 78
Зарегистрирован: 12.11.2004 (Пт) 2:08

Сообщение borg » 06.06.2005 (Пн) 15:20

отчёты формируются на основе запросов...
ну допустим
форма, на ней куча флажков
-включить информацию о средствах связи
-включить инф. о кол-ве сотрудников
и т.д.
выбрал 1е - получил в отчете инф. о средствах связи
выбрал 1е и 2е
получил отчет, содержащий информацию о ср-вах связи и о сотрудниках
так как такое сделать?

Konst_One
Член-корреспондент академии VBStreets
Член-корреспондент академии VBStreets
Аватара пользователя
 
Сообщения: 3041
Зарегистрирован: 09.04.2004 (Пт) 13:47
Откуда: Химки

Сообщение Konst_One » 06.06.2005 (Пн) 15:24

а в чем у тебя проблема? никак не можешь выбрать средство или конкретная реализация в выбранном средстве не работает :?:

Александр80
Bonachón
Bonachón
 
Сообщения: 659
Зарегистрирован: 20.03.2004 (Сб) 23:50
Откуда: г.Москва

Сообщение Александр80 » 06.06.2005 (Пн) 19:14

borg юзай DataReport он кажется встроен в Visual Basic 6.0

Можно найти и ACTIVE REPORTS Standart 2.0 или Cristal Reports ...

borg
Обычный пользователь
Обычный пользователь
 
Сообщения: 78
Зарегистрирован: 12.11.2004 (Пт) 2:08

Сообщение borg » 06.06.2005 (Пн) 21:02

так проблема в том, что
я в Access'e
и обьясните пожалуйста, что это за Crystal Reports и с чем его едят?
как подключать, где можно инфу по нему взять и т.д. и т.п.

Tin
Woodsman
Woodsman
Аватара пользователя
 
Сообщения: 1001
Зарегистрирован: 08.12.2001 (Сб) 11:00
Откуда: Kazakhstan

Сообщение Tin » 07.06.2005 (Вт) 6:31

Скинь базу... все сделаем :wink:
888888__88__88____88
__88________8888__88
__88____88__88__8888
__88____88__88____88

borg
Обычный пользователь
Обычный пользователь
 
Сообщения: 78
Зарегистрирован: 12.11.2004 (Пт) 2:08

Сообщение borg » 07.06.2005 (Вт) 8:56

куда кидать?(она правда со всей фигнёй 4mb весит, а если туда исчо activeX компоненты впиндюрить то все 20)

Tin
Woodsman
Woodsman
Аватара пользователя
 
Сообщения: 1001
Зарегистрирован: 08.12.2001 (Сб) 11:00
Откуда: Kazakhstan

Сообщение Tin » 07.06.2005 (Вт) 10:06

На мыло... см контакты
888888__88__88____88
__88________8888__88
__88____88__88__8888
__88____88__88____88

borg
Обычный пользователь
Обычный пользователь
 
Сообщения: 78
Зарегистрирован: 12.11.2004 (Пт) 2:08

Сообщение borg » 14.06.2005 (Вт) 19:43

Пасиб, офигенно помог:(

Tin
Woodsman
Woodsman
Аватара пользователя
 
Сообщения: 1001
Зарегистрирован: 08.12.2001 (Сб) 11:00
Откуда: Kazakhstan

Сообщение Tin » 15.06.2005 (Ср) 6:17

Напиши полностью ТЗ...
888888__88__88____88
__88________8888__88
__88____88__88__8888
__88____88__88____88

borg
Обычный пользователь
Обычный пользователь
 
Сообщения: 78
Зарегистрирован: 12.11.2004 (Пт) 2:08

Сообщение borg » 15.06.2005 (Ср) 13:57

лови, выслал на мыло

Al Khamid
Бывалый
Бывалый
Аватара пользователя
 
Сообщения: 274
Зарегистрирован: 11.02.2004 (Ср) 10:00
Откуда: Москва, Ховрино

Сообщение Al Khamid » 17.06.2005 (Пт) 14:08

14
Последний раз редактировалось Al Khamid 02.11.2007 (Пт) 19:20, всего редактировалось 1 раз.

maxyc
Начинающий
Начинающий
 
Сообщения: 20
Зарегистрирован: 23.05.2004 (Вс) 14:13
Откуда: Новоуральск

Сообщение maxyc » 07.10.2007 (Вс) 1:49

Использую MS ADO Data Control 6.0, она немного отличается от Micrisoft ActiveX Data Objects 2.x Library который вы используете в качестве создания отчетов.
Нащел следующий код:
Set rs = New ADODB.Recordset
......
'Связываем DataReport и наш рекордсет
Set DataReport1.DataSource = rs

Логически я так понял что rs это рекордсет. написал следующее
Dim rsReport As Recordset
Set rsReport = DB.OpenRecordset("Personal")
Set drPersonalList.DataSource = rsReport

но чот не робит. прошу прощения за возможно тупой вопрос, я больше специализируюсь на php+mysql и прочей области программирования. от сюдого только въезжаю в работу системного программирования.
так вот вопрос в том, можно ли при помощи моего АДО сделать отчет в датарепортс?
заранее вам благодарен...

Antonariy
Повелитель Internet Explorer
Повелитель Internet Explorer
Аватара пользователя
 
Сообщения: 4824
Зарегистрирован: 28.04.2005 (Чт) 14:33
Откуда: Мимо проходил

Сообщение Antonariy » 07.10.2007 (Вс) 10:18

Судя по DB.OpenRecordset("Personal"), дело происходит в аксессе. А OpenRecordset возвращает DAO.Recordset, а не ADODB.Recordset.
Лучший способ понять что-то самому — объяснить это другому.

maxyc
Начинающий
Начинающий
 
Сообщения: 20
Зарегистрирован: 23.05.2004 (Вс) 14:13
Откуда: Новоуральск

Сообщение maxyc » 07.10.2007 (Вс) 18:04

а не подскажете к примеру как сделать ADODB подключение к mysql серверу?
Вот что сделал....
[code]
sCn = "Driver={MySQL ODBC 3.51 Driver};Server=127.0.0.1;Database=school; User= root;Password=;Option=3;"


Set cnMySql = New ADODB.Connection
cnMySql.CursorLocation = adUseClient
cnMySql.CommandTimeout = 120
cnMySql.ConnectionTimeout = 120
cnMySql.Provider = "Microsoft.Jet.OLEDB.3.51" - 'наверное здесь ошибка?! если да что тут прально написать?
cnMySql.Open sCn

[/code]

[err]
Coldn't find installable ISAM
[/err]

не догнал если чесно. все таблицы у мя MyISAM

[link]пример брал с http://bbs.vbstreets.ru/viewtopic.php?p ... db#6670242[/link]

спс
заранее вам благодарен...

maxyc
Начинающий
Начинающий
 
Сообщения: 20
Зарегистрирован: 23.05.2004 (Вс) 14:13
Откуда: Новоуральск

Сообщение maxyc » 07.10.2007 (Вс) 18:06

Antonariy, верно. извиняюсь что сразу не написал. до текущего момента работал с файлом mdb, но осенило что файла мне не хватит. одна база должна будет более 2 человек одновременно подключать по локалке школы... ступил

В данный момент делаю на visual basic 6.0 (на NET изучать уже нет времени). идеальнее всего для меня будет связка Visual Basic 6.0 + MySQL
заранее вам благодарен...

VVitafresh
Продвинутый гуру
Продвинутый гуру
Аватара пользователя
 
Сообщения: 1641
Зарегистрирован: 12.05.2005 (Чт) 14:44
Откуда: Херсон, UA

Сообщение VVitafresh » 07.10.2007 (Вс) 18:13

а не подскажете к примеру как сделать ADODB подключение к mysql серверу?

Код: Выделить всё
sCn = "Driver={MySQL ODBC 3.51 Driver};Server=127.0.0.1;Database=school; User= root;Password=;Option=3;"


Set cnMySql = New ADODB.Connection
cnMySql.CursorLocation = adUseClient
cnMySql.CommandTimeout = 120
cnMySql.ConnectionTimeout = 120
cnMySql.Open sCn

Просто не пиши помеченную тобой строку -- это у тебя вообще подключение к базе mdb...
Никакую проблему невозможно решить на том же уровне, на каком она возникла. Нужно стать выше этой проблемы, поднявшись на следующий уровень.

maxyc
Начинающий
Начинающий
 
Сообщения: 20
Зарегистрирован: 23.05.2004 (Вс) 14:13
Откуда: Новоуральск

Сообщение maxyc » 07.10.2007 (Вс) 18:20

тогда:
источник данных не найден и не указан драйвер, используемый по умолчанию.
заранее вам благодарен...

dr.MIG
Гуру
Гуру
Аватара пользователя
 
Сообщения: 1441
Зарегистрирован: 18.12.2004 (Сб) 9:53
Откуда: г.Ярославль

Сообщение dr.MIG » 07.10.2007 (Вс) 19:04

Код правильный. Отсюда резонный вопрос -- а у тебя вообще ODBC-драйверы установлены?
Salus populi suprema lex

Хакер
Телепат
Телепат
Аватара пользователя
 
Сообщения: 16478
Зарегистрирован: 13.11.2005 (Вс) 2:43
Откуда: Казахстан, Петропавловск

Сообщение Хакер » 07.10.2007 (Вс) 19:55

[к_сведению]
Некоторые люди, вроде меня, использует библиотеку libmysql.dll и вполне счастливы. Те, кто начинал работать с MySQL в PHP (таких много, ввиду популярности LAMP), счастливы вдвойне, потому как работать предстоит с уже знакомыми функциями (большинство функций этой библиотеки совпадают по названию, назначению и аргументам с теми, что предоставляются языком PHP).
[/к_сведению]
—We separate their smiling faces from the rest of their body, Captain.
—That's right! We decapitate them.

maxyc
Начинающий
Начинающий
 
Сообщения: 20
Зарегистрирован: 23.05.2004 (Вс) 14:13
Откуда: Новоуральск

Сообщение maxyc » 08.10.2007 (Пн) 19:45

Хакер:
Огромное спасибо, тоже работал с этой библой. Тоже мысли были с ней продолжать работать и в данном проекте... тогда есть ли какие нить мысли, линки по созданию отчетов на основе не рекордсетов а на основе своих данных?

Dr.MIG
Как оказалось нет. вчера уже в 4 утра доперло шо надо скачать с mysql.ru... of скачаю )

с ув. maxyc
заранее вам благодарен...

Хакер
Телепат
Телепат
Аватара пользователя
 
Сообщения: 16478
Зарегистрирован: 13.11.2005 (Вс) 2:43
Откуда: Казахстан, Петропавловск

Сообщение Хакер » 09.10.2007 (Вт) 3:22

тогда есть ли какие нить мысли, линки по созданию отчетов на основе не рекордсетов а на основе своих данных?


Почему нет?
—We separate their smiling faces from the rest of their body, Captain.
—That's right! We decapitate them.

maxyc
Начинающий
Начинающий
 
Сообщения: 20
Зарегистрирован: 23.05.2004 (Вс) 14:13
Откуда: Новоуральск

Сообщение maxyc » 09.10.2007 (Вт) 13:03

большое Вам спасибо. разобрался во всем =)
заранее вам благодарен...


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

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

Сейчас этот форум просматривают: Yandex-бот и гости: 93

    TopList