Visual Basic, .NET, ASP, VBScript
Новости | Примеры | Библиотека кодов | НеЧаВо | VBA | Справочник по VB | Справочник по WinAPI | ActiveX контролы | Статьи по VB | Мастерская разработчика | Форум VBNet | Яndex bar! | Голосование | Полезные программы | Магазин VBNet | Рассылка | Конкурсы | Юмор | Чат | Реклама на VBNet | Автора! | Ссылки | Бета-тестирование | Послать пример на сайт
 

   
   
     

Форум - .NET

Страница: 1 |

 

  Вопрос: База Access и VB .NET Добавлено: 08.06.03 14:48  

Автор вопроса:  shuffle | ICQ: 201502381 

В моей проге надо загружать БД в ListBox. В VB6 это было просто - с помощью контрола Data можно загрузить БД в DataList, а в VB .NET ни одного из этих контролов я не нашел Помогите кто чем сможет  (конечно, желательно исходник).

Да, помогите еще найти какую-нибудь статейку по использованию ZLIB.DLL


Спасибо

Ответить

  Ответы Всего ответов: 6  

Номер ответа: 1
Автор ответа:
 shuffle



Администратор

ICQ: 201502381 

Вопросов: 15
Ответов: 737
  Профиль | | #1 Добавлено: 09.06.03 21:14
Люди, неужели БД ни кто в VB .NET не юзал? ОЧЕНЬ НАДО !!!

Ответить

Номер ответа: 2
Автор ответа:
  Creator



Вопросов: 11
Ответов: 61
  Профиль | | #2 Добавлено: 10.06.03 05:48

 Конкретизируй, что не получается:

  • Коннект
  • Запрос
  • Или заполнение компоненты

А то както не понятно, что хочешь?

Пиши на мыло помогу .......

Ответить

Номер ответа: 3
Автор ответа:
 shuffle



Администратор

ICQ: 201502381 

Вопросов: 15
Ответов: 737
  Профиль | | #3 Добавлено: 10.06.03 19:40
В моей БД существует одна таблица поделенная на столбца и мне надо просто загрузить все надписи в ListBox из первого столбца.

Ответить

Номер ответа: 4
Автор ответа:
  Creator



Вопросов: 11
Ответов: 61
  Профиль | | #4 Добавлено: 11.06.03 05:15

 Допустим ты юзаешь ADO+, тогда примерно так:
 ' Коннект
 ;Dim ocnn As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=<путь до базы>")
 ' Запрос
        Dim ocmd As New OleDbCommand(<Запрос>, ocnn)
 ' Результат - типа RecordSet - а в старой ADO
        Dim odr As OleDbDataReader
 ' Тип
        ocmd.CommandType = CommandType.Text
 ' Открываем коннект
        ocnn.Open()
 ' Выполняем запрос
        Try
            odr = ocmd.ExecuteReader(CommandBehavior.CloseConnection)
        Catch exp As Exception
            MsgBox(exp.ToString, MsgBoxStyle.Critical, exp.Source)
        End Try

Ну а дальше юзай odr как хочеш .......

Возможны ошибки......писал не в IDE ...возможны ошибки, поправь если что ......

Ответить

Номер ответа: 5
Автор ответа:
  Creator



Вопросов: 11
Ответов: 61
  Профиль | | #5 Добавлено: 11.06.03 05:15

 Допустим ты юзаешь ADO+, тогда примерно так:
 ' Коннект
 ;Dim ocnn As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=<путь до базы>")
 ' Запрос
        Dim ocmd As New OleDbCommand(<Запрос>, ocnn)
 ' Результат - типа RecordSet - а в старой ADO
        Dim odr As OleDbDataReader
 ' Тип
        ocmd.CommandType = CommandType.Text
 ' Открываем коннект
        ocnn.Open()
 ' Выполняем запрос
        Try
            odr = ocmd.ExecuteReader(CommandBehavior.CloseConnection)
        Catch exp As Exception
            MsgBox(exp.ToString, MsgBoxStyle.Critical, exp.Source)
        End Try

Ну а дальше юзай odr как хочеш .......

Возможны ошибки......писал не в IDE ...возможны ошибки, поправь если что ......

Ответить

Номер ответа: 6
Автор ответа:
 shuffle



Администратор

ICQ: 201502381 

Вопросов: 15
Ответов: 737
  Профиль | | #6 Добавлено: 11.06.03 20:52

Вот я подправил этот код:

' Коннект

Dim ocnn As New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Test.mdb")

' Запрос

Dim ocmd As New OleDb.OleDbCommand("RequestTest", ocnn)

' Результат - типа RecordSet - а в старой ADO

Dim odr As OleDb.OleDbDataReader

' Тип

ocmd.CommandType = CommandType.Text

' Открываем коннект

ocnn.Open()

' Выполняем запрос

Try

odr = ocmd.ExecuteReader(CommandBehavior.CloseConnection)

Catch exp As Exception

MsgBox(exp.ToString, MsgBoxStyle.Critical, exp.Source)

End Try

Но в строке odr = ocmd.ExecuteReader(CommandBehavior.CloseConnection) происходит вот такая ошибка:

System.Data.OleDb.OleDbException: Ошибочная инструкция SQL; предполагалось 'DELETE', 'INSERT', 'PROCEDURE', 'SELECT' или 'UPDATE'.

at System.Data.OleDb.OleDbCommand.ExecuteCommandTextErrorHandling(Int32 hr)

at System.Data.OleDb.OleDbCommand.ExecuteCommandTextForSingleResult(tagDBPARAMS dbParams, Object& executeResult)

at System.Data.OleDb.OleDbCommand.ExecuteCommandText(Object& executeResult)

at System.Data.OleDb.OleDbCommand.ExecuteCommand(CommandBehavior behavior, Object& executeResult)

at System.Data.OleDb.OleDbCommand.ExecuteReaderInternal(CommandBehavior behavior, String method)

at System.Data.OleDb.OleDbCommand.ExecuteReader(CommandBehavior behavior)

А как это исправить, неподскажешь?

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам