diff options
Diffstat (limited to 'connectivity/source/drivers/dbase/DDatabaseMetaData.cxx')
-rw-r--r-- | connectivity/source/drivers/dbase/DDatabaseMetaData.cxx | 14 |
1 files changed, 11 insertions, 3 deletions
diff --git a/connectivity/source/drivers/dbase/DDatabaseMetaData.cxx b/connectivity/source/drivers/dbase/DDatabaseMetaData.cxx index 4872edf9f6c2..53fe6065630c 100644 --- a/connectivity/source/drivers/dbase/DDatabaseMetaData.cxx +++ b/connectivity/source/drivers/dbase/DDatabaseMetaData.cxx @@ -2,9 +2,9 @@ * * $RCSfile: DDatabaseMetaData.cxx,v $ * - * $Revision: 1.25 $ + * $Revision: 1.26 $ * - * last change: $Author: oj $ $Date: 2001-08-29 12:19:31 $ + * last change: $Author: oj $ $Date: 2001-09-18 13:14:31 $ * * The Contents of this file are made available subject to the terms of * either of the following licenses @@ -105,6 +105,9 @@ #ifndef _COMPHELPER_TYPES_HXX_ #include <comphelper/types.hxx> #endif +#ifndef _UCBHELPER_CONTENT_HXX +#include <ucbhelper/content.hxx> +#endif using namespace ::comphelper; using namespace connectivity::dbase; @@ -509,7 +512,12 @@ sal_Bool SAL_CALL ODbaseDatabaseMetaData::isReadOnly( ) throw(SQLException, Run { ::osl::MutexGuard aGuard( m_aMutex ); - return sal_False; + sal_Bool bReadOnly = sal_False; + static ::rtl::OUString sReadOnly = ::rtl::OUString::createFromAscii("IsReadOnly"); + ::ucb::Content aFile(m_pConnection->getContent(),::com::sun::star::uno::Reference< com::sun::star::ucb::XCommandEnvironment >()); + aFile.getPropertyValue(sReadOnly) >>= bReadOnly; + + return bReadOnly; } // ----------------------------------------------------------------------------- |