OpenOffice.info

Hallo kannenklaus

Dank Deiner Code-Auflistung funktioniert es jetzt einwandfrei.

Vielen Dank für Deine Hilfe.

Grüsse
Heinz

'--Serienbrief erstellen
qry1="qry1_MCEF_Massn_gruppiert"
MailMerge = createunoservice("com.sun.star.text.MailMerge")
With MailMerge
	.DataSourceName=strDBName 'deine Datenbank, -quelle
	.DocumentURL=ConvertToUrl(SBQuellPfad+SB1Name)'Serienbriefmuster
	.CommandType=com.sun.star.sdb.CommandType.QUERY
	.Command=qry1
	.OutputType=com.sun.star.text.MailMergeType.FILE
	.SaveAsSingleFile=True
	.OutputUrl=ConvertToUrl(SBZielPfad)'dein Pfad
	.execute(Array())
End with

hallo heinz,

[quote]Hat irgend jemand MailMerge unter 3.0 gemacht und kann mir den Code zur Verfügung stellen?[/quote]

dieser code-schnipsel funktioniert unter 3.0 windows xp sp3 und ubuntu 8.04:

[code]'--Serienbrief erstellen
qry1="qry1_MCEF_Massn_gruppiert"
MailMerge = createunoservice("com.sun.star.text.MailMerge")
With MailMerge
.DataSourceName=strDBName 'deine Datenbank, -quelle
.DocumentURL=ConvertToUrl(SBQuellPfad+SB1Name)'Serienbriefmuster
.CommandType=com.sun.star.sdb.CommandType.QUERY
.Command=qry1
.OutputType=com.sun.star.text.MailMergeType.FILE
.SaveAsSingleFile=True
.OutputUrl=ConvertToUrl(SBZielPfad)'dein Pfad
.execute(Array())
End with[/code]

grüsse klaus

Hallo Dirk

Auch das habe ich nochmals probiert; es kommt auch dann immer noch der Fehler.

Gruss
Heinz

Hallo kannenklaus

Schade, es hat leider nichts bewirkt. Der Fehler erscheint immer noch.

Hat irgend jemand MailMerge unter 3.0 gemacht und kann mir den Code zur Verfügung stellen?

Gruss
Heinz

MailMerge.CommandType=com.sun.star.sdb.CommandType.QUERY

hallo heinz,

[quote]Es ist eine Exception aufgetreten
Type: com.sun.star.sdbc.SQLException
Message:[/quote]

versuch's einfach mal anstatt mit 1 bei CommandType

[code]MailMerge.CommandType=com.sun.star.sdb.CommandType.QUERY[/code]

grüße

klaus

MailMerge = createunoservice("com.sun.star.text.MailMerge")
MailMerge.DataSourceName="RV_Adressen"
MailMerge.DocumentURL=url_vorlage
MailMerge.CommandType=1
MailMerge.Command="Abfrage_Mitglieder_Neu"
MailMerge.OutputType=Print_auf   	 ' 1 = Drucker,  2 = Datei
if Print_auf = 2 then
	MailMerge.OutputUrl=url_druck
	MailMerge.FileNameFromColumn=False
	MailMerge.Filenameprefix="zz_sb_willkomm"
	MailMerge.OutputType=com.sun.star.text.MailMergeType.FILE
	MailMerge.SaveAsSingleFile=True
end if
MailMerge.execute(Array())

Guten Tag

Ich habe Probleme mit MailMerge. Mit OOo 2.3 (Kubuntu 7.10) funktioniert der MailMerge mit untenstehenden Code:

[code]
MailMerge = createunoservice("com.sun.star.text.MailMerge")
MailMerge.DataSourceName="RV_Adressen"
MailMerge.DocumentURL=url_vorlage
MailMerge.CommandType=1
MailMerge.Command="Abfrage_Mitglieder_Neu"
MailMerge.OutputType=Print_auf ' 1 = Drucker, 2 = Datei
if Print_auf = 2 then
MailMerge.OutputUrl=url_druck
MailMerge.FileNameFromColumn=False
MailMerge.Filenameprefix="zz_sb_willkomm"
MailMerge.OutputType=com.sun.star.text.MailMergeType.FILE
MailMerge.SaveAsSingleFile=True
end if
MailMerge.execute(Array())
[/code]

Lasse ich dasselbe mit OOo 2.4 oder OOo 3.0 laufen, erscheint bei MailMerge.execute(Array()) der Fehler:
Es ist eine Exception aufgetreten
Type: com.sun.star.sdbc.SQLException
Message:

Ich ersetzte nun MailMerge.execute(Array()) durch
Dim MyProps as Object
MailMerge.execute(MyProps())
Jetzt erscheint der Fehler:
Es ist eine Exception aufgetreten
Type: com.sun.star.lanf.IllegalArgumentException
Message: cannot coerce argument type during corereflection call!

Was läuft da falsch? Wie bringe ich MailMerge unter OOo 2.4 und 3.0 zum laufen? Kann mir jemand helfen?

Alles suchen in Foren usw. brachte nichts brauchbares.

Gruss
Heinz[code][/code]