Domino 9 und frühere Versionen > ND6: Entwicklung

Einlesen der Feldbezeichnungen und Eigenschaften

<< < (2/3) > >>

Spalter:
 O0

Hallo zusammen,

habe das Problem jetzt folgendermaßen gelöst:

Sub Initialize
      Dim session As New NotesSession
      Dim db As NotesDatabase
      Dim Feldstr As String
      Set db = session.CurrentDatabase
      Dim form As NotesForm
      Set form = db.GetForm("1")
      Felder = form.Fields


      For i = 1 To 132
      'Forall field In form.Fields
            Feldstr = Felder(i)
            On Error Goto Errhandle
            Select Case form.GetFieldType(Feldstr)
            'Select Case form.GetFieldType(field)
            Case AUTHORS : fieldType = "Authors"
            Case DATETIMES : fieldType = "DateTime"
            Case NAMES : fieldType = "Names"
            Case NUMBERS : filedType = "Number"
            Case READERS : fieldType = "Readers"
            Case RICHTEXT : fieldType = "Rich text"
            Case TEXT : fieldType = "Text"
            Case Else
                  fieldType = "Other " & form.GetFieldType(Feldstr)
            End Select
            'Messagebox fieldType,, Feldstr
      Next i
      'End Forall

Errhandle:
      Messagebox "Anzahl der Felder:" + i,, i
      Exit Sub

End Sub

Ich habe auf das Forall-Statement verzichtet, weil das ganze aus Excel heraus als Macro starte.

Gruß
Spalter

eknori:
oder mit http://www.maysoft.com/web3.nsf/page/products-document_viewer-overview

Spalter:
 :)

Hallo Ulrich,

danke für den Link. Das wäre dann aber eine Notes-interne Lösung - oder?

Gruß
Spalter

WernerMo:
Hallo ?Spalter?

Ja das ist eine (sehr praktische) Notes/Domino Datenbank.

Grüße aus Weißenburg (nach 91174 Spalt?)
Werner

---edit---
Nachtrag/Frage:
Gilt das immer noch?: In Spalt, in Spalt, da wern de Leid so alt, die .....

eknori:

--- Zitat ---aber eine Notes-interne Lösung - oder?
--- Ende Zitat ---
ja, denn ein

--- Zitat ---ohne im Designer nachzuschauen
--- Ende Zitat ---
impliziert nicht, daß es sich nicht um eine Möglichkeit handeln könnte , die nicht nicht Notes basierend ist ... ;D

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete