VBNet - Форум - Выборку "SELECT..." поместить в TextBox

Вопрос: Выборку "SELECT..." поместить в TextBox Добавлено: 22.08.08 01:28

Автор вопроса: An

ADODB
Сконнектился с базой.

Сделал выборку:
comm.ActiveConnection = db
comm.CommandText = "Select DATA_F From CPLAT.DBF Where KOD_DN = 795"
comm.Execute()

Можно ли и как результат вывести в TextBox1.Text ?
Ответить

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

Номер ответа: 1 Автор ответа: Arseny ICQ: 298826769 Вопросов: 53 Ответов: 1732	Профиль \| \| #1	Добавлено: 22.08.08 10:52
	textbox.text=comm.recordset!имя_поля Ответить

Номер ответа: 2 Автор ответа: An Вопросов: 4 Ответов: 11	Профиль \| \| #2	Добавлено: 23.08.08 00:35
	Что-то не то или у меня или в comm.recordset! Ответить

Номер ответа: 3 Автор ответа: An Вопросов: 4 Ответов: 11	Профиль \| \| #3	Добавлено: 25.08.08 23:22
	Спасибо за наводку. Вроде работает... Может,кто какие замечания ...- рассмотрим Новичок всё-же... Dim myConnect As New ADODB.Connection Dim myRecordset As New ADODB.Recordset Dim sql_448 As String = "Select DATA_F From CPLAT.DBF Where KOD_DN = 448" myConnect.CursorLocation = CursorLocationEnum.adUseClient myConnect.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" + _ "ata Source=D:\SKSDATA\GOS\DBPLAT;" + "Extended Properties=""dBase III;"";""" myConnect.Open() myRecordset = myConnect.Execute(sql_448) TextBox2.Text = myRecordset.Fields("ATA_F".Value ... и тд. Ответить

Номер ответа: 4 Автор ответа: HACKER Разработчик Offline Client Вопросов: 236 Ответов: 8362	Профиль \| \| #4	Добавлено: 26.08.08 03:04
	Ну если работает - ничего не меняй! Ответить

Номер ответа: 5 Автор ответа: VerhoLom Вопросов: 20 Ответов: 285	Профиль \| \| #5	Добавлено: 07.09.08 16:02
	У Рекордсета есть метод GetStringБ который вернет такую строку, какую захочешь... Ответить

Страница: 1 |