<% Set WS = Server.CreateObject("cts.ws1") Set RS1 = WS.URL2RS("http://hoteldiy.network.com.tw/_networkprogram/WS_tblModule_Mall_items_S1.asp?intHotelPK=1092") Set WS = Nothing if Not RS1.Eof then %>

<% do until rs1.eof %>

<%=RS1("itemName")%>

<%if RS1("itemImageShow1") = "yes" And RS1("itemImageHave1") = "yes" then%>

&imgkey=1" width="210" height="160" border="0"> <%end if%>

購物車 &B1=訂購" class="linkbottom">訂購 &commercial=yes" class="linkbottom">商品介紹 $NT<%=RS1("itemPrice")%>

<% rs1.MoveNext loop %>

<% rs1.close set rs1 = nothing %> <% end if %>

熱門新品推薦商品

<% Set WS = Server.CreateObject("cts.ws1") Set RS1 = WS.URL2RS("http://hoteldiy.network.com.tw/_networkprogram/WS_tblModule_Mall_items_S2.asp?intHotelPK=1092") Set WS = Nothing if Not RS1.Eof then %> <%do until RS1.eof%>

<%=RS1("itemName")%>

<%if RS1("itemImageShow1") = "yes" And RS1("itemImageHave1") = "yes" then%>

&imgkey=1" width="117" height="88" border="0"> <%end if%>

購物車 &commercial=yes" class="linkbottom" class="linkbottom">簡介 $NT<%=RS1("itemPrice")%>

<% RS1.MoveNext loop %>

<%end if%>