|
|
|
Переделать ОТЧЕТ в WORD – документ
|
|||
|---|---|---|---|
|
#18+
Привет, всем! Хотелось бы программно сделать следующее: 1. Удалить старый файл. 2. Переделать ОТЧЕТ в WORD (!) –документ. 3. Сохранить файл, причем не там, куда Бил хочет, а куда я. При закрытии отчета такую бы процедурку. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 04.09.2004, 16:27:23 |
|
||
|
Переделать ОТЧЕТ в WORD – документ
|
|||
|---|---|---|---|
|
#18+
на закрытие отчёта привесь сам сам и имя отчёта передай Код: plaintext 1. 2. 3. 4. 5. 6. 7. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 04.09.2004, 16:55:19 |
|
||
|
Переделать ОТЧЕТ в WORD – документ
|
|||
|---|---|---|---|
|
#18+
Всё, конечно прекрасно, даже один раз сработало, только потом: Run-time error "2585" ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 05.09.2004, 20:47:41 |
|
||
|
Переделать ОТЧЕТ в WORD – документ
|
|||
|---|---|---|---|
|
#18+
v skopinВсё, конечно прекрасно, даже один раз сработало, только потом: Run-time error "2585" код не вижу - вечер темно! ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 05.09.2004, 20:49:38 |
|
||
|
Переделать ОТЧЕТ в WORD – документ
|
|||
|---|---|---|---|
|
#18+
"Невозможен запуск этой макрокоманды при обработке события формы или отчета" ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 05.09.2004, 20:54:48 |
|
||
|
Переделать ОТЧЕТ в WORD – документ
|
|||
|---|---|---|---|
|
#18+
v skopin"Невозможен запуск этой макрокоманды при обработке события формы или отчета" итить код НЕ ошибки - твой код (VBA доннер веттер) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 05.09.2004, 20:57:23 |
|
||
|
Переделать ОТЧЕТ в WORD – документ
|
|||
|---|---|---|---|
|
#18+
Dim rtfName As String rtfName = "E:\BSkopin1.rtf" stDocName = Report_B.Name 'Kill rtfName ' - DoCmd.OutputTo acReport, stDocName, acFormatRTF, rtfName ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 05.09.2004, 21:05:42 |
|
||
|
Переделать ОТЧЕТ в WORD – документ
|
|||
|---|---|---|---|
|
#18+
В.Скопин - ВЕСЬ код покажи(от начала процедуры) + Report_B.Name он чё с неба берётся(и где его Dim) + версия Access/формат файла + на какой строке ошибка + debug.print Report_B.Name ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 05.09.2004, 21:15:28 |
|
||
|
Переделать ОТЧЕТ в WORD – документ
|
|||
|---|---|---|---|
|
#18+
Private Sub Report_Close() Dim stDocName As String Dim rtfName As String stDocName = Report_tab.Name rtfName = "E:\" & stDocName & ".rtf" 'On Error Resume Next 'Kill rtfName ' - ??????? ? ??? DoCmd.OutputTo acReport, stDocName, acFormatRTF, rtfName End Sub это эксперементальая база из одного отчета "tab" и таблици "tab" ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 05.09.2004, 21:21:24 |
|
||
|
Переделать ОТЧЕТ в WORD – документ
|
|||
|---|---|---|---|
|
#18+
Больше кадов в ней никаких нет! ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 05.09.2004, 21:49:36 |
|
||
|
Переделать ОТЧЕТ в WORD – документ
|
|||
|---|---|---|---|
|
#18+
скопин - ты зачем издеваешься? тебе дают рабочий код, ты его ломаешь и говоришь - бяка мол код - не работает. Скопин - ты ПЛОХАЯ девочка... (с выражением лица) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 05.09.2004, 21:52:31 |
|
||
|
Переделать ОТЧЕТ в WORD – документ
|
|||
|---|---|---|---|
|
#18+
Option Compare Database Private Sub Report_Close() Dim stDocName As String Dim rtfName As String rtfName = "E:\Rep_tab.rtf" stDocName = "tab" 'On Error Resume Next 'Kill rtfName DoCmd.OutputTo acReport, stDocName, acFormatRTF, rtfName End Sub Сейчас, надеюсь, всё, как в оригенале - но ошибка прёт!!! ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 05.09.2004, 22:23:38 |
|
||
|
Переделать ОТЧЕТ в WORD – документ
|
|||
|---|---|---|---|
|
#18+
v skopinPrivate Sub Report_Close() Dim stDocName As String Dim rtfName As String stDocName = Report_tab.Name rtfName = "E:\" & stDocName & ".rtf" 'On Error Resume Next 'Kill rtfName ' - ??????? ? ??? DoCmd.OutputTo acReport, stDocName, acFormatRTF, rtfName End Sub это эксперементальая база из одного отчета "tab" и таблици "tab" Report_tab.Name - это замена Me.Name ? + версия Access/формат файла + на какой строке ошибка типа чукча писатель - он вопросов не читает ? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 05.09.2004, 22:30:17 |
|
||
|
Переделать ОТЧЕТ в WORD – документ
|
|||
|---|---|---|---|
|
#18+
Office XP SP3 русский/Access 2002 на какой строке ошибка MS VB ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 05.09.2004, 22:37:11 |
|
||
|
Переделать ОТЧЕТ в WORD – документ
|
|||
|---|---|---|---|
|
#18+
Report_tab.Name - это замена Me.Name ? уже не так, а stDocName = "tab" ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 05.09.2004, 22:42:39 |
|
||
|
Переделать ОТЧЕТ в WORD – документ
|
|||
|---|---|---|---|
|
#18+
Код: plaintext 1. 2. 3. 4. 5. 6. 7. 8. Код работает, но запускать его надо не на событие закрытия отчета а отдельно (т.е. отчет должен быть открыт). ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 05.09.2004, 22:43:55 |
|
||
|
Переделать ОТЧЕТ в WORD – документ
|
|||
|---|---|---|---|
|
#18+
Спасибо, однако почему - то раньше пару раз и там сработало!? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 05.09.2004, 22:52:46 |
|
||
|
Переделать ОТЧЕТ в WORD – документ
|
|||
|---|---|---|---|
|
#18+
Не понос, так золотуха! Не сохраняет гад две последние строчки отчета! Мой отчет состоит из одного поля типа Мемо. И борюсь я с этим безобразием так: добавляю " _____________________________________________" Но это же безграмотно как-то! ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 06.09.2004, 01:43:43 |
|
||
|
Переделать ОТЧЕТ в WORD – документ
|
|||
|---|---|---|---|
|
#18+
А Access в Word линии не перебрасывает. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 06.09.2004, 10:30:35 |
|
||
|
Переделать ОТЧЕТ в WORD – документ
|
|||
|---|---|---|---|
|
#18+
S. FedorenkoА Access в Word линии не перебрасывает. это не линия это подчёркивание ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 06.09.2004, 10:46:51 |
|
||
|
Переделать ОТЧЕТ в WORD – документ
|
|||
|---|---|---|---|
|
#18+
Какая разница "линии",..., буквы все равно две последние строчки текста не записывает!!! ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 06.09.2004, 13:38:02 |
|
||
|
Переделать ОТЧЕТ в WORD – документ
|
|||
|---|---|---|---|
|
#18+
по границе 255 символов обрезает чтоли? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 06.09.2004, 13:43:12 |
|
||
|
|

start [/forum/topic.php?fid=45&msg=32680666&tid=1671968]: |
0ms |
get settings: |
10ms |
get forum list: |
10ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
292ms |
get topic data: |
10ms |
get forum data: |
3ms |
get page messages: |
59ms |
get tp. blocked users: |
2ms |
| others: | 215ms |
| total: | 607ms |

| 0 / 0 |
