Avatar billede lars_hoeberg Praktikant
28. april 2004 - 17:02 Der er 8 kommentarer og
1 løsning

Åben word fil gennem makro i Access 2003

Hejsa.

Hvordan kan jeg i min oversigtsstyring lægge en funktion ind til at åbne eller slette en fil på computeren? Dette kunne man gennem en makro i Access 2000 under "kørkommando". Dette kan man ikke i 2003. Hvordan kan jeg så gøre det?

Lars
Avatar billede terry Ekspert
28. april 2004 - 19:38 #1
You could use shellexec to do this!

Place this code in a module (function)
Option Compare Database
Option Explicit

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 add a butin to the form with name cmdOpenDoc. Make sur ethe on lcik event is set to [Event Procedure]

Private Sub cmdOpenDoc_Click()
Dim stAppName As String
Dim result As Integer

    On Error GoTo Err_cmdOpenDoc_Click

    result = ShellExecute(0, "Open", Me.txtWordDoc, "", "", SW_SHOW)

    If result < 32 Then
        MsgBox "Couldn't open file ..."
    End If
   
Exit_cmdOpenDoc_Click:
    Exit Sub

Err_cmdOpenDoc_Click:
    MsgBox Err.Description
    Resume Exit_cmdOpenDoc_Click
   
End Sub
Avatar billede terry Ekspert
28. april 2004 - 19:39 #2
In the example there is a field on the form with the document to open
(Me.txtWordDoc) you can alter this to a string if you want "C:\YourWord.doc"
28. april 2004 - 20:14 #3
For at slette en fil, kan du bruge denne kommando:
Kill "C:\Dokumenter\Minfil.txt"
Avatar billede lars_hoeberg Praktikant
28. april 2004 - 22:35 #4
Jeg skal egentlig bruge en makro der gør at det fletter data fra en forspørgsel over i et word dokument, hvor jeg har en tekstskabelon i word, som den skal flette med. Kan det lade sig gøre?
Avatar billede terry Ekspert
29. april 2004 - 08:47 #5
try converting your macro to VBA. If you say that the macro ha sworked then converting the macro to VBA should give you the code needed to do what you want!
Avatar billede terry Ekspert
29. april 2004 - 08:49 #6
Menu = Tools+Macro+Convert Macro to Visual Basic
29. april 2004 - 08:54 #7
Jeg har et lignende eks. liggende her: http://www.makeiteasy.dk/eksempler/Downloads.htm

Kig under det eksempel, som hedder Brevflet forespørgsel til Word automatisk
29. april 2004 - 22:16 #8
Lars, har du fået kigget på det?
10. maj 2004 - 21:08 #9
???
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Dyk ned i databasernes verden på et af vores praksisnære Access-kurser

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester