Das Notes Forum
Domino 9 und frühere Versionen => ND6: Entwicklung => Thema gestartet von: sharif am 17.05.05 - 10:04:10
-
Hallo!
habe folgendes Problem!
Ich lese Daten aus einer .txt Datei aus, diese Datensätze sind mit "," getrennt! Nach dem Auslesen soll eine bereits zum füllen vorhandene From mit den Werten aus der Datei gefüllt werden. Das Doc soll allerdings ganz neu angelegt werden. Hier mein Ansatz:
Sub Initialize
'Schleifen
Dim i,x,y As Integer
'String teilen
Dim laenge As Integer
Dim zeichen As String
Dim position() As Integer
'Datei zum lesen oeffnen
Dim sFile As String
Dim sRow() As String
Dim sTxt As String
Dim fileNum As Integer
Dim counter As Integer
Dim session As New NotesSession
Dim db As NotesDatabase
Dim doc As New NotesDocument (db)
Set db = session.CurrentDatabase
'Die Datei zuweisen und öffnen...
sFile = "E:\flughafen.txt"
fileNum = Freefile()
Open sFile For Input As fileNum
counter = -1
Do While Not Eof(fileNum) ' EOF = End Of File
Line Input #fileNum, sTxt
counter = counter + 1
Redim Preserve sRow(0 To counter)
sRow(counter) = sTxt
Loop
For i = 1 To counter
laenge = Len(sRow(i))
y = 1
For x = 0 To laenge
zeichen = Mid$(sRow(i),x,1)
If zeichen = "," Then
position(y) = x
End If
Next
Set doc = db.CreateDocument
doc.FlughafenAName = Mid$(sRow(i),o,position(1)-1)
doc.FlughafenAVorname = Mid$(sRow(i),position(1),position(2)-1)
Call doc.Save(True,True)
Next
Close fileNum
End Sub
Als fehler gibt Notes mir folgendes an: "Action Failed, To run this agent you must have at least one document selected"
So jetzt seit ihr dran!
-
Willkommen im Forum
In den Agenten-Eigenschaften steht, unter welchen Bedingungen der Agent laufen soll. Da steht fast sicher "Alle ausgewählten Dokumente" (oder so ähnlich). Das muss umgestellt werden auf "Keine"
-
... und ein doc.form = fehlt auch noch
-
... stimmt, ausser das gewünschte Formular ist (und vor allem bleibt!! ) per Zufall das Defaultformular. Sicher ist sicher, daher sollte man es unbedingt setzen.
-
PS: schau mal auf die Funktion strToken() .... oder split()
gruss umi
-
Danke für die schnelle Hilfe! Echt SUPER!!! ;D
Die Lösung:
In den Agenten-Eigenschaften steht, unter welchen Bedingungen der Agent laufen soll. Da steht fast sicher "Alle ausgewählten Dokumente" (oder so ähnlich). Das muss umgestellt werden auf "Keine"