[ÇóÖú]¹ØÓÚ¶þ¼¶Á¬¶¯ÀïµÄ±£´æÈë¿âÎÊÌâ

30Ëê¾Í¸Ä±ä

<%
dim anid
set rs1=server.createobject("adodb.recordset")
rs1.open "select * from diy_class order by anclassidorder asc",conn,1,1
if not(rs1.eof and rs1.bof) then
session("anclasscount")=rs1.recordcount
for i=1 to rs1.recordcount
if rs1.eof then
exit for
end if
anid=rs1("anclassid")
%>
<tr onMouseOver="this.bgColor='#f2f2f2'" onMouseOut="this.bgColor=''">
<td width="120" height="33"> <div align="center">
<table border="0" cellpadding="0" style="border-collapse: collapse" width="134" height="100%" id="table3">
<tr>
<td width="33"> <p align="center"><img src="<% =rs1("pic") %>" border=0 width=18 height=18></td>
<td width="101">
<% =rs1("anclass") %>
</td>
</tr>
</table>
</div></td>
<td width="210" height="33"> <p align="center">
<select name="pro<% =i %>" style="width:342;height:19" onChange="selectpro(document.form1.pro<% =i %>,document.form1.money<% =i %>,document.form1.num<% =i %>,document.form1.proname<% =i %>);">
<option name="0¡¬0">£½£½£½£½£½£½£½£½
<% =rs1("anclass") %>
£½£½£½£½£½£½£½£½</option>
<%
set rs2=server.createobject("adodb.recordset")
rs2.open "select * from diy_nclass where anclassid="&anid&" order by nclassid asc",conn,1,1
for k=1 to rs2.recordcount
if rs2.eof then
exit for
end if
%>
<option value="<% =rs2("nclass") %>(<% =rs2("danwei") %>)¡¬<% =rs2("money") %>">
<% =rs2("nclass") %>
(
<% =rs2("danwei") %>
[֪ʶÎÊ´ð¦Ø¦Ø¦Ø.¦ÖiuGoo.§ãom]
)</option>
<%
rs2.movenext
next
rs2.close
set rs2=nothing
%>
</select>
ÕâÊÇÎÒ¶þ¼¶Á¬¶¯µÄ
diy_classÊÇ´óÀà
diy_nclassÊÇСÀà
Á½Ààͨ¹ýanclassidÁªÏµ
ÏÖÔÚÎÒÒª°ÑÑ¡ÔñµÄ´óÀàСÀàдÈë¿â
¿ÉÊÇÕâÀïÓиöiÔõôд°¡
Set rs=server.createobject("adodb.recordset")
sql="select * from diy_nclass"
rs.open sql,conn,3,2
rs.addnew
rs("aa")=request("´«µÝ¹ýÀ´µÄselectname")
rs.update
rs.close
Set rs=Nothing
conn.close
response.write "<script>alert('¶©µ¥ÒÑÌá½»£¡');this.location.href='zanji1.asp';</SCRIPT>"
response.End
%>