%@language=vbscript%> <%option explicit%> <% dim mobjConn dim rs if connDB() = 1 then set rs = openRS("select * from tbl_Category") end if dim rs2 dim txtCid txtCid = trim(cstr(Request.Form("txtHCid"))) if connDB = 1 then set rs2 = openRS("select c.name_e, p.* from tbl_Product p inner join tbl_category c " & _ "on c.category_id = p.category_id where p.Category_id = '" & txtCid & "'") end if %>
| |
||
Copyright
© 2004 SunRay Technology Company Limited. All rights reserved. |