Пытаюсь разобраться с rs.GetString. Нужна помощь.

@scorpion_35 · Регистрация: 09.07.2008

Author24 — интернет-сервис помощи студентам

При формировании таблицы я отказался от цикла и пытаюсь приспособить для этого GetString.
Что то вроде этого:
<%
sql = 'Select * From notes_tb';

rs.Open(sql, conn);
var prt = '<table border = '1'><tr><td>'
prt+=rs.GetString(2, 4, '</td><td>','</td></tr><td>',' ');
prt+= '</table>';
%>

<%=prt%>
<td> при формировании последней строки получается лишним. Есть ли решение лучшее чем замена последнего <td> на '</table>' с помощью replace.

10.07.2008, 16:39

А чем собственно тебе replace не нравится?

@debutant · 10.07.2008, 17:00

Тут нужна небольшая игра с выходной строкой. Сам парился в отладчике :-)

Код

var prt = '<table border = '1'>
ptr=rs.getstring(,,'</TD><TD>','</TD></TR><TR><TD>','Null')
ptr='<TR><TD>' & Left$(ptr,len(ptr)-8)
ptr=ptr & </table>

Не спорю, что есть решения намного лучше

@scorpion_35 · 11.07.2008, 01:56 **[ТС]**

To Rider:
Я бы не хотел сейчас дискутировать о своих пристрастиях или неприязни к replace.

To debutant:
Спасибо за помощь. Сейчас проверю твой код, с виду очень даже похоже.
Еще раз спасибо.

11.07.2008, 04:52

Код

response.write '<table border='1'><tr>'
'-------------------------------------
for each sTitle in rs.fields
   response.write '<td><b>' & sTitle.name & '</b></td>'
next
'-------------------------------------
response.write '</tr><tr><td>'
response.write rs.getstring(,, '</td><td>', '</td></tr><tr><td>', '-null-')
response.write '</td></tr></table>'

@scorpion_35 · 12.07.2008, 12:25 **[ТС]**

Вариант с replace - может комуто пригодиться.

Код

sql = 'Select * From department_tb';
rs.Open(sql, conn);

var prt = '<TABLE bgcolor='#0000FF' cellspacing='0' cellpadding='0' border='1'><TR><TD>'
prt+=rs.getstring(2,10,'</TD><TD>','</TD></TR><TR><TD>',' ');
prt+='</SHIT>';
prt = prt.replace('<TR><TD></SHIT>', '</TABLE>');

Для упрощения поиска подстроки вводим зарезервированное слово </SHIT>.
Успехов

25.12.2008, 03:02

Код

<%
   oRs.movefirst
   response.write '<table border='1'><tr>'
   for each key in oRs.fields
      response.write '<td>' & key.name & '</td>'
   next

   response.write '</tr><tr><td>'
   RowSeparator='</td></tr><tr><td>'
   ColSeparator='</td><td>'
   RowsString=oRsAgency.getstring(, , ColSeparator, RowSeparator, '')
   RowsString=Left(RowsString, Len(RowsString) - Len(RowSeparator))
   response.write RowsString
   response.write '</td></tr></table>'
%>

25.12.2008, 03:04

[code]
<%
oRs.movefirst
response.write '<table border='1'><tr>'
for each key in oRs.fields
response.write '<td>' & key.name & '</td>'
next

response.write '</tr><tr><td>'
RowSeparator='</td></tr><tr><td>'
ColSeparator='</td><td>'
RowsString=oRs.getstring(, , ColSeparator, RowSeparator, '')
RowsString=Left(RowsString, Len(RowsString) - Len(RowSeparator))
response.write RowsString
response.write '</td></tr></table>'
%>

@scorpion_35 0 / 0 / 0 Регистрация: 09.07.2008 Сообщений: 3
		1
	Пытаюсь разобраться с rs.GetString. Нужна помощь. 09.07.2008, 01:42. Показов 1321. Ответов 7 Метки нет (Все метки) При формировании таблицы я отказался от цикла и пытаюсь приспособить для этого GetString. Что то вроде этого: <% sql = 'Select * From notes_tb'; rs.Open(sql, conn); var prt = '<table border = '1'><tr><td>' prt+=rs.GetString(2, 4, '</td><td>','</td></tr><td>',' '); prt+= '</table>'; %> <%=prt%> <td> при формировании последней строки получается лишним. Есть ли решение лучшее чем замена последнего <td> на '</table>' с помощью replace. 0

Rider
	10.07.2008, 16:39	2
	А чем собственно тебе replace не нравится?

@debutant 0 / 0 / 0 Регистрация: 17.08.2007 Сообщений: 539
	10.07.2008, 17:00	3
	Тут нужна небольшая игра с выходной строкой. Сам парился в отладчике :-) Код var prt = '<table border = '1'> ptr=rs.getstring(,,'</TD><TD>','</TD></TR><TR><TD>','Null') ptr='<TR><TD>' & Left$(ptr,len(ptr)-8) ptr=ptr & </table> Не спорю, что есть решения намного лучше 0

@scorpion_35 0 / 0 / 0 Регистрация: 09.07.2008 Сообщений: 3
	11.07.2008, 01:56 [ТС]	4
	To Rider: Я бы не хотел сейчас дискутировать о своих пристрастиях или неприязни к replace. To debutant: Спасибо за помощь. Сейчас проверю твой код, с виду очень даже похоже. Еще раз спасибо. 0

@scorpion_35 0 / 0 / 0 Регистрация: 09.07.2008 Сообщений: 3
	12.07.2008, 12:25 [ТС]	6
	Вариант с replace - может комуто пригодиться. Код sql = 'Select * From department_tb'; rs.Open(sql, conn); var prt = '<TABLE bgcolor='#0000FF' cellspacing='0' cellpadding='0' border='1'><TR><TD>' prt+=rs.getstring(2,10,'</TD><TD>','</TD></TR><TR><TD>',' '); prt+='</SHIT>'; prt = prt.replace('<TR><TD></SHIT>', '</TABLE>'); Для упрощения поиска подстроки вводим зарезервированное слово </SHIT>. Успехов 0

al
	25.12.2008, 03:04	8
	[code] <% oRs.movefirst response.write '<table border='1'><tr>' for each key in oRs.fields response.write '<td>' & key.name & '</td>' next response.write '</tr><tr><td>' RowSeparator='</td></tr><tr><td>' ColSeparator='</td><td>' RowsString=oRs.getstring(, , ColSeparator, RowSeparator, '') RowsString=Left(RowsString, Len(RowsString) - Len(RowSeparator)) response.write RowsString response.write '</td></tr></table>' %>