Autor Thema: tabelle hat fehlerhaftes format  (Gelesen 1608 mal)

Offline elmolino

  • Frischling
  • *
  • Beiträge: 9
tabelle hat fehlerhaftes format
« am: 25.03.09 - 09:19:20 »
"tabelle hat fehlerhaftes format" kommt in einer Handbuch DB in dem Moment wenn das Dokument angeklickt wird und geöffnet werden soll in der Ansicht.
Auf dieses Dokument kann in der DB nicht mehr zugegriffen werden.
Hat jemand eine Idee ? Bin ratlos...

Offline Micha B

  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 2.922
Re: tabelle hat fehlerhaftes format
« Antwort #1 am: 25.03.09 - 09:40:56 »
Wie wurde das Dokument erstellt? Wurde es importiert, evt. mit einem Agenten?

Offline Axel

  • Freund des Hauses!
  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 8.658
  • Geschlecht: Männlich
  • It's not a bug, it's Notes
Re: tabelle hat fehlerhaftes format
« Antwort #2 am: 25.03.09 - 10:31:05 »
Hast du schon mal fixup und compact auf die Datenbank losgelassen?

Axel
Ohne Computer wären wir noch lange nicht hinterm Mond!

Offline mattmurphy

  • Frischling
  • *
  • Beiträge: 8
Re: tabelle hat fehlerhaftes format
« Antwort #3 am: 26.03.10 - 10:56:46 »
Auch wenn der Beitrag etwas älter ist wollte ich hier mal eine Lösung dazu posten:

Wenn Ihr ein Dokument wegen Kaputter Tabelle im Richtextfeld nicht mehr aufbekommt, dann versucht einfach mal mit dem folgenden Script das Richtextfeld hin und her zu kopieren. Damit hat es bei mir unter R6 funktioniert.

   Dim session As New NotesSession
   Dim curdb As NotesDatabase
   Dim curcoll As NotesDocumentCollection
   Dim curdoc As NotesDocument
   Dim rtitemA As Variant
   Dim rtitemB As Variant
   
   Set curdb = session.CurrentDatabase
   
   Set curcoll = curdb.UnprocessedDocuments
   For i = 1 To curcoll.Count
      Set curdoc = curcoll.GetNthDocument( i )
      Set rtitemA = curdoc.GetFirstItem( "Body" )
      Set rtitemB = curdoc.CreateRichTextItem( "Body1" )
      Call rtitemB.AppendRTItem( rtitemA )
      Call rtitemA.Remove
      Set rtitemA = curdoc.CreateRichTextItem( "Body" )
      Call rtitemA.AppendRTItem( rtitemB )
      Call rtitemB.Remove
      Call curdoc.Save( True, True )
   Next

 

Impressum Atnotes.de  -  Powered by Syslords Solutions  -  Datenschutz