Этот баннер — требование Роскомнадзора для исполнения 152 ФЗ.
«На сайте осуществляется обработка файлов cookie, необходимых для работы сайта, а также для анализа использования сайта и улучшения предоставляемых сервисов с использованием метрической программы Яндекс.Метрика. Продолжая использовать сайт, вы даёте согласие с использованием данных технологий».
Политика конфиденциальности
|
|
|
Количество записей
|
|||
|---|---|---|---|
|
#18+
У меня такой вопрос. Чтобы увидеть количество записей в одном поле в SQL SERVER 2000 можно писать запрос select count (поле). SQL SERVER показывает сколько записей в одном поле. Но в Visual Basic 6.0 если пишишь этот запрос выдает сообщение об ошибке. Так как количество записей не отображается ни в одном поле база данных. Как высвечивать количество записей в Visual Basic 6.0 используя этот запрос. У меня код такой Private Sub Command1_Click() Dim db As Connection Set db = New Connection db.CursorLocation = adUseClient db.Open "PROVIDER=MSDASQL;dsn=tr;uid=;pwd=;" Set ado = New Recordset Dim sql As String sql = "select count (*) from dbo.tr where Pol= '" & Text1.Text & "' and Ia='" & text2.Text & "'" ado.Open sql, db, adOpenStatic, adLockOptimistic Set text3.DataSource = ado text3.DataField = "что можно писать сюда" Заранее благодарю. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 31.05.2004, 10:56 |
|
||
|
Количество записей
|
|||
|---|---|---|---|
|
#18+
sql = "select count (*) as xxx from dbo.tr where Pol= '" & Text1.Text & "' and Ia='" & text2.Text & "'" ado.Open sql, db, adOpenStatic, adLockOptimistic Set text3.DataSource = ado text3.DataField = "xxx" ? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 31.05.2004, 11:06 |
|
||
|
Количество записей
|
|||
|---|---|---|---|
|
#18+
Если я правильно понял то : кол-во записей показывает св-во RecordCount, т.е. ado.RecordCount. db.CursorLocation - это нонсенс, так как у Вас идет определение Set db = New Connection, а CursorLocation - это св-во курсора. По умолчанию курсор идет в режиме adOpenForwardOnly. Так что ставьте сл. параметры для курсора CursorType = adOpenDynamic CursorLocation = adUseClient LockType = adLockOptimistic и тогда в ado.recordcount и даст вам кол-во записей. Подробней написать не могу так как никогда не работал с DataSource и DataField. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 31.05.2004, 11:10 |
|
||
|
Количество записей
|
|||
|---|---|---|---|
|
#18+
Спасибо за совет все получается. sql = "select count (*) as xxx from dbo.tr where Pol= '" & Text1.Text & "' and Ia='" & text2.Text & "'" ado.Open sql, db, adOpenStatic, adLockOptimistic Set text3.DataSource = ado text3.DataField = "xxx" Этот запрос работает нормально Всем спасибо за советы. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 31.05.2004, 11:36 |
|
||
|
|

start [/forum/topic.php?fid=60&tid=2169469]: |
0ms |
get settings: |
7ms |
get forum list: |
15ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
34ms |
get topic data: |
11ms |
get forum data: |
3ms |
get page messages: |
48ms |
get tp. blocked users: |
2ms |
| others: | 213ms |
| total: | 339ms |

| 0 / 0 |
