Domino 9 und frühere Versionen > ND6: Entwicklung
OpenFileDialog und Open For Input
bandit:
ich möchte mit OpenFileDialog eine Datei auswählen und diese dann wie unten angegeben öffnen. Leider klappt das nicht so ganz weil der OpenFileDialog den Dateipfad als Variant zurückliefert und der Open nachher einen String erwartet. Die Zeile mit dem Konvertieren mittels "Cstr" funktioniert leider nicht, kommt ein Fehler. Hat jemand eine Idee dazu?
...
varFilePath=ws.OpenFileDialog(False,"Please Select XML File", "*.xml|*.xml", "")
If Isempty(varFilePath) Then Goto Ende
'-- XML Datei zuweisen und öffnen
'strFile = "C:\Home\homepage.xml"
strFile = Cstr(varFilePath)
intFileNum = Freefile()
Open strFile For Input As intfileNum
...
Wilhelm:
Hi,
es ist möglich via OpenFileDialog mehrere Dateien auszuwählen. Deshalb wird ein Array daraus gemacht, auch wenn nur ein Wert drinsteht.
Folglich mußt Du das Array mit varFilePath(0) ansprechen.
Gruß
Willi
bandit:
Super, hat geklappt. Dann geht das Cstr auch.
Danke für die schnelle Hilfe!
bandit:
Eine Frage zur Dateiweiterverwarbeitung hätte ich noch:
Wie kann ich eine Textdatei am besten komplett in eine String Variable einlesen. Mit "Line Input" bekomme ich ja immer nur eine Zeile ausgelesen. Ich weiss auch nie genau wie lang die Datei ist d.h. er sollte bis EOF lesen.
Glombi:
Das geht so:
dim lineString as string
Open strFile For Input As intfileNum
Do While Not Eof( intfileNum )
Line Input #intfileNum, lineString
' ...hier dann die Verarbeitung der Zeile...
Loop
Close intfileNum
Andreas
Navigation
[0] Themen-Index
[#] Nächste Seite
Zur normalen Ansicht wechseln