Åbn word dokument

Place this in a module
Public Declare Function ShellExecute Lib \"shell32.dll\" Alias \"ShellExecuteA\" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long


Public Const SW_HIDE = 0
Public Const SW_SHOW = 5

and this in a form for example:

result = ShellExecute(0, \"Open\", PathAndFilename, \"\", Path, SW_SHOW)

Dim result As Integer

If the file is a doc then it will be opened in word or what ever program doc files are associated with.
You an use this for opening any file which has an association.

Jeg skal åbne dokumentet fra c:\\dokumenter\\kontoopr.doc

Place this in a module
Public Declare Function ShellExecute Lib \"shell32.dll\" Alias \"ShellExecuteA\" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long


Public Const SW_HIDE = 0
Public Const SW_SHOW = 5


Then this in a buttons on click event for example:

Dim result As Integer

result = ShellExecute(0, \"Open\", \"c:\\dokumenter\\kontoopr.doc\", \"c:\\dokumenter\", Path, SW_SHOW)

Opps!
result = ShellExecute(0, \"Open\", \"c:\\dokumenter\\kontoopr.doc\",\"\", \"c:\\dokumenter\", SW_SHOW)

Den åbner stadig ikke dokumentet

Det virker ;o)

if you double click on the doc file, does it get opened in word?

Have you placed the function declaration in a module?

OK, so why reject the answer?

Puller>If its working then why no points?

Det er en fejl. Hvordan får jeg givet dig point nu?

I can see you have, thanks :o)