Mehrfachfeld auf String umwandeln

[Ozan]

Hallo,

es gibt in der Datenbank ein Feld(Mehrfachwert), diese Feld beinhaltet verschieden infos z.B.:

"01"
"05"
"1995"

diese infos möchte ich in ein Text Feld wie folgt speichern:

"01.05.1995"

Das ganze in LS, hier codeschnipsel:

docPerson.Datum=cstr(docReaktion.Datum)

mit "cstr" sagt der "type Mismatch"!

Für eine Lösungsvorschlag währe ich dankbar.

Ozan

[BigWim]

Für eine Lösungsvorschlag wäre ich dankbar.

Keine Ahnung, was Du damit lösen willst, aber in LS müßtest Du es so schreiben

Code

docPerson.Datum=docReaktion.Datum(0) + "." + docReaktion.Datum(1)+ "." + docReaktion.Datum(2)

Markus

[Ozan]

Das hatte ich bereits getestet gehabt:

Fehler: Subscript out of range

[m3]

Code

docPerson.Datum=Join(docReaktion.Datum, ".")

Wobei ich persönlich kein Feld "...Datum" nennen würde, wenn dann ein oder mehrere String(s) drinnen steht/stehen.

[BigWim]

Das hatte ich bereits getestet gehabt: Fehler: Subscript out of range

Dann stehen in diesem Fall nicht drei Werte in Deinem Mehrfachfeld, denn das wäre bei meinem Vorschlag zwingend. Füge vor der Zeile ein stop ein und prüfe das mal im Debugger ....

[Ozan]

Volltreffer m3, der "join" war es.
Danke vielmals.
Gruss

Ozan

[C_T]

Ich würde sicherheitshalber einfach noch einen schritt weitergehen und folgendes machen...

Code

Dim i as integer
Dim Text as String

Text = ""

For i = 0 to ubound(docReaktion.Datum)
  if Text <> "" then
    Text = Text + "."
  end if
  Text = Text + cstr(doc.Reaktion.Datum(i))
Next

docPerson.Datum = Text