<% Dim Params(1) Params(0) = Request("ID") Set Conn = CreateConnection(1) Set Rs = CreateRecordset(Conn, "select p.*,c.ClassName from Products p,Class c where p.ClassID=c.RowID and p.RowID=?", Params) If Rs.Eof Then Response.End %> 产品展示
  产品类别: 刀具系列>>>>>> CUTTING TOOL SERIES
产品编号: 002
锥孔铰刀>>>> REAMERS
<% Session("PicData") = Rs.Fields("ProductPic").GetChunk(7500000) Rs.Close Set Rs = Nothing %>