Здравствуйте! Есть такая проблемка:
Есть функция, но при обращении к ней этой процедуры:
=============================================================
Private Sub fill_customers()
'Формирование условий запроса
Dim sql_where As String
sql_where = "where черновик=0"
If Me.man_id.Text <> "Старший менеджер" And Me.man_id.Text <>
"Генеральный директор" And Me.man_id.Text <> "Коммерческий директор"
Then
Me.owner_check.Checked = True
Me.owner_check.Enabled = False
End If
If Me.owner_check.Checked = True Then
sql_where += " and менеджер='" + Me.man_id.Text + "'"
End If
'Формирование запроса к БД
dc = Me.OleDbConnection1
da = Me.OledbAdapter1
ds = Me.DataSet11
sql = "select заказчик from customers " + sql_where
Dim dt As DataTable = _select(sql, dc, da, ds)
Dim f As Integer
'customer_d - это combobox, в который должны добавлятся заказчики из
БД согласно формируемому запросу
Me.customer_d.Items.Clear()
For f = 0 To dt.Rows.Count - 1
Me.customer_d.Items.Add(dt.Rows(f).Item("заказчик").ToString)
Next
End Sub
===================================
возникает ошибка (NullReference Exception) - в экземпляре объекта не
задана ссылка на объект, причем ругается именно на oledbadapter
(который под именем my_adapter)
===================================
Private Function _select(ByVal sql As String, ByVal dc As
OleDb.OleDbConnection, ByVal da As OleDb.OleDbDataAdapter, ByVal ds As
Data.DataSet) As DataTable
ds.Clear()
ds.Reset()
'conn - процедура подключения к базе данных (там прописаны Connection
string и прочие параметры))
If (conn(dc)) Then
da.SelectCommand.CommandText = sql ||| <----Ошибка
здесь
da.Fill(ds)
Return ds.Tables(0)
End If
Return Nothing
End Function
===================================
В чем здесь проблема, ведь адаптер я передал функции в параметре da...
Заранее спасибо!
--~--~---------~--~----~------------~-------~--~----~
You received this message because you are subscribed to the Google Groups "Dot
Net Discussions" group.
To post to this group, send email to [email protected]
To unsubscribe from this group, send email to [EMAIL PROTECTED]
For more options, visit this group at
http://groups.google.com/group/Dot-Net-Discussions
-~----------~----~----~----~------~----~------~--~---
