Das Notes Forum
Domino 9 und frühere Versionen => Entwicklung => Thema gestartet von: emadowo am 27.12.04 - 12:27:04
-
Hallo Forum!
Ich nutze gerne dieses Forum, um mich in LotusScript zurechtzufinden. Darin habe ich auch die Hinweise zum Import von CSV-Dateien gefunden. Vielen Dank alle Forum-Betreiber, einfach gut!
Jetzt aber zur Sache: Schaut euch bitte untenstehendes Script an, es stammt aus der "IBM Sandbox". leicht abgeändert. Der Debugger meckert diese Zeilen an:
------------------------------------------------------------------------
FieldArray = "parseall(InputStr$,delimiter,cells)"
response% = CreateDocument("FieldArray")
------------------------------------------------------------------------
Weder zu "parseall" noch zu "CreateDocument" finde ich
Erläuterungen in den Online-Hilfen!?
Hier das komplette Script:
------------------------------------------------------------------------
Sub Click(Source As Button)
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
Dim delimiter As String
resp% = Messagebox ( "Wollen Sie wirklich alle Prüfungen aus C:\jbfhome\gek529.CSV importieren", 36 , "Prüfungen importieren" )
REM Yes
If resp% = 6 Then
fileNum% = Freefile()
' Dateipfad
fileName$ = "C:\jbfhome\gek529.CSV"
' Trennzeichen
delimiter = ";"
' Anzahl der Zellen plus 1
cells = 14 + 1
k = 0
Open fileName$ For Input As fileNum%
Do While Not Eof(fileNum%)
' Zeile für Zeile einlesen
Line Input #1, InputStr$
FieldArray = "parseall(InputStr$,delimiter,cells)"
response% = CreateDocument("FieldArray")
k = k + 1
' Info in der Fußzeile ausgeben
Print Cstr(k) + " Prüfungen importiert."
Loop
Close fileNum%
Else
Exit Sub
End If
End Sub
------------------------------------------------------------------------
Danke euch!
-
Kannst Du auch nicht. paresall ist kein LS Befehl und CreateDocument muss eine selber geschriebene Subroutine sein. Sprich, Du hast offenbar das Script nicht vollständig. Was meckert denn der Debugger, dass er CreateDocument nicht finden kann? Und schau noch einmal dort, wo Du das Teil her hast, ob Du da noch mehr finden kannst.
-
Jo, das fehlen schlicht zwei Functions. Sprich, Du hast was abgekupfert, aber nicht verstanden. Das kann üble Folgen haben.
Bernhard
-
Meine Beichte: JA, ich habe abgekupfert und nicht verstanden. :'(
Und nun??? ???
Die zweite Beichte: ich habe noch nicht viel Ahnung von Script. Habe bereits
zwei Bücher hinter mir (das eine "brachte mir nur die MsgBox bei und das zusammenzählen zweier Variablen", das ist das große grüne Buch, das zweite ist mir zu hoch). Weiß jemand Literatur oder Quellen, wo ich Script lernen könnte? Syntax-Bücher gut und recht, aber wie anwenden? Ich bräuchte Praxisbeispiele, Muster-DBs mit Erläuterungen oder einen Fernkurs.
Nochmals DANKE! Hatte nicht so schnell mit Antworten gerechnet!
-
Schau Dir das mal an:
ftp://ftp.lotus.com/pub/lotusweb/tlc/ls50ltlc.zip
Eine Notes-DB, die ich vielen schon erfolgreich empfohlen habe.
HTH,
Bernhard
-
Oder den LotusScript-Kurs von unserem Anton (ata)
http://www.anton-tauscher.de/startdyn.htm
-
Oder besser beides, wobei ich mit Antons Kurs anfangen würde. Das LTLC geht dann weiter.
Bernhard
-
Dem kann ich nur zustimmen, so machts wirklich Sinn.
-
Hi,
nur mal so nebenbei, könnte es sein, daß die Anführungszeichen zuviel sind?
Statt:
FieldArray = "parseall(InputStr$,delimiter,cells)"
eher:
FieldArray = parseall(InputStr$,delimiter,cells)
Wofür auch immer die DB ist...
Gruß
Sloe