Hallo zusammen,
habe mir unter
http://www-10.lotus.com/ldd/sa…6df2006561e9?OpenDocument
die DB für den .csv bzw. .txt Import (geht ja beides) angepaßt und funktioniert auch einwandfrei, solange ich es lokal auf meinem PC ausführe.
Dabei liegen meine NotesDB und die .txt im selben Verz. E:\Programme\lotus\notes\data\Test-Abteilung.
Pfad im Script:
fileName$ = "E:\Programme\lotus\notes\data\Test-Abteilung\LandmaschinenKunden.txt" ' Location of your file
Jetzt möchte ich das ganze auf dem Server ausführen. Hier liegen die NotesDB und die .txt ebenfalls im selben Verz.
Sub Initialize
Dim session As New notessession
Dim db As notesdatabase
Dim doc As notesdocument
Dim fileNum As Integer, cells As Integer, k As Integer
Dim fileName As String
Dim InputStr As String, delimiter As String
Dim FieldArray As Variant
fileNum% = Freefile()
fileName$ = "E:\Lotus\Domino\Data\xxxAllgemein\LandmaschinenKunden.txt" ' Location of your file
delimiter = ";" ' Delimiter of your file
cells = 8 ' How many cells + 1
k = 0
Open fileName$ For Input As fileNum%
Do While Not Eof(fileNum%)
Line Input #1, InputStr$
FieldArray = parseall(InputStr$, delimiter, cells)
response% = CreateDocument(FieldArray)
k = k + 1
Print "Document Created: " + Cstr(k)
Loop
Close fileNum%
End Sub
Hier kommt aber der Fehler „Unable to open file“
Ich nehme mal an, daß die Pfadangabe auf dem Server anders lauten muß ?
Hab´s auch schon versucht, funktioniert aber nicht.
Kann mir bitte einer sagen wie ?
Vielen Dank schon mal im voraus.
Gruß Siggi