Export/import von Ansichten und Masken

[Pikolu]

Guten Tag!
Ich hab's folgendes Problem. Ich bin ein Praktikant bei einer Firma.
Dort habe ich folgende Aufgabe gekrigt, die ich erledigen muss. Aber da ich nicht genug Erfahrungen habe um einen Script zu erstellen. Wenn ich mit diese Aufgabe fertige werde, dann kriege ich einen Ausbildungsplatz!

BITTE HELFEN SIE MIR!!!

Ich muss folgende Aufgabe erledigen:
a) Ansichten und Masken (gleichzeitig) exportieren und ins XML umwandeln.
b) Ansichten und Masken (gleichzeitig) wieder nach XPAGE oder nach Benutzerdefinierte Steuerelemente importieren.

[ata]

Hallo

das lässt sich nicht ohne Programmiererfahrung machen - und fertigen Code wird dir hier sicherlich keiner liefern können - das lässt sich neben dem Job her nicht machen - wir können dir allenfalls auf die Sprünge helfen...

Es wäre übrigens schön, wenn man sich per Vornamen anreden kann - danke

Toni

[DerAndre]

Hi Mr. X.

Hast Du Dir in der Designerhilfe schon

Using XML with LotusScript

angeschaut?

Es kann Dir jetzt nämlich passieren, das Du erstmal ein paar Takte zu hören bekommst.

[Pikolu]

Es wäre auch sehr nett, wenn Sie mir paar Links geben könnten wo ich das nachlesen kann.

Alex

[ata]

... die Notes Designer Hilfe liegt im Verzeichnis Help im Data-Verzeichnis

Toni

[Peter Klett]

Am besten, Du erstellst einen Agenten in der Datenbank und wählst LotusScript als Sprache aus. Mit F1 öffnet sich dann schon einmal die Designerhilfe. Die schaust Du Dir genau an, vor allem die Beispiele.

Wenn Du dann etwas gebaut hast, und es funktioniert nicht so, wie es soll, dann poste das Script hier, da kann Dir sicher geholfen werden.

[Pikolu]

Hallo !!!

Ich habe eine Frage,
Wie kann ich alle Masken nach DXL oder nach XML exportieren?

Danke
Alex

[m3]

Notes Designer Help -> NotesDXLExporter class

[Pikolu]

Notes Designer Help -> NotesDXLExporter class

Danke für die Antwort!

ich habe noch eine Frage,

Wenn ich die Masken und Ansichten exportiere, wie kriege ich das für jeder Ansicht und Maske eine Datei erzeugt wird?

Danke

[Peter Klett]

Ich habe damit noch nicht gearbeitet, beziehe mein Halbwissen daher nur aus der Hilfe.

Ist es für Deine Aufgabenstellung überhaupt notwendig, die Masken und Ansichten einzeln zu exportieren? Falls ja, würde ich es in etwa so lösen:
....
Forall form in db.Forms
   'Datei definieren
   'leere NotesNoteCollection erzeugen
   Call notesNoteCollection.Add (form)
   'Datei exportieren
End Forall

Sinngemäß dann auch Forall view in db.Views

[bikerboy]

Peter ist schon auf dem richtige Weg mit seinem Halbwissen.

NotesNoteCollection über die NotesDatabase-Klasse erstellen lassen, dabei kannst du dann die Flags für Masken und Ansicht/Ordner setzen und dann exportierst du das ganze über den NotesStream in eine Datei.

Dann hast du den Export.

Der Import ist ebenso simpel wie birnig, da musst du nur drauf achten wie du die Importoptions in der Klasse NotesDXLImporter setzt, da gibt es nämliche ein fürs Update. Wobei wenn du die Masken in eine andere DB importieren willst darfst du kein Update verwenden.

[Fedaykin]

Hallo Alex

Hier ein Beispiel für Export (so mach ich das).

Code

Sub Initialize()
	Dim session As New NotesSession
	Dim db As NotesDatabase
	Dim docDesign As NotesDocument
	Dim notes As NotesNoteCollection
	Dim objExporter As NotesDXLExporter
	Dim objStream As NotesStream
	Dim strNoteID As String
	Dim strDXL As String
	
	Set db=session.Currentdatabase
	Set objStream=session.Createstream
	Set notes=db.Createnotecollection(False)
	Set objExporter=session.Createdxlexporter

	notes.Selectviews=True
	'notes.Selectfolders=True
	notes.Selectforms=True
	
	notes.Buildcollection
	strNoteID=notes.Getfirstnoteid
	Do Until strNoteID=""
		Set docDesign=db.Getdocumentbyid(strNoteid)
		
		strDXL=objExporter.Export(docDesign)
		objStream.Open Environ("Temp") & "\" & strNoteID & ".dxl"
		objStream.Writetext strDXL
		objStream.Close
		
		strNoteID=notes.Getnextnoteid(strNoteid)
	Loop
