<td width="91" bgcolor="#F3F3F3"> 产品/项目:</td>
<td width="226" bgcolor="#F3F3F3">
<select name="pid0select" size='1' >
<%
set p_rs=server.createobject("adodb.recordset")
strSQL="select p_id,p_name from Product where p_parentid=0 order by p_id desc"
p_rs.open strSQL,conn,1,1
pname=""
if p_rs.eof=false then
p_rs.movefirst
''记录显示的第一个项目名
pname=p_rs("p_name")
While Not p_rs.EOF
response.write "<option value=" & p_rs("p_id")
if p_rs("p_id")=cint(originalPID) then response.write " selected"
response.write ">"
response.write p_rs("p_name")
response.write "</option>"
p_rs.MoveNext
Wend
end if
%>
</select>
</td>
</tr>
</table>