Dim CurrentExportSet as String
Dim RecentExportSet as integer
Dim ExportFound as boolean
- printlog " This function sets the export in options to '
Oracle Open Office Writer' "
+ printlog " This function sets the export in options to 'OpenOffice Writer' "
printlog " Giving a parameter a special export will be chosen "
For i = 1 to Export.GetItemCount
CurrentExportset = Export.GetSelText
- if Instr(Ucase(CurrentExportset), "
Oracle Open Office Writer") then
+ if Instr(Ucase(CurrentExportset), "OpenOffice Writer") then
i = Export.GetItemCount + 1
if ExportFound = True then
printlog "Export has been changed!"
- Warnlog "Couldn't set Export to
Oracle Open Office Writer!"
+ Warnlog "Couldn't set Export to OpenOffice Writer!"