1*cdf0e10cSrcweir /************************************************************************* 2*cdf0e10cSrcweir * 3*cdf0e10cSrcweir * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. 4*cdf0e10cSrcweir * 5*cdf0e10cSrcweir * Copyright 2000, 2010 Oracle and/or its affiliates. 6*cdf0e10cSrcweir * 7*cdf0e10cSrcweir * OpenOffice.org - a multi-platform office productivity suite 8*cdf0e10cSrcweir * 9*cdf0e10cSrcweir * This file is part of OpenOffice.org. 10*cdf0e10cSrcweir * 11*cdf0e10cSrcweir * OpenOffice.org is free software: you can redistribute it and/or modify 12*cdf0e10cSrcweir * it under the terms of the GNU Lesser General Public License version 3 13*cdf0e10cSrcweir * only, as published by the Free Software Foundation. 14*cdf0e10cSrcweir * 15*cdf0e10cSrcweir * OpenOffice.org is distributed in the hope that it will be useful, 16*cdf0e10cSrcweir * but WITHOUT ANY WARRANTY; without even the implied warranty of 17*cdf0e10cSrcweir * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 18*cdf0e10cSrcweir * GNU Lesser General Public License version 3 for more details 19*cdf0e10cSrcweir * (a copy is included in the LICENSE file that accompanied this code). 20*cdf0e10cSrcweir * 21*cdf0e10cSrcweir * You should have received a copy of the GNU Lesser General Public License 22*cdf0e10cSrcweir * version 3 along with OpenOffice.org. If not, see 23*cdf0e10cSrcweir * <http://www.openoffice.org/license.html> 24*cdf0e10cSrcweir * for a copy of the LGPLv3 License. 25*cdf0e10cSrcweir * 26*cdf0e10cSrcweir ************************************************************************/ 27*cdf0e10cSrcweir 28*cdf0e10cSrcweir // MARKER(update_precomp.py): autogen include statement, do not remove 29*cdf0e10cSrcweir #include "precompiled_cui.hxx" 30*cdf0e10cSrcweir 31*cdf0e10cSrcweir #include <com/sun/star/frame/XDispatchProvider.hpp> 32*cdf0e10cSrcweir #include <com/sun/star/util/XURLTransformer.hpp> 33*cdf0e10cSrcweir #include <com/sun/star/frame/FrameSearchFlag.hpp> 34*cdf0e10cSrcweir #include <sfx2/request.hxx> 35*cdf0e10cSrcweir 36*cdf0e10cSrcweir #include <comphelper/processfactory.hxx> 37*cdf0e10cSrcweir #include <sfx2/viewfrm.hxx> 38*cdf0e10cSrcweir #include <unotools/pathoptions.hxx> 39*cdf0e10cSrcweir #include <unotools/moduleoptions.hxx> 40*cdf0e10cSrcweir 41*cdf0e10cSrcweir #include "hlmailtp.hxx" 42*cdf0e10cSrcweir #include "hyperdlg.hrc" 43*cdf0e10cSrcweir 44*cdf0e10cSrcweir using namespace ::rtl; 45*cdf0e10cSrcweir using namespace ::com::sun::star; 46*cdf0e10cSrcweir 47*cdf0e10cSrcweir /************************************************************************* 48*cdf0e10cSrcweir |* 49*cdf0e10cSrcweir |* Contructor / Destructor 50*cdf0e10cSrcweir |* 51*cdf0e10cSrcweir |************************************************************************/ 52*cdf0e10cSrcweir 53*cdf0e10cSrcweir SvxHyperlinkMailTp::SvxHyperlinkMailTp ( Window *pParent, const SfxItemSet& rItemSet) 54*cdf0e10cSrcweir : SvxHyperlinkTabPageBase ( pParent, CUI_RES( RID_SVXPAGE_HYPERLINK_MAIL ), 55*cdf0e10cSrcweir rItemSet ), 56*cdf0e10cSrcweir maGrpMailNews ( this, CUI_RES (GRP_MAILNEWS) ), 57*cdf0e10cSrcweir maRbtMail ( this, CUI_RES (RB_LINKTYP_MAIL) ), 58*cdf0e10cSrcweir maRbtNews ( this, CUI_RES (RB_LINKTYP_NEWS) ), 59*cdf0e10cSrcweir maFtReceiver ( this, CUI_RES (FT_RECEIVER) ), 60*cdf0e10cSrcweir maCbbReceiver ( this, INET_PROT_MAILTO ), 61*cdf0e10cSrcweir maBtAdrBook ( this, CUI_RES (BTN_ADRESSBOOK) ), 62*cdf0e10cSrcweir maFtSubject ( this, CUI_RES (FT_SUBJECT) ), 63*cdf0e10cSrcweir maEdSubject ( this, CUI_RES (ED_SUBJECT) ) 64*cdf0e10cSrcweir { 65*cdf0e10cSrcweir // Set HC bitmaps and disable display of bitmap names. 66*cdf0e10cSrcweir maBtAdrBook.SetModeImage( Image( CUI_RES( IMG_ADRESSBOOK_HC ) ), BMP_COLOR_HIGHCONTRAST ); 67*cdf0e10cSrcweir maBtAdrBook.EnableTextDisplay (sal_False); 68*cdf0e10cSrcweir 69*cdf0e10cSrcweir InitStdControls(); 70*cdf0e10cSrcweir FreeResource(); 71*cdf0e10cSrcweir 72*cdf0e10cSrcweir // Init URL-Box (pos&size, Open-Handler) 73*cdf0e10cSrcweir maCbbReceiver.SetPosSizePixel ( LogicToPixel( Point( COL_2, 25 ), MAP_APPFONT ), 74*cdf0e10cSrcweir LogicToPixel( Size ( 176 - COL_DIFF, 60), MAP_APPFONT ) ); 75*cdf0e10cSrcweir 76*cdf0e10cSrcweir maCbbReceiver.Show(); 77*cdf0e10cSrcweir maCbbReceiver.SetHelpId( HID_HYPERDLG_MAIL_PATH ); 78*cdf0e10cSrcweir 79*cdf0e10cSrcweir SetExchangeSupport (); 80*cdf0e10cSrcweir 81*cdf0e10cSrcweir // set defaults 82*cdf0e10cSrcweir maRbtMail.Check (); 83*cdf0e10cSrcweir 84*cdf0e10cSrcweir // overload handlers 85*cdf0e10cSrcweir maRbtMail.SetClickHdl ( LINK ( this, SvxHyperlinkMailTp, Click_SmartProtocol_Impl ) ); 86*cdf0e10cSrcweir maRbtNews.SetClickHdl ( LINK ( this, SvxHyperlinkMailTp, Click_SmartProtocol_Impl ) ); 87*cdf0e10cSrcweir maBtAdrBook.SetClickHdl ( LINK ( this, SvxHyperlinkMailTp, ClickAdrBookHdl_Impl ) ); 88*cdf0e10cSrcweir maCbbReceiver.SetModifyHdl ( LINK ( this, SvxHyperlinkMailTp, ModifiedReceiverHdl_Impl) ); 89*cdf0e10cSrcweir 90*cdf0e10cSrcweir if ( !SvtModuleOptions().IsModuleInstalled( SvtModuleOptions::E_SDATABASE ) ) 91*cdf0e10cSrcweir maBtAdrBook.Hide(); 92*cdf0e10cSrcweir 93*cdf0e10cSrcweir maBtAdrBook.SetAccessibleRelationMemberOf( &maGrpMailNews ); 94*cdf0e10cSrcweir maBtAdrBook.SetAccessibleRelationLabeledBy( &maFtReceiver ); 95*cdf0e10cSrcweir } 96*cdf0e10cSrcweir 97*cdf0e10cSrcweir SvxHyperlinkMailTp::~SvxHyperlinkMailTp () 98*cdf0e10cSrcweir { 99*cdf0e10cSrcweir } 100*cdf0e10cSrcweir 101*cdf0e10cSrcweir /************************************************************************* 102*cdf0e10cSrcweir |* 103*cdf0e10cSrcweir |* Fill the all dialog-controls except controls in groupbox "more..." 104*cdf0e10cSrcweir |* 105*cdf0e10cSrcweir |************************************************************************/ 106*cdf0e10cSrcweir 107*cdf0e10cSrcweir void SvxHyperlinkMailTp::FillDlgFields ( String& aStrURL ) 108*cdf0e10cSrcweir { 109*cdf0e10cSrcweir const sal_Char sMailtoScheme[] = INET_MAILTO_SCHEME; 110*cdf0e10cSrcweir 111*cdf0e10cSrcweir INetURLObject aURL( aStrURL ); 112*cdf0e10cSrcweir String aStrScheme = GetSchemeFromURL( aStrURL ); 113*cdf0e10cSrcweir 114*cdf0e10cSrcweir // set URL-field and additional controls 115*cdf0e10cSrcweir String aStrURLc ( aStrURL ); 116*cdf0e10cSrcweir // set additional controls for EMail: 117*cdf0e10cSrcweir if ( aStrScheme.SearchAscii( sMailtoScheme ) == 0 ) 118*cdf0e10cSrcweir { 119*cdf0e10cSrcweir // Find mail-subject 120*cdf0e10cSrcweir String aStrSubject, aStrTmp ( aStrURLc ); 121*cdf0e10cSrcweir 122*cdf0e10cSrcweir const sal_Char sSubject[] = "subject"; 123*cdf0e10cSrcweir xub_StrLen nPos = aStrTmp.ToLowerAscii().SearchAscii( sSubject, 0 ); 124*cdf0e10cSrcweir nPos = aStrTmp.Search( sal_Unicode( '=' ), nPos ); 125*cdf0e10cSrcweir 126*cdf0e10cSrcweir if ( nPos != STRING_NOTFOUND ) 127*cdf0e10cSrcweir aStrSubject = aStrURLc.Copy( nPos+1, aStrURLc.Len() ); 128*cdf0e10cSrcweir 129*cdf0e10cSrcweir nPos = aStrURLc.Search ( sal_Unicode( '?' ), 0); 130*cdf0e10cSrcweir 131*cdf0e10cSrcweir aStrURLc = aStrURLc.Copy( 0, ( nPos == STRING_NOTFOUND ? 132*cdf0e10cSrcweir aStrURLc.Len() : nPos ) ); 133*cdf0e10cSrcweir 134*cdf0e10cSrcweir maEdSubject.SetText ( aStrSubject ); 135*cdf0e10cSrcweir } 136*cdf0e10cSrcweir else 137*cdf0e10cSrcweir { 138*cdf0e10cSrcweir maEdSubject.SetText (aEmptyStr); 139*cdf0e10cSrcweir } 140*cdf0e10cSrcweir 141*cdf0e10cSrcweir maCbbReceiver.SetText ( aStrURLc ); 142*cdf0e10cSrcweir 143*cdf0e10cSrcweir SetScheme( aStrScheme ); 144*cdf0e10cSrcweir } 145*cdf0e10cSrcweir 146*cdf0e10cSrcweir /************************************************************************* 147*cdf0e10cSrcweir |* 148*cdf0e10cSrcweir |* retrieve and prepare data from dialog-fields 149*cdf0e10cSrcweir |* 150*cdf0e10cSrcweir |************************************************************************/ 151*cdf0e10cSrcweir 152*cdf0e10cSrcweir void SvxHyperlinkMailTp::GetCurentItemData ( String& aStrURL, String& aStrName, 153*cdf0e10cSrcweir String& aStrIntName, String& aStrFrame, 154*cdf0e10cSrcweir SvxLinkInsertMode& eMode ) 155*cdf0e10cSrcweir { 156*cdf0e10cSrcweir aStrURL = CreateAbsoluteURL(); 157*cdf0e10cSrcweir GetDataFromCommonFields( aStrName, aStrIntName, aStrFrame, eMode ); 158*cdf0e10cSrcweir } 159*cdf0e10cSrcweir 160*cdf0e10cSrcweir String SvxHyperlinkMailTp::CreateAbsoluteURL() const 161*cdf0e10cSrcweir { 162*cdf0e10cSrcweir String aStrURL = maCbbReceiver.GetText(); 163*cdf0e10cSrcweir INetURLObject aURL(aStrURL); 164*cdf0e10cSrcweir 165*cdf0e10cSrcweir if( aURL.GetProtocol() == INET_PROT_NOT_VALID ) 166*cdf0e10cSrcweir { 167*cdf0e10cSrcweir aURL.SetSmartProtocol( GetSmartProtocolFromButtons() ); 168*cdf0e10cSrcweir aURL.SetSmartURL(aStrURL); 169*cdf0e10cSrcweir } 170*cdf0e10cSrcweir 171*cdf0e10cSrcweir // subject for EMail-url 172*cdf0e10cSrcweir if( aURL.GetProtocol() == INET_PROT_MAILTO ) 173*cdf0e10cSrcweir { 174*cdf0e10cSrcweir if ( maEdSubject.GetText() != aEmptyStr ) 175*cdf0e10cSrcweir { 176*cdf0e10cSrcweir String aQuery = UniString::CreateFromAscii( RTL_CONSTASCII_STRINGPARAM( "subject=" ) ); 177*cdf0e10cSrcweir aQuery.Append( maEdSubject.GetText() ); 178*cdf0e10cSrcweir aURL.SetParam(aQuery); 179*cdf0e10cSrcweir } 180*cdf0e10cSrcweir } 181*cdf0e10cSrcweir 182*cdf0e10cSrcweir if ( aURL.GetProtocol() != INET_PROT_NOT_VALID ) 183*cdf0e10cSrcweir return aURL.GetMainURL( INetURLObject::DECODE_WITH_CHARSET ); 184*cdf0e10cSrcweir else //#105788# always create a URL even if it is not valid 185*cdf0e10cSrcweir return aStrURL; 186*cdf0e10cSrcweir } 187*cdf0e10cSrcweir 188*cdf0e10cSrcweir /************************************************************************* 189*cdf0e10cSrcweir |* 190*cdf0e10cSrcweir |* static method to create Tabpage 191*cdf0e10cSrcweir |* 192*cdf0e10cSrcweir |************************************************************************/ 193*cdf0e10cSrcweir 194*cdf0e10cSrcweir IconChoicePage* SvxHyperlinkMailTp::Create( Window* pWindow, const SfxItemSet& rItemSet ) 195*cdf0e10cSrcweir { 196*cdf0e10cSrcweir return( new SvxHyperlinkMailTp( pWindow, rItemSet ) ); 197*cdf0e10cSrcweir } 198*cdf0e10cSrcweir 199*cdf0e10cSrcweir /************************************************************************* 200*cdf0e10cSrcweir |* 201*cdf0e10cSrcweir |* Set initial focus 202*cdf0e10cSrcweir |* 203*cdf0e10cSrcweir |************************************************************************/ 204*cdf0e10cSrcweir 205*cdf0e10cSrcweir void SvxHyperlinkMailTp::SetInitFocus() 206*cdf0e10cSrcweir { 207*cdf0e10cSrcweir maCbbReceiver.GrabFocus(); 208*cdf0e10cSrcweir } 209*cdf0e10cSrcweir 210*cdf0e10cSrcweir /************************************************************************* 211*cdf0e10cSrcweir |************************************************************************/ 212*cdf0e10cSrcweir 213*cdf0e10cSrcweir void SvxHyperlinkMailTp::SetScheme( const String& aScheme ) 214*cdf0e10cSrcweir { 215*cdf0e10cSrcweir //if aScheme is empty or unknown the default beaviour is like it where MAIL 216*cdf0e10cSrcweir const sal_Char sNewsScheme[] = INET_NEWS_SCHEME; 217*cdf0e10cSrcweir 218*cdf0e10cSrcweir sal_Bool bMail = aScheme.SearchAscii( sNewsScheme ) != 0; 219*cdf0e10cSrcweir 220*cdf0e10cSrcweir //update protocol button selection: 221*cdf0e10cSrcweir maRbtMail.Check(bMail); 222*cdf0e10cSrcweir maRbtNews.Check(!bMail); 223*cdf0e10cSrcweir 224*cdf0e10cSrcweir //update target: 225*cdf0e10cSrcweir RemoveImproperProtocol(aScheme); 226*cdf0e10cSrcweir maCbbReceiver.SetSmartProtocol( GetSmartProtocolFromButtons() ); 227*cdf0e10cSrcweir 228*cdf0e10cSrcweir //show/hide special fields for MAIL: 229*cdf0e10cSrcweir maFtSubject.Enable(bMail); 230*cdf0e10cSrcweir maEdSubject.Enable(bMail); 231*cdf0e10cSrcweir } 232*cdf0e10cSrcweir 233*cdf0e10cSrcweir /************************************************************************* 234*cdf0e10cSrcweir |* 235*cdf0e10cSrcweir |* Remove protocol if it does not fit to the current button selection 236*cdf0e10cSrcweir |* 237*cdf0e10cSrcweir |************************************************************************/ 238*cdf0e10cSrcweir 239*cdf0e10cSrcweir void SvxHyperlinkMailTp::RemoveImproperProtocol(const String& aProperScheme) 240*cdf0e10cSrcweir { 241*cdf0e10cSrcweir String aStrURL ( maCbbReceiver.GetText() ); 242*cdf0e10cSrcweir if ( aStrURL != aEmptyStr ) 243*cdf0e10cSrcweir { 244*cdf0e10cSrcweir String aStrScheme = GetSchemeFromURL( aStrURL ); 245*cdf0e10cSrcweir if ( aStrScheme != aEmptyStr && aStrScheme != aProperScheme ) 246*cdf0e10cSrcweir { 247*cdf0e10cSrcweir aStrURL.Erase ( 0, aStrScheme.Len() ); 248*cdf0e10cSrcweir maCbbReceiver.SetText ( aStrURL ); 249*cdf0e10cSrcweir } 250*cdf0e10cSrcweir } 251*cdf0e10cSrcweir } 252*cdf0e10cSrcweir 253*cdf0e10cSrcweir String SvxHyperlinkMailTp::GetSchemeFromButtons() const 254*cdf0e10cSrcweir { 255*cdf0e10cSrcweir if( maRbtNews.IsChecked() ) 256*cdf0e10cSrcweir { 257*cdf0e10cSrcweir return String::CreateFromAscii( INET_NEWS_SCHEME ); 258*cdf0e10cSrcweir } 259*cdf0e10cSrcweir return String::CreateFromAscii( INET_MAILTO_SCHEME ); 260*cdf0e10cSrcweir } 261*cdf0e10cSrcweir 262*cdf0e10cSrcweir INetProtocol SvxHyperlinkMailTp::GetSmartProtocolFromButtons() const 263*cdf0e10cSrcweir { 264*cdf0e10cSrcweir if( maRbtNews.IsChecked() ) 265*cdf0e10cSrcweir { 266*cdf0e10cSrcweir return INET_PROT_NEWS; 267*cdf0e10cSrcweir } 268*cdf0e10cSrcweir return INET_PROT_MAILTO; 269*cdf0e10cSrcweir } 270*cdf0e10cSrcweir 271*cdf0e10cSrcweir /************************************************************************* 272*cdf0e10cSrcweir |* 273*cdf0e10cSrcweir |* Click on radiobutton : Type EMail 274*cdf0e10cSrcweir |* 275*cdf0e10cSrcweir |************************************************************************/ 276*cdf0e10cSrcweir 277*cdf0e10cSrcweir IMPL_LINK ( SvxHyperlinkMailTp, Click_SmartProtocol_Impl, void *, EMPTYARG ) 278*cdf0e10cSrcweir { 279*cdf0e10cSrcweir String aScheme = GetSchemeFromButtons(); 280*cdf0e10cSrcweir SetScheme( aScheme ); 281*cdf0e10cSrcweir return( 0L ); 282*cdf0e10cSrcweir } 283*cdf0e10cSrcweir 284*cdf0e10cSrcweir /************************************************************************* 285*cdf0e10cSrcweir |* 286*cdf0e10cSrcweir |* Contens of editfield "receiver" modified 287*cdf0e10cSrcweir |* 288*cdf0e10cSrcweir |************************************************************************/ 289*cdf0e10cSrcweir 290*cdf0e10cSrcweir IMPL_LINK ( SvxHyperlinkMailTp, ModifiedReceiverHdl_Impl, void *, EMPTYARG ) 291*cdf0e10cSrcweir { 292*cdf0e10cSrcweir String aScheme = GetSchemeFromURL( maCbbReceiver.GetText() ); 293*cdf0e10cSrcweir if(aScheme.Len()!=0) 294*cdf0e10cSrcweir SetScheme( aScheme ); 295*cdf0e10cSrcweir 296*cdf0e10cSrcweir return( 0L ); 297*cdf0e10cSrcweir } 298*cdf0e10cSrcweir 299*cdf0e10cSrcweir /************************************************************************* 300*cdf0e10cSrcweir |* 301*cdf0e10cSrcweir |* Click on imagebutton : addressbook 302*cdf0e10cSrcweir |* 303*cdf0e10cSrcweir |************************************************************************/ 304*cdf0e10cSrcweir 305*cdf0e10cSrcweir IMPL_LINK ( SvxHyperlinkMailTp, ClickAdrBookHdl_Impl, void *, EMPTYARG ) 306*cdf0e10cSrcweir { 307*cdf0e10cSrcweir SfxViewFrame* pViewFrame = SfxViewFrame::Current(); 308*cdf0e10cSrcweir if( pViewFrame ) 309*cdf0e10cSrcweir { 310*cdf0e10cSrcweir SfxItemPool &rPool = pViewFrame->GetPool(); 311*cdf0e10cSrcweir SfxRequest aReq(SID_VIEW_DATA_SOURCE_BROWSER, 0, rPool); 312*cdf0e10cSrcweir pViewFrame->ExecuteSlot( aReq, sal_True ); 313*cdf0e10cSrcweir } 314*cdf0e10cSrcweir 315*cdf0e10cSrcweir 316*cdf0e10cSrcweir /* uno::Reference< frame::XDispatchProvider > xProv( pViewFrame->GetFrame().GetFrameInterface(), uno::UNO_QUERY ); 317*cdf0e10cSrcweir if ( xProv.is() ) 318*cdf0e10cSrcweir { 319*cdf0e10cSrcweir !!! (pb) we need a new config item here 320*cdf0e10cSrcweir SfxAppIniManagerProperty aProp; 321*cdf0e10cSrcweir GetpApp()->Property( aProp ); 322*cdf0e10cSrcweir if( !aProp.GetIniManager() ) 323*cdf0e10cSrcweir return ( 0L ); 324*cdf0e10cSrcweir 325*cdf0e10cSrcweir String aAddressBook = aProp.GetIniManager()->Get( SFX_KEY_ADDRESSBOOK ); 326*cdf0e10cSrcweir INetURLObject aObj; 327*cdf0e10cSrcweir aObj.SetSmartProtocol( INET_PROT_FILE ); 328*cdf0e10cSrcweir aObj.SetURL( aAddressBook.GetToken( 0, sal_Unicode( ';' ) ) ); 329*cdf0e10cSrcweir 330*cdf0e10cSrcweir String aMark( RTL_CONSTASCII_USTRINGPARAM( "db:Table;" ) ); 331*cdf0e10cSrcweir aMark += aAddressBook.GetToken( 1, sal_Unicode( ';' ) ); 332*cdf0e10cSrcweir aObj.SetMark( aMark ); 333*cdf0e10cSrcweir 334*cdf0e10cSrcweir util::URL aURL; 335*cdf0e10cSrcweir aURL.Complete = ::rtl::OUString( aObj.GetMainURL( INetURLObject::NO_DECODE ) ); 336*cdf0e10cSrcweir 337*cdf0e10cSrcweir uno::Reference< lang::XMultiServiceFactory > xFactory( ::comphelper::getProcessServiceFactory() ); 338*cdf0e10cSrcweir if( xFactory.is() ) 339*cdf0e10cSrcweir { 340*cdf0e10cSrcweir uno::Reference< util::XURLTransformer > xTrans( xFactory->createInstance 341*cdf0e10cSrcweir ( OUString::createFromAscii( "com.sun.star.util.URLTransformer" ) ), 342*cdf0e10cSrcweir uno::UNO_QUERY); 343*cdf0e10cSrcweir xTrans->parseStrict( aURL ); 344*cdf0e10cSrcweir 345*cdf0e10cSrcweir uno::Reference< frame::XDispatch > aDisp = xProv->queryDispatch( aURL, 346*cdf0e10cSrcweir OUString::createFromAscii( "_beamer" ), 347*cdf0e10cSrcweir frame::FrameSearchFlag::GLOBAL | 348*cdf0e10cSrcweir frame::FrameSearchFlag::CREATE ); 349*cdf0e10cSrcweir if ( aDisp.is() ) 350*cdf0e10cSrcweir { 351*cdf0e10cSrcweir uno::Sequence< beans::PropertyValue > aArgs(1); 352*cdf0e10cSrcweir beans::PropertyValue* pArg = aArgs.getArray(); 353*cdf0e10cSrcweir pArg[0].Name = DEFINE_CONST_UNICODE("Referer"); 354*cdf0e10cSrcweir pArg[0].Value = uno::makeAny( OUString( DEFINE_CONST_UNICODE("private:user") ) ); 355*cdf0e10cSrcweir aDisp->dispatch( aURL, aArgs ); 356*cdf0e10cSrcweir } 357*cdf0e10cSrcweir } 358*cdf0e10cSrcweir } 359*cdf0e10cSrcweir */ 360*cdf0e10cSrcweir 361*cdf0e10cSrcweir return( 0L ); 362*cdf0e10cSrcweir } 363*cdf0e10cSrcweir 364*cdf0e10cSrcweir 365