<% sql = " SELECT b_main_img, b_l_url, b_l_subject, b_l_win "&_ " FROM banner2 "&_ " WHERE b_l_chk = 'Y' AND b_l_sdate <= '"&getDateFm(now,4)&"' AND b_l_edate >='"&getDateFm(now,4)&"' "&_ " ORDER BY b_l_code desc " Set Rs = Dbcon.Execute (sql) If Not rs.eof Then vData = rs.getrows() vCnt = UBound(vData,2) Else vCnt = -1 End If rs.close : Set rs = nothing If vCnt >-1 then %>

.gif" width="11" height="11" alt="<%=i%>번째 팝업" />

<% For i=1 To vCnt+1 b_main_img = vData(0,i-1) b_l_url = vData(1,i-1) b_l_subject = vData(2,i-1) b_l_win = vData(3,i-1) If i = 1 then mf_display = "disblock" else mf_display = "disnone" End if strwin="" if b_l_win="1" then strwin = "target='_blank'" End if %>

<% Next %>

<% End if %>