Problems with database after installing officce 2003 professional

[Guest]

Hallo,
I was creating access database in access 2000. Database has part (VBA code)
where data from access form exporting to word form, and saving them to the
folder on local disk.
In access form I have command that enable preview created word document. I
have about 1.000 created documents and evertyhing was worked fine before I'm
installing access 2003 and Word 2003 professional. After that I can't open
word documents.
Error messages are: (10116: Word experienced an error trying to open file:
please check following:
- check file permissions for the document or drive
- make sure there is sufficient memory and disk space
- open the file with Text recovery converter.)
I was checked all suggestions and nothing do not help.

I have installed: Win XP SP 2, Office 2003 Professional SP, Microsoft Jet
4.0 SP 8, Symantec AV enterprise edition with all updates.

Today I'm trying finding where is a problem with two installation of word
application (Word 2000 and word 2003)
With word 2000 everything working fine, with word 2003 just document preview
does not? Does anyone know why? And just one note: part with exporting data
in word form and saving it to disk working fine. Only preview don't. ??

Sorry if I was writing to long post ….

 

[Anton Pegan, Avtena.si]

Hi,

You could try importing the old database into new one.

1.. File / New / Blank database
2.. File / Get external dana / Import
3.. Chouse all (Forms, Reports,...)
4.. Click OK

Can you open the documents in Word? If not try the following article:

http://support.microsoft.com/kb/826864/

Regards,

Anton Pegan

 

[Guest]

Sorry just litlle explanation: I can open word document from the Word , but I
can't open document from Access form ( I have button named "doc.preview" who
call comannd open WordDoc)...

Here is a code:
Private Sub cmdWord_Click()
On Error GoTo Err_cmdWord_Click

Dim txtWordPath, txtReport, txtFajla As String
txtFajla = Dir(Trim(Me.WordDoc))
If Not IsNull(Trim(Me.WordDoc)) And txtFajla <> "" Then
'***
'txtWordPath = "f:\Program Files\Microsoft Office\Office\Winword.exe"
txtWordPath = "c:\Program Files\Microsoft Office\Office11\Winword.exe"
txtReport = "c:\RegKVP\Rjesenja\" & Trim(Me.regBroj) & "_" & Trim
Me.PredmUpisa)
'txtReport = "\\srv2\RegKVP\Rjesenja\" & Trim(Me.regBroj) & "_" &
Trim(Me.PredmUpisa)

Shell Chr(34) & txtWordPath & Chr(34) & " " & Chr(34) & txtReport &
Chr(34), vbMaximizedFocus
Else
MsgBox "Dokument nije kreiran ili ne postoji", vbInformation,
"Pregled dokumenta"
End If

Exit_cmdWord_Click:
Exit Sub
Err_cmdWord_Click:
MsgBox "Nema podataka u registru ili niste oznacili stavku za pregled",
vbExclamation
Resume Exit_cmdWord_Click

Thanks a lot !