Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / проверка на существование поля в коллекции recordset.fields ? / 3 сообщений из 3, страница 1 из 1
27.05.2005, 13:41:31
    #33087469
tao777
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проверка на существование поля в коллекции recordset.fields ?
есть у меня такой код
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
Set conn = Server.CreateObject("ADODB.Connection")
conn.ConnectionString = Application("strConn")
conn.Open
		
Set cmd = Server.CreateObject("ADODB.Command")
Set cmd.ActiveConnection = conn

  	cmd.CommandText = "some_stored_proc"
    	cmd.CommandType = adCmdStoredProc
    	cmd.Parameters.Append cmd.CreateParameter("code", adVarChar, adParamInput, 15  , code)
        
		Set rs = Server.CreateObject("ADODB.Recordset")
		Set rs = cmd.Execute
response.write  rs.fields("no_field")
как можно проверить - содержит ли коллекция fields поле "no_field" ?
...
Рейтинг: 0 / 0
27.05.2005, 14:24:19
    #33087615
Konst_One
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проверка на существование поля в коллекции recordset.fields ?
обработать ошибку при обращении по данному полю
...
Рейтинг: 0 / 0
27.05.2005, 16:05:01
    #33087953
Melkiades
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проверка на существование поля в коллекции recordset.fields ?
Код: plaintext
1.
2.
3.
4.
5.
6.
Public Function ADO_ColExists(rs As ADODB.Recordset, colName As String) As Boolean
    Dim col As ADODB.Field
    On Error GoTo errh:
    Set col = rs.Fields(colName)
    ADO_ColExists = True
errh:
End Function
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / проверка на существование поля в коллекции recordset.fields ? / 3 сообщений из 3, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]