Печать данных

Работа VB и СУБД (Access, MSSQL, MySQL, Oracle и пр.)
Правила форума
При создании новой темы не забывайте указывать используемую СУБД.
lun
Начинающий
Начинающий
 
Сообщения: 8
Зарегистрирован: 27.01.2005 (Чт) 1:04

Печать данных

Сообщение lun » 10.02.2005 (Чт) 1:42

ПОМОГИТЕ ПОЖАЛУЙСТА!!!!!!!!!!
Как можно распечатать данные из формы?
Источник данных для формы - набор записей Recordset.
Я выбираю какую-либо запись, и хочу что-бы в отчет вывелась только она.
Если Использовать Data Environment, то в отчет передаются все записи таблицы. :?: :?: :?: :?: :?:
Спасибо!

Ennor
Конструктивный критик
Конструктивный критик
 
Сообщения: 2504
Зарегистрирован: 18.12.2001 (Вт) 3:58
Откуда: Калуга -> Москва

Сообщение Ennor » 10.02.2005 (Чт) 12:32

Отправляй на печать рекордсет, в котором содержится только эта запись :) .

lun
Начинающий
Начинающий
 
Сообщения: 8
Зарегистрирован: 27.01.2005 (Чт) 1:04

Сообщение lun » 10.02.2005 (Чт) 12:39

Ennor писал(а):Отправляй на печать рекордсет, в котором содержится только эта запись :) .


Отличное предложение. Спасибо!
А как мне получить этот рекордсет?Я идиот! Убейте меня, кто-нибудь!??

Ennor
Конструктивный критик
Конструктивный критик
 
Сообщения: 2504
Зарегистрирован: 18.12.2001 (Вт) 3:58
Откуда: Калуга -> Москва

Сообщение Ennor » 11.02.2005 (Пт) 23:38

Существует какой-нить уникальный признак, на основании которого одну строку можно гарантированно выбрать из множества остальных в твоем случае? Ну вот, создай рекордсет, помести в свойство Source (для ADO; не знаю, с чем именно ты там работаешь) селект, который выберет только нужную тебе запись, открой его и отправь на печать. Собсно, все.

Если что-то непонятно, то желательно заодно привести структуру, возвращаемую запросом, структуры используемых при этом таблиц, ну и краткое описание бизнес-логики, реализуемую всем этим хозяйством.

lun
Начинающий
Начинающий
 
Сообщения: 8
Зарегистрирован: 27.01.2005 (Чт) 1:04

Сообщение lun » 12.02.2005 (Сб) 11:41

[quote="Ennor"]..... создай рекордсет, помести в свойство Source (для ADO; не знаю, с чем именно ты там работаешь) селект, который выберет только нужную тебе запись, открой его и отправь на печать. Собсно, все.
...

Спасибо за ответ:) , но все равно у меня чего то не получается :( ..... По твоим словам должно быть примерно так:

Dim RS As ADODB.Recordset
Set RS = New ADODB.Recordset
Dim strSQL As String
strSQL = "SELECT * FROM view WHERE KL = '" & KLn & "'"
RS.Open strSQL, mCN, adOpenStatic, adLockReadOnly
DataReport.DataSource = Я идиот! Убейте меня, кто-нибудь!
DateReport.DataMember = Я идиот! Убейте меня, кто-нибудь!

Если так правильно, то что нужно написать в
DataReport.DataSource = Я идиот! Убейте меня, кто-нибудь!
DateReport.DataMember = Я идиот! Убейте меня, кто-нибудь!

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

Сообщение Konst_One » 12.02.2005 (Сб) 19:07

Код: Выделить всё
set DataReport.DataSource =rs


DataMember оставляй пустым

lun
Начинающий
Начинающий
 
Сообщения: 8
Зарегистрирован: 27.01.2005 (Чт) 1:04

Сообщение lun » 12.02.2005 (Сб) 22:13

Код:

set DataReport.DataSource =rs

DataMember оставляй пустым




не работает.. :cry:

lun
Начинающий
Начинающий
 
Сообщения: 8
Зарегистрирован: 27.01.2005 (Чт) 1:04

Сообщение lun » 14.02.2005 (Пн) 11:51

Заработало!!!!!!!!!!!!!!!
Ура!!!!!
Всем спасибо!!!!!!!!!!!!! :D


Вернуться в Базы данных

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

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 2

    TopList