Этот баннер — требование Роскомнадзора для исполнения 152 ФЗ.
«На сайте осуществляется обработка файлов cookie, необходимых для работы сайта, а также для анализа использования сайта и улучшения предоставляемых сервисов с использованием метрической программы Яндекс.Метрика. Продолжая использовать сайт, вы даёте согласие с использованием данных технологий».
Политика конфиденциальности
|
|
|
ADODB.Connection
|
|||
|---|---|---|---|
|
#18+
Извеняюсь, если вопрос непотеме... Имею в ASP такое дело: Set cn = Server.CreateObject("ADODB.Connection") Set rs = Server.CreateObject("ADODB.Recordset") cn.Open dConnection rs.ActiveConnection = cn rs.Open "select * from My_Table", , , , adCmdText дальше хотел бы организовать вывод всех записей.... Вопрос: Как мне можно узнать количество СТОЛБЦОВ в таблице и как получить к ним доступ не по имени а по порядковому номеру... что бы небыть привязаным к количеству столбцов и их именам? Заранее спасибо за совет. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 16.05.2001, 12:22 |
|
||
|
ADODB.Connection
|
|||
|---|---|---|---|
|
#18+
Рекомендую использовать метод: MyVarVariable = rs.GetRows Возвращает весь рекордсет в виде массива. Работает в 3-5 раз быстрее обычного цикла по записям/полям. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 16.05.2001, 12:26 |
|
||
|
ADODB.Connection
|
|||
|---|---|---|---|
|
#18+
Что-то типа следующего: str="" For i=1 to rs.Fields.Count str = str & rs.Fields(i).Name & " " Next Responce.Write str & "<br>" Do While NOT rs.EOF str="" For i=1 to rs.Fields.Count str = str & rs(i) & " " Next Responce.Write str & "<br>" rs.MoveNext Loop ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 16.05.2001, 12:51 |
|
||
|
ADODB.Connection
|
|||
|---|---|---|---|
|
#18+
Это скрипт для выводы таблицы, может пригодиться. <%@SCRIPT LANGUAGE="VBSCRIPT"%> <% name=Request.QueryString("name") Response.Expires=0 %> <html> <head> <title> <%=name%> </title> <!--#include file="conn.inc"--> <% set rs=con.Execute("select top 200 * from "+name) %> <BODY TEXT="#000000" BGCOLOR="#F0F0F0" BACKGROUND="gray.jpg"> <H2 ><FONT COLOR="#0000FF"> <%=name%> </FONT></H2> <table border=1 cellpadding=2 cellspacing=0 BGCOLOR="#D0D0D0"> <tr> <% for i=1 to rs.Fields.Count %> <th> <%=rs.Fields(i-1).Name%> </th> <%next%> </tr> <% while not RS.eof %> <tr> <% for k=1 to rs.Fields.Count itm=Trim(rs(rs.Fields(k-1).Name)) if itm<>"" then sss=itm else sss=" " %> <td> <%=sss%> </td> <%next%> </tr> <% RS.MoveNext wEnd con.close %> </table> </BODY> </HTML> ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 16.05.2001, 14:20 |
|
||
|
|
start [/forum/topic.php?fid=46&msg=32005722&tid=1826775]: |
0ms |
get settings: |
6ms |
get forum list: |
20ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
30ms |
get topic data: |
11ms |
get forum data: |
3ms |
get page messages: |
59ms |
get tp. blocked users: |
1ms |
| others: | 229ms |
| total: | 365ms |
| 0 / 0 |
