Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Работа с данными

Страница: 1 |

 

  Вопрос: Печать отчета RPT Добавлено: 18.09.07 16:56  

Автор вопроса:  BeautyCat
База WORKS4.MDB была создана в старом Access (предполагаю, что в 97 или ранее).
После того, как я преобразовала базу данных в Microsoft Access 2000, в программе Visual Basic 6 поменяла References с Microsoft .DAO 3.51 Object Library на Microsoft .DAO 3.6 Object Library и старый отчет RPT преобразовала в новую версию программы Crystal Report 11, то появляется ошибка “20525: Unable to load report”. Запрос отчета формируется раньше и из программы Crystal Report 11 отчет platpor.rpt распечатывается без проблем. Мне по идеи нужно просто распечатать готовый отчет.
Что мне делать? Помогите, пожалуйста?

Код программы:
  Report1.Destination = crptToPrinter '1 ФорматВыводаДокумента
  Report1.DataFiles(0) = “C:\apr\DealCom.IV\Base\Works\WORKS4.mdb”
  Report1.ReportFileName = “C:\apr\DealCom.IV\Bin\Docs\platpor.rpt”
  Report1.Action = 1

Ответить

  Ответы Всего ответов: 9  

Номер ответа: 1
Автор ответа:
 Arseny



ICQ: 298826769 

Вопросов: 53
Ответов: 1732
 Профиль | | #1 Добавлено: 18.09.07 21:35
А ActiveX Кристалла тоже от 11 версии на форме вытащен? или от старой?

Ответить

Номер ответа: 2
Автор ответа:
 BeautyCat



Вопросов: 2
Ответов: 5
 Профиль | | #2 Добавлено: 19.09.07 10:20
ActiveX от старого Crystal Report Control 4.6.
Дело в том, что от нового Crystal Report 11 нет ActiveX Crystal Report Control.
Есть:
Crystal ActiveX Report Viewer Library 11.0;
Crystal Common File Dialog Library 11.0;
Crystal OLAP DimensionExlorer Control 2.0;
Crystal Report Control 4.6;
Crystal Report Print Control Type Library 11.0;
Crystal Select Expert Library 11.0;
Crystal Visual Linking Editor 11.00.

Может мне перейти на Crystal Report Print Control Type Library 11.0 или Crystal ActiveX Report Viewer Library 11.0? Отчетов старых RPT много их переделывать чекнишься.
Или у меня неважная версия продукта или Soft переорганизовал работу отчетов?

Ответить

Номер ответа: 3
Автор ответа:
 Arseny



ICQ: 298826769 

Вопросов: 53
Ответов: 1732
 Профиль | | #3 Добавлено: 19.09.07 17:04
Ну так! :) Формат файлов *.rpt они 100% процентов переработали, поэтому он и не будет поддерживаться в старой версии.
Я пользую Crystal ActiveX Report Viewer и вполне доволен. Так что тебе надо немного переработать программу.

Ответить

Номер ответа: 4
Автор ответа:
 BeautyCat



Вопросов: 2
Ответов: 5
 Профиль | | #4 Добавлено: 19.09.07 17:21
Arseny,а ты мне можешь прислать кусок программного кода с использованием Crystal ActiveX Report Viewer. Буду очень благодарна.

Ответить

Номер ответа: 5
Автор ответа:
 Arseny



ICQ: 298826769 

Вопросов: 53
Ответов: 1732
 Профиль | | #5 Добавлено: 19.09.07 17:50
При установке Crystal'а можно установить и примеры на VB6. Там все это есть. Взгляни в расширенную настройку при установке.

Ответить

Номер ответа: 6
Автор ответа:
 BeautyCat



Вопросов: 2
Ответов: 5
 Профиль | | #6 Добавлено: 20.09.07 12:18
Я нашла HELP - CrystalDevHelp.chm в программе Crystal Report 11. Ты про него имел ввиду или ты конкретно не знаешь?

Ответить

Номер ответа: 7
Автор ответа:
 Arseny



ICQ: 298826769 

Вопросов: 53
Ответов: 1732
 Профиль | | #7 Добавлено: 20.09.07 12:56
Нет я имел ввиду конкретные примеры. У меня шли вместе с установкой. Полноценные VB6-проекты.
Ладно, сейчас порыщу, найду - скину.

Ответить

Номер ответа: 8
Автор ответа:
 BeautyCat



Вопросов: 2
Ответов: 5
 Профиль | | #8 Добавлено: 20.09.07 13:30
Я буду очень ждать, а то похоже у меня нет.

Ответить

Номер ответа: 9
Автор ответа:
 BeautyCat



Вопросов: 2
Ответов: 5
 Профиль | | #9 Добавлено: 20.09.07 17:42
Чего-то у меня не получается!!!
Я нашла функцию OpenReport и попыталась ей воспользоваться, но у меня выходит ошибка цифрой нуль.

Dim appCRAXDRT As New CRAXDRT.Application
  Set appCRAXDRT = New CRAXDRT.Application
  
  ;Dim appReport As CRAXDRT.Report
  Set appReport = New CRAXDRT.Report
  
  appReport = appCRAXDRT.OpenReport("C:\apr\DealCom.IV\Bin\Docs\platpor.rpt";)
  
  Set appCRAXDRT = Nothing
  Set appReport = Nothing

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам