|
|
|
|
¹Ý¾ß / 2000-08-13 / ¿ÀÀü 6:07:07 / 210.124.240.132
Á¶È¸¼ö : 117
|
[Áú¹®] ¾È³çÇϼ¼¿ä~ 俵´Ô ¿À·£¸¸¿¡ ¿Í¼ Áú¹®µå¸³´Ï´Ù. |
---- ¿¡·¯ ¸Þ½ÃÁö ----
À߸øµÈ Çü½ÄÀ̰ųª ¿Ã¹Ù¸¥ ¹üÀ§ ¹Û¿¡ Àְųª ¼·Î Ãæµ¹ÇÏ´Â ÀμöÀÔ´Ï´Ù.
/VS-BET/SPORTSSTAR/vote/new_result.asp, line 38
---- ¿¡·¯¶óÀÎÀÇ ÄÚµå ----
<%
Set RS=Server.CreateObject("ADODB.Recordset")
SQL1="Select * from starsurvey order by counter desc "
rs.Open db,sql1 <----38ÀÌ¸é ¿äºÎºÐÀä.
if rs.BOF then
end if
rs.movefirst
AllRec = RS.GetString(2, 20)
rows = split(AllRec,chr(13))
for j=0 to 3
cols = split(rows(j),chr(9))
s=cols(0)
n=cols(1)
SQL2 = "INSERT INTO star_survey_result (starnum,name)
values ('"& s &"','"& n &"')"
db.Execute sql2
next
%>
<%
for i=6 to 7
cols=split(rows(i),chr(9))
s2=cols(0)
n2=cols(1)
SQL3 = "INSERT INTO star_survey_result (starnum,name) values ('"&
s2 &"','"& n2 &"')"
db.Execute sql3
next
%>
<%
for i=4 to 5
cols=split(rows(i),chr(9))
s3=cols(0)
n3=cols(1)
SQL4 = "INSERT INTO star_survey_result (starnum,name) values ('"&
s3 &"','"& n3 &"')"
db.Execute sql4
next
%>
<%
for i=8 to 19
cols=split(rows(i),chr(9))
s4=cols(0)
n4=cols(1)
SQL5 = "INSERT INTO star_survey_result (starnum,name) values ('"&
s4 &"','"& n4 &"')"
db.Execute sql5
next
%>
---- Áú¹® ³»¿ë ----
Å׿ä´Ô »çÀÌÆ®¿¡ ¼Ò°³µÈ getstring ¼Ò½º¸¦ ±×´ë·Î ÀοëÇß½À´Ï´Ù.ÀÌ°Ç 1µî ºÎÅÍ 20µî±îÁöÀ¸ ÅõÇ¥ °á°ú¸¦
´Ù¸¥ Å×ÀÌºí¿¡ µî¼ö¸¦ ¹Ù²Ù¿ö¼ »ðÀÔÇϴ°ÍÀÌ ¸ñÀûÀÔ´Ï´Ù. 1µî ºÎÅÍ 4µî±îÁö µ¥ÀÌÅÍ ³Ö°í, 7~8µî±îÁö ³Ö°í,5~6µî±îÁö ³Ö°í, ±×¸®°í 9~20µî±îÁö ³Ö´Â ÀÛ¾÷Àä. ¾ÈµÇ³×¿ä.
´ÜÁö,, for¹®¿¡ ubound(rows)-1 ´ë½Å¿¡, 1ºÎÅÍ 4±îÁö insert ÇÏ°í 7~8 ±îÁö
insert, ±×¸®°í, 5~6±îÁö insert..ÀÌ·±¾¿À¸·Î ¸ðµÎ 20°³ÀÇ ·¹Äڵ带 Áý¾î ³Ö
À¸·Á Çϴµ¥, ÀÌ·± ¿¡·¯°¡ ¶ß³×¿ä.
¾î¶»°Ô ÇØ°áÇؾߵÉÁö,,,
Ȥ½Ã, Ä¿¼Å¸ÀÔÀ» ÁöÁ¤ÇØÁÖÁö ¾Ê¾Æ¼ ±×·±Áö¿ä? adopendinamic .. ¾Æ´Ô ÀÌ ¹æ¹ý ¸»°í µ¥ÀÌÅ͸¦ Áý¾î³Ö´Â ÁÁÀº ¹æ¹ýÀ» ¾Æ½Ã¸é °¥ÃÄÁÖ¼¼¿ä.
ÈæÈæ~~
Á¦°¡ ù Ãë¾÷Çؼ ¸ÃÀº ÇÁ·ÎÁ§Æ®Àε¥, Çì¸Þ°í ÀÖ½À´Ï´Ù. ¤Ð.¤Ð
|
|
|
|