Форум вопросов и ответов

Форум вопросов и ответов (https://www.otvetnemail.ru/)
-   Продолжение старого архива (https://www.otvetnemail.ru/prodolzhenie-starogo-arhiva-804/)
-   -   Доступ к БД из кода BASIC (https://www.otvetnemail.ru/prodolzhenie-starogo-arhiva-804/dostup-k-bd-iz-koda-basic-363947/)

Guest 01.10.2011 02:43

Доступ к БД из кода BASIC
 
Здравствуйте!Приведу фрагмент кода, который я выдрал из хелпов с незначительными изменениями и который работает:Dim DatabaseContext As ObjectDatabaseContext = createUnoService("com.sun.star.sdb.Datab aseContext")Dim DataSource As ObjectDataSource = DatabaseContext.getByName("HeartUSI")Dim Connection As ObjectConnection = DataSource.GetConnection("","")Statement = Connection.createStatement()ResultSet = Statement.executeQuery("SELECT ""PatientID"" FROM ""qryReg"" WHERE ""FIO""='"+sSelected+"'")If Not IsNull(ResultSet) Then While ResultSet.next MsgBox ResultSet.getString(1) WendEnd IfМетодом научного тыка в строку DatabaseContext.getByName("HeartUSI") в качестве аргумента я вписал имя файла базы данных без расширения и код стал работать ожидаемым образом. На будущее хотел бы знать, прав ли я в том, что в этой строке функции DatabaseContext.getByName() надо передавать имя файла базы данных? Или там какое другое значение в моем случае просто совпавшее с именем файла базы данных?


Часовой пояс GMT, время: 11:38.


© www.otvetnemail.ru - Форум вопросов и ответов.