*** empty log message ***

2 files changed, 243 insertions, 5 deletions

diff --git a/shell/source/win32/workbench/TestSmplMail.cxx b/shell/source/win32/workbench/TestSmplMail.cxx
new file mode 100644
index 000000000000..59bda0d02bd7
--- /dev/null
+++ b/shell/source/win32/workbench/TestSmplMail.cxx
@@ -0,0 +1,218 @@
+/*************************************************************************
+ *
+ *  $RCSfile: TestSmplMail.cxx,v $
+ *
+ *  $Revision: 1.1 $
+ *
+ *  last change: $Author: tra $ $Date: 2001-05-14 08:19:15 $
+ *
+ *  The Contents of this file are made available subject to the terms of
+ *  either of the following licenses
+ *
+ *         - GNU Lesser General Public License Version 2.1
+ *         - Sun Industry Standards Source License Version 1.1
+ *
+ *  Sun Microsystems Inc., October, 2000
+ *
+ *  GNU Lesser General Public License Version 2.1
+ *  =============================================
+ *  Copyright 2000 by Sun Microsystems, Inc.
+ *  901 San Antonio Road, Palo Alto, CA 94303, USA
+ *
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Lesser General Public
+ *  License version 2.1, as published by the Free Software Foundation.
+ *
+ *  This library is distributed in the hope that it will be useful,
+ *  but WITHOUT ANY WARRANTY; without even the implied warranty of
+ *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ *  Lesser General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Lesser General Public
+ *  License along with this library; if not, write to the Free Software
+ *  Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ *  MA  02111-1307  USA
+ *
+ *
+ *  Sun Industry Standards Source License Version 1.1
+ *  =================================================
+ *  The contents of this file are subject to the Sun Industry Standards
+ *  Source License Version 1.1 (the "License"); You may not use this file
+ *  except in compliance with the License. You may obtain a copy of the
+ *  License at http://www.openoffice.org/license.html.
+ *
+ *  Software provided under this License is provided on an "AS IS" basis,
+ *  WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
+ *  WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
+ *  MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
+ *  See the License for the specific provisions governing your rights and
+ *  obligations concerning the Software.
+ *
+ *  The Initial Developer of the Original Code is: Sun Microsystems, Inc.
+ *
+ *  Copyright: 2000 by Sun Microsystems, Inc.
+ *
+ *  All Rights Reserved.
+ *
+ *  Contributor(s): _______________________________________
+ *
+ *
+ ************************************************************************/
+
+
+//-----------------------------------------------------------
+//  interface includes
+//-----------------------------------------------------------
+
+#ifndef _COM_SUN_STAR_LANG_XCOMPONENT_HPP_
+#include <com/sun/star/lang/XComponent.hpp>
+#endif
+
+#ifndef _COM_SUN_STAR_REGISTRY_XSIMPLEREGISTRY_HPP_
+#include <com/sun/star/registry/XSimpleRegistry.hpp>
+#endif
+
+#ifndef _COM_SUN_STAR_SYSTEM_XSIMPLEMAILCLIENTSUPPLIER_HPP_
+#include <com/sun/star/system/XSimpleMailClientSupplier.hpp>
+#endif
+
+#ifndef _CPPUHELPER_SERVICEFACTORY_HXX_
+#include <cppuhelper/servicefactory.hxx>
+#endif
+
+#ifndef _CPPUHELPER_SERVICEFACTORY_HXX_
+#include <cppuhelper/servicefactory.hxx>
+#endif
+
+#ifndef _RTL_USTRING_
+#include <rtl/ustring>
+#endif
+
+#ifndef _SAL_TYPES_H_
+#include <sal/types.h>
+#endif
+
+#ifndef _OSL_DIAGNOSE_H_
+#include <osl/diagnose.h>
+#endif
+
+#include <stdio.h>
+#include <windows.h>
+
+//--------------------------------------------------------------
+//  namesapces
+//--------------------------------------------------------------
+
+using namespace ::rtl                   ;
+using namespace ::cppu                  ;
+using namespace ::com::sun::star::uno   ;
+using namespace ::com::sun::star::lang  ;
+using namespace std                     ;
+using namespace com::sun::star::system;
+
+//--------------------------------------------------------------
+//  defines
+//--------------------------------------------------------------
+
+#define RDB_SYSPATH "D:\\Projects\\gsl\\shell\\wntmsci7\\bin\\applicat.rdb"
+
+//--------------------------------------------------------------
+//  global variables
+//--------------------------------------------------------------
+
+Reference< XMultiServiceFactory >   g_xFactory;
+
+//--------------------------------------------------------------
+//  main
+//--------------------------------------------------------------
+
+
+int SAL_CALL main(int nArgc, char* Argv[], char* Env[]  )
+{
+    //-------------------------------------------------
+    // get the global service-manager
+    //-------------------------------------------------
+
+    // Get global factory for uno services.
+    OUString rdbName = OUString( RTL_CONSTASCII_USTRINGPARAM( RDB_SYSPATH ) );
+    Reference< XMultiServiceFactory > g_xFactory( createRegistryServiceFactory( rdbName ) );
+
+    // Print a message if an error occured.
+    if ( g_xFactory.is() == sal_False )
+    {
+        OSL_ENSURE(sal_False, "Can't create RegistryServiceFactory");
+        return(-1);
+    }
+
+    printf("Creating RegistryServiceFactory successful\n");
+
+    //-------------------------------------------------
+    // try to get an Interface to a XFilePicker Service
+    //-------------------------------------------------
+
+    try
+    {
+        Reference< XSimpleMailClientSupplier > xSmplMailClientSuppl(
+            g_xFactory->createInstance( OUString::createFromAscii( "com.sun.star.system.SimpleSystemMail" ) ), UNO_QUERY );
+
+        if ( !xSmplMailClientSuppl.is() )
+        {
+            OSL_ENSURE( sal_False, "Error creating SimpleSystemMail Service" );
+            return(-1);
+        }
+
+        Reference< XSimpleMailClient > xSmplMailClient(
+            xSmplMailClientSuppl->querySimpleMailClient( ) );
+
+        if ( xSmplMailClient.is( ) )
+        {
+            Reference< XSimpleMailMessage > xSmplMailMsg(
+                xSmplMailClient->createSimpleMailMessage( ) );
+
+            if ( xSmplMailMsg.is( ) )
+            {
+                xSmplMailMsg->setRecipient( OUString::createFromAscii("tino.rachui@germany.sun.com") );
+                xSmplMailMsg->setOriginator( OUString::createFromAscii( "hennes.rohling@germany.sun.com" ) );
+
+                Sequence< OUString > ccRecips( 1 );
+                ccRecips[0] = OUString::createFromAscii( "hennes.rohling@germany.sun.com" );
+
+                xSmplMailMsg->setCcRecipient( ccRecips );
+
+                Sequence< OUString > bccRecips( 1 );
+                bccRecips[0] = OUString::createFromAscii( "hennes.rohling@germany.sun.com" );
+
+                xSmplMailMsg->setBccRecipient( bccRecips );
+
+                xSmplMailMsg->setSubject( OUString::createFromAscii( "Mapi Test" ) );
+
+                xSmplMailClient->sendSimpleMailMessage( xSmplMailMsg, 0 );
+            }
+        }
+    }
+    catch( Exception& )
+    {
+    }
+
+    //--------------------------------------------------
+    // shutdown
+    //--------------------------------------------------
+
+    // Cast factory to XComponent
+    Reference< XComponent > xComponent( g_xFactory, UNO_QUERY );
+
+    // Print a message if an error occured.
+    if ( xComponent.is() == sal_False )
+    {
+        OSL_ENSURE(sal_False, "Error shuting down");
+    }
+
+    // Dispose and clear factory
+    xComponent->dispose();
+    g_xFactory.clear();
+    g_xFactory = Reference< XMultiServiceFactory >();
+
+    printf("Test successful\n");
+
+    return 0;
+}
diff --git a/shell/source/win32/workbench/makefile.mk b/shell/source/win32/workbench/makefile.mk
index b5e371d8dc21..e12692e34d8a 100644
--- a/shell/source/win32/workbench/makefile.mk
+++ b/shell/source/win32/workbench/makefile.mk
@@ -2,9 +2,9 @@
 #
 #   $RCSfile: makefile.mk,v $
 #
