Avatar billede frederikpag Nybegynder
03. oktober 2003 - 15:08 Der er 11 kommentarer og
1 løsning

Makro virker ikke i 2000. "70 premission denied"

Efter at have lagt vores domain, fra et NT 4.0 SP6, over i et 2000 miljø kan jeg ikke få følgende makro i vord til at virke:

Public Sub BackupSave()
    On Error GoTo errHandler
    Dim doc As Word.Document
    Dim navn As String
    Dim path As String
    Dim strDate As String
    Dim oldDate As Date
   
    path = "\\server\Firmaet\dokumenter\"

    If Word.Documents.Count < 1 Then
        MsgBox "Du skal først åbne et dokument, før denne funktion kan benyttes", vbOKOnly + vbInformation, "Intet aktivt dokument"
        Exit Sub
    End If
   
    Set doc = Word.ActiveDocument
   
    If doc.path = vbNullString Then
        If MsgBox("Er du sikker på du ønsker at gemme dokumentet " & doc.Name & " i mappen " & Left(path, Len(path) - 1) & "?", vbQuestion + vbYesNo, "Nyt dokument") = vbNo Then
            Exit Sub
        End If
    End If
   
    navn = doc.Name
   
    If Not Dir(path & navn) = "" Then
        oldDate = FileDateTime(path & navn)
        strDate = Format(oldDate, "DD/MM/YYYY") & " " & Hour(oldDate) & "-" & Minute(oldDate) & "-" & Second(oldDate)
        FileCopy path & navn, path & "Tidligere dokumenter\" & Left(navn, Len(navn) - 4) & " " & strDate & ".doc"
    End If
    doc.SaveAs path & navn
    Exit Sub
errHandler:
        MsgBox "Der er sket en fejl." & vbCrLf & Err.Number & " " & Err.Description, vbOKOnly + vbInformation, "Intet aktivt dokument"
End Sub

Dens funktion er, at den gemmer et dokument i en mappe og tager det dokument der allerede ligger i mappen med samme navn og flytter det til mappen "tidligere dokumenter", samt tilføjer den oprindelige dato og tidspunkt for oprettelse til filnavnet.

Når jeg kører denne makro får jeg
"Intet aktivt dokument"
"Der er sket en fejl"
"70 Permission denied"

Har det noget at gøre med sikkerhedsniveauet eller digitalt signering? Er der nogle der kan hjælpe mig?
Avatar billede Slettet bruger
03. oktober 2003 - 17:16 #1
Har du checket at stierne eksisterer og at der er skriverettigheder til dem?
Hvis du debugger makroen i hvilken linie får du så fejlen?
Avatar billede c_d Nybegynder
09. oktober 2003 - 19:25 #2
Jeg har haft det samme problem med en af mine macro'er, jeg fik det aldrig til at virke igen, Så det kunne være at de ikke kan snakke sammen med hved det ikke!
Avatar billede Slettet bruger
09. oktober 2003 - 19:46 #3
Er der noget i menuen med sikkerhed:
Funktioner - Makro - Sikkerhed hvis du har det så prøv at sætte den til lav.
Avatar billede frederikpag Nybegynder
09. oktober 2003 - 21:03 #4
Jeg har prøvet at mindske sikkerhedsniveauet, men lige meget nytter det. Alternativt må jeg jo sætte mig ned og starte forfra...
Avatar billede Slettet bruger
09. oktober 2003 - 21:05 #5
Hvis du kører den trinvis med F8 så kan du køre den igenne linie for linie og så kan du se hvor den fejler 1. gang, hvis du vil.
Avatar billede Slettet bruger
09. oktober 2003 - 21:10 #6
Jeg har lige kørt den her i Word xp og der virker den fint så den burde også virke i 2000.
Jeg kan få en permission denied fordi "Tidligere dokumenter\"-stien ikke er oprettet, check lige om du har lavet den.
Avatar billede Slettet bruger
09. oktober 2003 - 21:21 #7
If you try to use the FileCopy statement on a currently open file, an error occurs.

Det dokument der blev gemt først blev gemt med navnet Dokument 1.doc, så laver jeg et nyt og det hedder også Dokument 1.doc i Word selvom det ikke er gemt endnu, så Word tror garanteret at det er det åbne dokument der prøves kopieret og giver dermed en permission denied, den får jeg nemlig også nu.
Avatar billede frederikpag Nybegynder
10. oktober 2003 - 08:29 #8
Tak for det svar, nu kan jeg sove roligt om natten igen!!!
Avatar billede frederikpag Nybegynder
10. oktober 2003 - 08:31 #9
upppps, nu fik jeg jo ikke givet dig nogle points hvordan gør det nu????
Avatar billede Slettet bruger
10. oktober 2003 - 19:49 #10
Så svarer jeg bare :-)
Avatar billede frederikpag Nybegynder
11. oktober 2003 - 01:04 #11
Tusinde tak for din hjælp, og god weekend!!!
Avatar billede Slettet bruger
11. oktober 2003 - 13:17 #12
Jeg takker for point og god weekend til dig også :-)
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
Kurser inden for grundlæggende programmering

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