Forums Neueste Beiträge
 

Zeile aus Textfeld auslesen

15/02/2009 - 18:48 von Hans Weiss | Report spam
Hallo,

wie kann ich ein Texfeld auslessen und daraus 3 andere Textfelder füllen?

Textfeld 1 beinhaltet folgenden Inhalt: "C:\
Importdateien\wochenbericht_EK3_KW04.txt"
Nach einen afterupdate soll dann im,

Textfeld 2 "wochenbericht" im
Textfeld 3 "EK3" im
Texfeld 4 "Kw04"

Die Textfelder weden dann beim Import der txt- Datei mit eingelesen, da ich
sie für spàtere Auswertungen wieder brauche.
vielleicht ist es ja möglich aus dem "Kw04" auch NUR EIN "04" zu machen und
diese als Zahl zu importieren.
Im Moment mache ich die Eingaben in die Textfelder 2-4 immer mit der Hand.
Vieleicht hat jemand eine Idee oder ein Codebeispiel das er mir zukommen
lassen könnte.

gruss Johann
 

Lesen sie die antworten

#1 Josef Poetzl
15/02/2009 - 19:23 | Warnen spam
Hallo!

Hans Weiss schrieb:
wie kann ich ein Texfeld auslessen und daraus 3 andere Textfelder füllen?

Textfeld 1 beinhaltet folgenden Inhalt: "C:\
Importdateien\wochenbericht_EK3_KW04.txt"
Nach einen afterupdate soll dann im,

Textfeld 2 "wochenbericht" im
Textfeld 3 "EK3" im
Texfeld 4 "Kw04"



Mit mid, instr & Co. solltest du das aufteilen können.

Prinzip (Luftcode):

dim s as string
s = "C:\Importdateien\wochenbericht_EK3_KW04.txt"
s = mid(s, InStrRev(s, "\") + 1)
s = left(s, len(s)-4) ' ".txt" wegschneiden

dim textteile() as string
textteile = split(s,"_")

=>
textteile(0) müsste "wochenbericht" ergeben und
textteile(1) ... "EK3"
textteile(2) ... "KW04"



mfg
Josef


EPT: (Access Error Prevention Table) http://access.joposol.com/
FAQ: (Access-FAQ von Karl Donaubauer) http://www.donkarl.com/

Ähnliche fragen