-#   $Revision: 1.1 $
+#   $Revision: 1.2 $
 #
-#   last change: $Author: tra $ $Date: 2001-04-27 13:55:30 $
+#   last change: $Author: tra $ $Date: 2001-05-14 08:19:24 $
 #
 #   The Contents of this file are made available subject to the terms of
 #   either of the following licenses
@@ -64,6 +64,7 @@ PRJ=..$/..$/..
 
 PRJNAME=		sysshell
 TARGET=			testsyssh
+TARGET1=		testsmplmail
 LIBTARGET=		NO
 TARGETTYPE=		CUI
 
@@ -79,10 +80,14 @@ TARGETTYPE=		CUI
 
 CFLAGS+=/GX
 
-OBJFILES=   	$(OBJ)$/TestSysShExec.obj
+OBJFILES1=$(OBJ)$/TestSysShExec.obj
+OBJFILES2=$(OBJ)$/TestSmplMail.obj
+
+OBJFILES=$(OBJFILES1)\
+         $(OBJFILES2)
 
 APP1TARGET=$(TARGET)
-APP1OBJS=		$(OBJFILES)
+APP1OBJS=$(OBJFILES1)
 
 APP1STDLIBS+=	$(CPPULIB)			\
                 $(CPPUHELPERLIB)	\
@@ -91,6 +96,21 @@ APP1STDLIBS+=	$(CPPULIB)			\
                 
 APP1DEF=		$(MISC)$/$(APP1TARGET).def
 
+
+# --- TestSmplMail ---
+
+APP2TARGET=$(TARGET1)
+APP2OBJS=$(OBJFILES2)
+
+APP2STDLIBS+=	$(CPPULIB)			\
+                $(CPPUHELPERLIB)	\
+                $(SALLIB) 	 		\
+                user32.lib
+                
+APP2DEF=		$(MISC)$/$(APP2TARGET).def
+
 # --- Targets ------------------------------------------------------
+
 .INCLUDE :		target.mk
-#.INCLUDE :		$(PRJ)$/util$/target.pmk
+
+