+W I N I E S* 와이니즈-와인에 열정을 가진 사람들

<% Call WriteSelectBox_Research(intNo_RS) %> <% Call WriteMagazineSubBanner(intYear, intMonth) %> <% Call WriteInfoSubBanner(intYear, intMonth) %>

<% ' Title Image If strImg_Title <> "" Then Response.Write "

" Response.Write "

" End If %>

<%=strWriter%>

<% If strImg_Content1 <> "" Then Response.Write "

" End If Response.Write strIntro %>

<% ' 평가 된 Wine List ------------------------------------------------------------------------------------- If blnResult Then %> <% Dim strWineCode, intYear_Make, strName_Kor, strName_Eng Dim intLoop, strColor intLoop = 2 Do While Not objRs.Eof strWineCode = objRs("strWineCode") intYear_Make = objRs("intYear_Make") strName_Kor = objRs("strName_Kor") strName_Eng = objRs("strName_Eng") If intLoop Mod 2 = 0 Then strColor = "#C9727E" Else strColor = "" End If %> <% objRs.MoveNext intLoop = intLoop + 1 If Not objRs.Eof Then %> <% End If Loop %>

평가번호	제품명	생산년도

<%=strWineCode%>	<%=strName_Eng%> (<%=strName_Kor%>)	<%=intYear_Make%>

<% End If ' 평가 된 Wine List End ------------------------------------------------------------------------------------- %>