<% 'Group Solar (grp_id = 1) qrySolar = "select *,* from bands b, products p where b.grp_id = 1 and p.band_id = b.band_id" set rsSolar = conn.execute(qrySolar) if not rsSolar.eof then %>
<%=rsSolar("prod_code")%>

<%=imgsrc(rsSolar("prod_picture"), rsSolar("prod_picturex"), rsSolar("prod_picturey"), 80, 0)%>

<%=rsSolar("prod_describe")%>

&grp_id=1&band_id=<%=rsSolar("band_id")%>">READ MORE>>
<% end if %> 		<% 'Group Telecom (grp_id = 2) qryTel = "select *,* from bands b, products p where b.grp_id = 2 and p.band_id = b.band_id" set rsTel = conn.execute(qryTel) if not rsTel.eof then %>
<%=rsTel("prod_code")%>

<%=imgsrc(rsTel("prod_picture"), rsTel("prod_picturex"), rsTel("prod_picturey"), 80, 0)%>

<%=rsTel("prod_describe")%>

&grp_id=2&band_id=<%=rsTel("band_id")%>">READ MORE>>
<% end if %>
<% 'Group Electrical (grp_id = 3) qryEle = "select *,* from bands b, products p where b.grp_id = 3 and p.band_id = b.band_id" set rsEle = conn.execute(qryEle) if not rsEle.eof then %>
<%=rsEle("prod_code")%>

<%=imgsrc(rsEle("prod_picture"), rsEle("prod_picturex"), rsEle("prod_picturey"), 80, 0)%>

<%=rsEle("prod_describe")%>

&grp_id=1&band_id=<%=rsSolar("band_id")%>">READ MORE>>
<% end if set rsTel = nothing %> 		<% 'Group Industrial (grp_id = 4) qryEle = "select *,* from bands b, products p where b.grp_id = 4 and p.band_id = b.band_id" set rsEle = conn.execute(qryEle) if not rsEle.eof then %>
<%=rsEle("prod_code")%>

<%=imgsrc(rsEle("prod_picture"), rsEle("prod_picturex"), rsEle("prod_picturey"), 80, 0)%>

<%=rsEle("prod_describe")%>

&grp_id=2&band_id=<%=rsEle("band_id")%>">READ MORE>>
<% end if set rsTel = nothing %>
   

Investors
  
Employment
  
Life Style
<% qryInv = "select * from investors order by inv_id desc" set rsInv = conn.execute(qryInv) if not rsInv.eof then response.write imgsrc(rsInv("inv_picture"), rsInv("inv_picturex"), rsInv("inv_picturey"), 80, 0) end if set rsInv = nothing %>
<% qryEmp = "select * from employments order by emp_id desc" set rsEmp = conn.execute(qryEmp) if not rsEmp.eof then response.write imgsrc(rsEmp("emp_picture"), rsEmp("emp_picturex"), rsEmp("emp_picturey"), 80, 0) end if set rsEmp = nothing %>
<% qryLife = "select * from lifestyle order by ls_id desc" set rsLife = conn.execute(qryLife) if not rsLife.eof then response.write imgsrc(rsLife("ls_picture"), rsLife("ls_picturex"), rsLife("ls_picturey"), 80, 0) end if set rsLife = nothing %>
f
  <% qryInv = "select * from investors order by inv_id desc" set rsInv = conn.execute(qryInv) if not rsInv.eof then %> <%=rsInv("inv_head")%>
<%=rsInv("inv_preview")%>

">READ MORE>> <% end if set rsInv = nothing %>
  <% qryEmp = "select * from employments order by emp_id desc" set rsEmp = conn.execute(qryEmp) if not rsEmp.eof then %> <%=rsEmp("emp_head")%>
<%=rsEmp("emp_preview")%>

">READ MORE>> <% end if set rsEmp = nothing %>
  <% qryLife = "select * from lifestyle order by ls_id desc" set rsLife = conn.execute(qryLife) if not rsLife.eof then %> <%=rsLife("ls_head")%>
<%=rsLife("ls_preview")%>

&ct_id=<%=rsLife("ct_id")%>">READ MORE>> <% end if set rsLife = nothing %>