Форумы HiProg.com - MS ACCESS, VBA, VB

 

Ответить на сообщение

Вернуться к теме

Вы отвечаете на сообщение:

ник: FORMAT
Час, не вводи человека в заблуждение. Он про WinForms VisualStudio у тебю спрашивает, а ты ему про VB6

2: Едрёныч

Привязаться к данным в WinForms проще, чем 2 пальца об асфальт.

Например можно так.


Imports System.Drawing
Imports System.Data.SqlClient.SqlConnectionStringBuilder
Imports System.Data.SqlClient
Imports System.Windows.Forms.Form
Imports System.Data
Imports System.Data.DataSet
Imports System.Windows.Forms.Cursor

..............................................................................

Private Sub Form7_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim strSQL1 As String
        Dim conn1 As New SqlConnectionStringBuilder()
        conn1.DataSource = "I-SERVER-TWO"
        conn1.InitialCatalog = "MogJilDom"
        conn1.IntegratedSecurity = True

        Using cn1 As New SqlConnection(conn1.ConnectionString)
            cn1.Open()
            strSQL1 = " SELECT * FROM TblDol "
            Dim da2 As New SqlDataAdapter(strSQL1, cn1)
            Dim ds2 As New DataSet()
            da2.Fill(ds2, "TblDol")

            With ds2
                Me.ComboBox1.DataSource = .Tables("TblDol")
                Me.ComboBox1.DisplayMember = "NaimDol"
                Me.ComboBox1.ValueMember = "IdDol"
           End With
        
End Using
    End Sub



По поводу литературы - хорошо описана работа с базами данных у Дэвидв Сеппы "Программирвание на Microsoft ADO.NET 2.0"

ЗЫ
Етот пример хоть и рабочий, но не совсем правильно так делать.
Вааще-то правильней подключение прописывать в отдельных классах.


Ваше имя:

Пароль:

Цитировать: [quote][/quote] Код: [code][/code]
Жирный: [b][/b] Наклонный: [i][/i]
URL: [url][/url] 

Сообщение:

 Размер файла не более 50 Кбт. Большие файлы можно размещать на www.slil.ru

Прикрепить:

 

Для вставки смайлов в текст щелкните по значку.