End Sub

Gruss
Remo

[Pikolu]

Hallo Alex

Hier ein Beispiel für Export (so mach ich das).

Code

Sub Initialize()
	Dim session As New NotesSession
	Dim db As NotesDatabase
	Dim docDesign As NotesDocument
	Dim notes As NotesNoteCollection
	Dim objExporter As NotesDXLExporter
	Dim objStream As NotesStream
	Dim strNoteID As String
	Dim strDXL As String
	
	Set db=session.Currentdatabase
	Set objStream=session.Createstream
	Set notes=db.Createnotecollection(False)
	Set objExporter=session.Createdxlexporter

	notes.Selectviews=True
	'notes.Selectfolders=True
	notes.Selectforms=True
	
	notes.Buildcollection
	strNoteID=notes.Getfirstnoteid
	Do Until strNoteID=""
		Set docDesign=db.Getdocumentbyid(strNoteid)
		
		strDXL=objExporter.Export(docDesign)
		objStream.Open Environ("Temp") & "\" & strNoteID & ".dxl"
		objStream.Writetext strDXL
		objStream.Close
		
		strNoteID=notes.Getnextnoteid(strNoteid)
	Loop
End Sub

Hallo Remo,

Wenn ich dein Beispiel benutze, passiert bei mir nicht. Aber Danke für Beispiel

Alex

[Thomas Schulte]

Definiert doch einmal "macht nichts" etwas genauer.

[Thomas Schulte]

Davon abgesehen. Teil A deiner Aufgabe geht ja.
Hinweis wegen geht nicht: Schau dir in der Hilfe mal an was "Environ" so tut. Und dann überleg noch einmal warum du keine Ergebnisse siehst.

Aber Teil B? Automatisch? Das wäre cool.
Und wenn man es denn realisieren könnte dann sicher nicht als Praktikant mit 0 Vorwissen und einem in Aussicht gestellten Ausbildungsplatz. Könntest du das nämlich, dann würdest du eine MENGE Kohle verdienen können.

Sorry aber da verarscht entweder dich jemand, oder du willst uns ver....en.

[Fedaykin]

Hallo Thomas

Wie er den Teil B realisiert bin ich auch gespannt. Denke mir das würde wohl am besten über XSLT gehen.

http://xpagesblog.com/xpages-blog/2009/7/23/transforming-domino-forms-into-xpages-via-xslt.html

Was mich betrifft stehe mit XSLT echt auf Kriegsfuss da parse ich schon fast lieber und bin froh nichts damit machen zu müssen.   

Gruss
Remo

[Pikolu]

Davon abgesehen. Teil A deiner Aufgabe geht ja.
Hinweis wegen geht nicht: Schau dir in der Hilfe mal an was "Environ" so tut. Und dann überleg noch einmal warum du keine Ergebnisse siehst.

Aber Teil B? Automatisch? Das wäre cool.
Und wenn man es denn realisieren könnte dann sicher nicht als Praktikant mit 0 Vorwissen und einem in Aussicht gestellten Ausbildungsplatz. Könntest du das nämlich, dann würdest du eine MENGE Kohle verdienen können.

Sorry aber da verarscht entweder dich jemand, oder du willst uns ver....en.

Danke für den Tipp

Ver...en will ich hier keinen...ich absolviere jetzt 6 wochiges Praktukum...Meine Aufgabe ist Die masken und Ansichten exportieren und dann nach Xpage oder nach Benutzerdefinierte Stuerelemente importieren.

Wenn ich mit diese Aufgabe gut Erledigen kann, kriege ich ein Ausbildungspaltz.

Trotzdem Danke für eure Tipps!

[Pikolu]

ich habe jetzt alles exportiert was ich wollte!

Danke für eure Tipps!

Ich möchte Remo danken für den Beispiel!

Jetzt kommt die Aufgabe B.

kann ich das überhaupt nach XPAGE oder nach Benutzerdefinierte Steuerelemte importieren?
kann ich das ins xsp umwandeln?
ist das möglich und notwendig?


Alex