dbaccess/source/ui/dlg/adodatalinks.cxx

   1 /*************************************************************************
   2  *
   3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   4  *
   5  * Copyright 2008 by Sun Microsystems, Inc.
   6  *
   7  * OpenOffice.org - a multi-platform office productivity suite
   8  *
   9  * $RCSfile: adodatalinks.cxx,v $
  10  * $Revision: 1.8 $
  11  *
  12  * This file is part of OpenOffice.org.
  13  *
  14  * OpenOffice.org is free software: you can redistribute it and/or modify
  15  * it under the terms of the GNU Lesser General Public License version 3
  16  * only, as published by the Free Software Foundation.
  17  *
  18  * OpenOffice.org is distributed in the hope that it will be useful,
  19  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  20  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  21  * GNU Lesser General Public License version 3 for more details
  22  * (a copy is included in the LICENSE file that accompanied this code).
  23  *
  24  * You should have received a copy of the GNU Lesser General Public License
  25  * version 3 along with OpenOffice.org.  If not, see
  26  * <http://www.openoffice.org/license.html>
  27  * for a copy of the LGPLv3 License.
  28  *
  29  ************************************************************************/
  30
  31 // MARKER(update_precomp.py): autogen include statement, do not remove
  32 #include "precompiled_dbaccess.hxx"
  33
  34
  35 #if defined(WIN) || defined(WNT)
  36 #if defined _MSC_VER
  37 #pragma warning(push, 1)
  38 #pragma warning(disable: 4917)
  39 #endif
  40 #include "msdasc.h"        // OLE DB Service Component header
  41 #if defined _MSC_VER
  42 #pragma warning(push, 1)
  43 #endif
  44 #include "stdio.h"
  45
  46 #include <initguid.h>  // Include only once in your application
  47 #include <adoid.h>     // needed for CLSID_CADOConnection
  48 #include <adoint.h>    // needed for ADOConnection
  49
  50 #ifndef _DBAUI_ADO_DATALINK_HXX_
  51 #include "adodatalinks.hxx"
  52 #endif
  53
  54 BSTR PromptEdit(long hWnd,BSTR connstr);
  55 BSTR PromptNew(long hWnd);
  56
  57 ::rtl::OUString getAdoDatalink(long hWnd,::rtl::OUString& oldLink)
  58 {
  59     ::rtl::OUString dataLink;
  60     if (oldLink.getLength())
  61     {
  62         dataLink=reinterpret_cast<sal_Unicode *>(PromptEdit(hWnd,(BSTR)oldLink.getStr()));
  63     }
  64     else
  65         dataLink=reinterpret_cast<sal_Unicode *>(PromptNew(hWnd));
  66     return dataLink;
  67 }
  68 BSTR PromptNew(long hWnd)
  69 {
  70     BSTR connstr=NULL;
  71     HRESULT hr;
  72     IDataSourceLocator* dlPrompt = NULL;
  73     ADOConnection* piTmpConnection = NULL;
  74     BSTR _result=NULL;
  75
  76      // Initialize COM
  77      ::CoInitialize( NULL );
  78
  79     // Instantiate DataLinks object.
  80       hr = CoCreateInstance(
  81                     CLSID_DataLinks,                            //clsid -- Data Links UI
  82                     NULL,                                                       //pUnkOuter
  83                     CLSCTX_INPROC_SERVER,                       //dwClsContext
  84                     IID_IDataSourceLocator,             //riid
  85                     (void**)&dlPrompt   //ppvObj
  86                     );
  87     if( FAILED( hr ) )
  88     {
  89         piTmpConnection->Release( );
  90         dlPrompt->Release( );
  91         return connstr;
  92     }
  93
  94     dlPrompt->put_hWnd(hWnd);
  95     if( FAILED( hr ) )
  96     {
  97         piTmpConnection->Release( );
  98         dlPrompt->Release( );
  99         return connstr;
 100     }
 101
 102     // Prompt for connection information.
 103     hr = dlPrompt->PromptNew((IDispatch **)&piTmpConnection);
 104
 105     if( FAILED( hr ) || !piTmpConnection )
 106     {
 107         dlPrompt->Release( );
 108         return connstr;
 109     }
 110
 111     hr = piTmpConnection->get_ConnectionString(&_result);
 112     if( FAILED( hr ) )
 113     {
 114         piTmpConnection->Release( );
 115         dlPrompt->Release( );
 116         return connstr;
 117     }
 118
 119     piTmpConnection->Release( );
 120     dlPrompt->Release( );
 121     CoUninitialize();
 122     return _result;
 123 }
 124
 125 BSTR PromptEdit(long hWnd,BSTR connstr)
 126 {
 127     HRESULT hr;
 128     IDataSourceLocator* dlPrompt = NULL;
 129     ADOConnection* piTmpConnection = NULL;
 130     BSTR _result=NULL;
 131
 132      // Initialize COM
 133      ::CoInitialize( NULL );
 134
 135      hr = CoCreateInstance(CLSID_CADOConnection,
 136                 NULL,
 137                 CLSCTX_INPROC_SERVER,
 138                 IID_IADOConnection,
 139                 (LPVOID *)&piTmpConnection);
 140     if( FAILED( hr ) )
 141     {
 142         piTmpConnection->Release( );
 143         return connstr;
 144     }
 145
 146
 147     hr = piTmpConnection->put_ConnectionString(connstr);
 148     if( FAILED( hr ) )
 149     {
 150         piTmpConnection->Release( );
 151         return connstr;
 152     }
 153
 154     // Instantiate DataLinks object.
 155       hr = CoCreateInstance(
 156                     CLSID_DataLinks,                            //clsid -- Data Links UI
 157                     NULL,                                                       //pUnkOuter
 158                     CLSCTX_INPROC_SERVER,                       //dwClsContext
 159                     IID_IDataSourceLocator,             //riid
 160                     (void**)&dlPrompt   //ppvObj
 161                     );
 162     if( FAILED( hr ) )
 163     {
 164         piTmpConnection->Release( );
 165         dlPrompt->Release( );
 166         return connstr;
 167     }
 168
 169     dlPrompt->put_hWnd(hWnd);
 170     if( FAILED( hr ) )
 171     {
 172         piTmpConnection->Release( );
 173         dlPrompt->Release( );
 174         return connstr;
 175     }
 176
 177     VARIANT_BOOL pbSuccess;
 178
 179     // Prompt for connection information.
 180     hr = dlPrompt->PromptEdit((IDispatch **)&piTmpConnection,&pbSuccess);
 181     if( SUCCEEDED( hr ) && FALSE == pbSuccess ) //if user press cancel then FALSE == pbSuccess
 182     {
 183         piTmpConnection->Release( );
 184         dlPrompt->Release( );
 185         return connstr;
 186     }
 187
 188     if( FAILED( hr ) )
 189     {
 190         // Prompt for new connection information.
 191         piTmpConnection->Release( );
 192         piTmpConnection = NULL;
 193         hr = dlPrompt->PromptNew((IDispatch **)&piTmpConnection);
 194         if(  FAILED( hr ) || !piTmpConnection )
 195         {
 196             dlPrompt->Release( );
 197             return connstr;
 198         }
 199     }
 200
 201     hr = piTmpConnection->get_ConnectionString(&_result);
 202     if( FAILED( hr ) )
 203     {
 204         piTmpConnection->Release( );
 205         dlPrompt->Release( );
 206         return connstr;
 207     }
 208
 209     piTmpConnection->Release( );
 210     dlPrompt->Release( );
 211     CoUninitialize();
 212     return _result;
 213 }
 214 #endif