Hab mal ein bisschen getestet.
Funktionieren sollte es aber ziemlich umständlich zu programmieren.
Gibts eine möglichkeit die Notes-Benutzer-IDs über lotus script zu wechseln? Kann man in Lotus Notes über Lotus Script Benutzer-Ids erstellen?
Bzw. wie legt man denn überhaupt neue Notes-Benutzer-Ids an?
Bei der installation von Lotus Notes wird eine erstellt, aber ich bräuchte dann ja für jeden user eine neue?
Das ist mir schon klar, dass sich normal verschiedene Notesuser über Ihre eigene ID indentifizieren und genau da ist ja das problem.
Klar könnte ich für jeden Benutzer eine eigene Notes-ID anlegen, aber ist es möglich über lotus script die ids zu wechseln bzw neue anzulegen, was dann über eine Maske per Drag&Drop aus der Datenbank heraus gehen sollte?
Denn einem Noob zu erklären wie man notes ids anlegt und wechselt ist imho nicht so einfach und wäre unnötig kompliziert.
Wie gesagt ich suche eine einfache Möglichkeit einen Login einzubauen mit dem man verschiedene nutzer identifzieren kann, für mehr soll Lotus Notes auf einem Desktop-Rechner nicht dienen.
Hi @all,
habe mal wieder ein Problem.
Und zwar will ich eine kleine Notes Datenbank erstellen die NUR auf EINEM Desktop-Rechner laufen soll (heißt mit einer Notes-ID ohne Netzwerk etc).
Jedoch brauche ich mehrere User für die Datenbank die sich mit einem Passwort in die DB einloggen können sollen.
Einige User sollen berechtigt sein Benutzer anzulegen.
Jedoch weiß ich nicht genau wie ich dies realisieren soll. Hat eine Notes-Datenbank sowas wie eine Userverwaltung?
Meine Idee bis jetzt war, dass ich beim starten der Datenbank eine Dialogbox einblende, die den Username und Passwort abfragt.
Die user sind über einzelne NotesDokumente eingetragen worden.
Jedoch sehe ich bei dieser Variante noch ein paar Problemchen, bei denen ich noch nicht so ganz weiß wie ich diese löse.
z.B. wenn sich ein Benutzer angemeldet hat muss ja irgendwo vermerkt werden das dieser angemeldet ist. Meine Idee bis jetzt wäre ein Temporäres Session-Dokument zu erstellen wo dieses vermerkt wurde.
Das bräuchte ich nämlich dann um heraus zu finden, welche Rechte dieser User hat, dass es z.B. bestimmte Einstellungen machen kann oder Benutzer anlegen darf.
Hoffe Ihr habt mich einigermaßen verstanden oder habt noch andere Ideen.
Bin über jede Hilfe und Tipps froh.
Schönes Wochenende
Gruß
Markus
thx hat super funktioniert nur jetzt stoße ich mal wieder an meine grenzen!
Ich hab das Wordfile mittels OLE geöffnet! Leider schaff ich jetzt nicht das er mir das letzte zeichen (wenn es ein leerzeichen ist) vom text zu löschen...
weiß jemand wie das geht?
ok thx werd ich morgen mal!
Word müsste ich ja obe OLE versteuern können 
hab vorhin zufällig noch ne andere lösung gefunden! UNd zwar über die dos box (wenn die auch versteuern geht) dafür gibts nen befehl umd alle dateien in nem ordner in nder txt datei mit pfad zu schreiben! Die könnte ich dann wieder auslesen zeile für zeile! ist aber ziemlich umständlich für so ne kleinigkeit 
Hi,
ich hab heut gleich noch ein Problem! NO:idea:
Und zwar hab ich in nem Ordner (OS: WIN XP) viele Word Dokumente drinnen. Bei denen ist leider bei jedem die Letzte Zeile eine leerzeile, die aber raus muss! Da ich das nicht bei jedem per hand machen will und kann wollte ich nen kleinen Agenten dafür bauen!
Leider weiß ich nicht wie man die Dokumente aus nem Ordner ausliest..
Geht das überhaupt?
Würde mich über hilfe freuen
Gruß
Esc
Hi ich bins noch mal! Den Source-Code hab ich jetzt schon geschrieben! Ging doch auf einmal! me <--- :hammer:
Hat jemand trotzdem noch ne einfachere lösung?
Hi, hab ein dringendes Problem
Ich habe eine Textdatei nach vorlendem Schema
ID;HAS;FRAGE;BEDINGUNG
1234;HS0000A000A000
4565;jdsklafds0ßdsfd;frage=wahr;33333=false
23434;HS0000A000A000;4444=false
4565;jdsklafds0ßdsfd;frage=wahr;33333=false
usw..
Das sollte eigentlich ne CSV Datei werden (mit excel oder Access erstellen) die ich dann über ne Col Datei einlese
Leider peilt Excel nicht das einige Bedingungen länger sind (und die das limit einer Zelle sprengen), dh. in Notes fehlt mir bei manchen Bedingungen was. Jetzt hab ich mir gedacht is baue nen kleinen Agenten und lese diese per Hand ein.
Problem: Ich schaffe es zwar die ganze Datei ein zu lesen nur ich müsste diese ja Zeile für Zeile auslesen und dann für jede Zeile ein Dokument abspeichern
Wie genau mach ich das?
Oder weiß jemand ne andere schnelle Möglichkeit die Daten in Notes rein zu bekommen? Soll also für jede ID ein eigenenes Dokument angelegt werden und alles in nem extra Feld(txt) im Dokument gespeichert werden
Danke schonmal
Gruß
Esc
so dank hilfe von jemaden hab ichs jetzt endlich
für alle die es interessiert
Declare Function GetTickCount Lib "kernel32" Alias "GetTickCount" () As Long
ende = GetTickCount()
start = Get TickCount()
Msgbox Cstr(ende - start)
Ne andere möglichkeit ist mir net eingefallen....
@ dnotes:
Genau du hast das "Problem" erkannt :strike:
hab mich vielleicht ein bisschen falsch ausgedrückt!
Bis jetzt kommt ja so nen Ergebnis raus: 1 Sekunde
Brauch das aber ja so 1,XXXXXX Sekunden! Und die XX mit Millisekunden aufgefüllt bzw gleich in Millisekunden ausrechnen lassen sonst kann ich das ziemlich schlecht vergleichen :roll:
sowas in der Art hab ich mir schon gedacht! Hatte es bis jetzt so
EDIT: GOTT Bin ich ..... blind
Set timeStart = New NotesDateTime(Now())
Set TimeEnde = New NotesDateTime(Now())
Dif = Cstr(timeEnde.TimeDifference(TimeStart))
Dachte es gibt eventuell ne schönere Methode das zu realisieren
Jetzt rechnet er mir es in sekunden aus! Bräuchte aber ja noch die Millisekunden! Wie komme ich da ran?
Hallo,
ich bins mal wieder!
HAbe verschiedene Sortieralgorythmen geschrieben und wollte jetzt mal testen welcher schneller ist! Gibts da ne möglichkeit die Zeiten herauszufinden die die Scripte brauchen, um ein Array zu Sortieren??
Würde mich über Antwort freuen
Schönen Tag
Esc
danke!! Ihr seit echt super!!!
Hat geklappt! *freu*
Schönen Tag noch @all .......
Ich geb euch bei gelegeneheit mal nen Bier aus :pint:
find ja super das ihr mir helft aber ich brings einfach net hin *hilfe*
1. wie muss ich dann promt einbauen
ZitatAlles anzeigen
Dim session As New NotesSession
Dim workspace As New NotesUIWorkSpace
Dim db As NotesDatabase ' Quell-DB
Dim retValue As Variant
Dim db2 As New NotesDatabase
retValue = workspace.Prompt( 13, "abc", "abcd" )
Dim doc As NotesDocument
Dim doc_temp As NotesDocument
Dim doc2 As NotesDocument
Dim dc As NotesDocumentCollection
Set db = session.CurrentDatabase
Set dc = db.UnprocessedDocuments
Set doc = dc.GetFirstDocument
While Not doc Is Nothing
Set doc_temp = dc.GetNextDocument(doc)
Set doc2 = Nothing
Set doc2 = doc.CopyToDatabase( db2 )
If Not doc2 Is Nothing Then
doc.Remove ' Dokument nur löschen, wenn auch kopiert
End If
Set doc = doc_temp
Wend
2. Der AGent hängt in dieser Zeile
doc.Remove ' Dokument nur löschen, wenn auch kopiert
FEHLER: fertig: Terminate 26: Missing argument for REMOVE
und hier jetzt auch noch
doc.Remove ' Dokument nur löschen, wenn auch kopiert
FEHLER: fertig: Terminate 7: Missing argument for constructor for: Notesdatabase
genau da liegt das problem!
ich will eben die Zieldatenbank nicht fest in den Code mit rein bauen sondern selber auswählen können!
Müsste mit
Dim ws As New NotesUIWorkSpace
ws.Prompt( 13, "ybc ", "asdf" )
gehen????????????
ich muss das im Agenten unter initialize eingeben oder?
Weil von dort aus kann ichs ja nicht speichern, da er mir immer nen error bringt
und muss ich hier noch was ändern?
Dim db2 As New NotesDatabase(ServerName, DBPfadUndName) ' Ziel-DB
Muss ich da meinen Servernamen einfügen????????
hey danke für die schnelle antwort
bei
"doc.Remove ' Dokument nur löschen, wenn auch kopiert"
sagt er mir den fehler
MISSING ARGUMENT FOR REMOVE
??????????
Hallo!
Bin neu hier und ein ziemlicher Notesanfänger!
Ich soll jetzt einträge von einer Datenbank makieren und diese dann in eine andere Datenbank verschieben,
die ich aber vorher ausgewählen kann.........
Kann mir jemand sagen wie ich mit Lotusscript!!mache..???
Gruß
Esc86
