Announcement

Collapse
No announcement yet.

Delphi4-Word(Schreibschutz auf Normal.dot)

Collapse
X
  • Filter
  • Time
  • Show
Clear All
new posts

  • Delphi4-Word(Schreibschutz auf Normal.dot)

    Ein kleines Programm schreibt per Automation Informationen aus einer Datenbank in ein Word-Dokument(Word8). Word wird über CoApplication_.Create aufgerufen. Es funktioniert auch alles einwandfrei, solange nicht die NORMAL.DOT mit einem Schreibschutz versehen ist. Beim Starten von Word ist ein entsprechendes Passwort einzugeben. In diesem Fall startet zwar Word - öffnet aber kein Dokument, keine Menüs sind verfügbar. Das Word-Fenster kann nur noch über Alt-F4 geschlossen werden.
    Innerhalb einer try except Anweisung landet das Programm im except-Teil.

    Hat jemand einen Tipp?

  • #2
    Der Befehl

    FileSetAttr('\..\..Normal.DOT',[]);

    zur richtigen Zeit aufgerufen müßte eigentlich zum ziel führen

    Gruß Christop

    Comment


    • #3
      Danke Gruß Torste

      Comment


      • #4
        Wie kann denn Normal.dot schreibgeschuetzt sein? Word ist da wie du gemerkt hast ueberhaupt nicht gluecklich. Die Idee die Datei schreibzuschuetzen ist das Problem

        Comment

        Working...
        X