根据选择动态添加数据代码
<script language=vbscript>
dim lcountmx
lcountmx =
function badd(stidstNamevcidvcNameggidggNamedweisliangdjia)
lcountmx=lcountmx+
dim oRowoCellii
set oRow=tabzxinsertRow
orowid=trzx & lcountmx
set ocell=orowinsertcell
dim sss
sss=<input type=hidden name=cgdjmx& lcountmx & value=>
sss=sss&<input type=hidden name=stid& lcountmx & value= & stid & >
sss=sss&<input type=hidden name=stName& lcountmx & value= & stName & >
sss=sss&<input type=hidden name=vcid& lcountmx & value= & vcid & >
sss=sss&<input type=hidden name=ggid& lcountmx & value= & ggid & >
sss=sss&stName
ocellinnerhtml= sss
ocellclassname=ListCellRow
set ocell=orowinsertcell
ocellclassname=ListCellRow
ocellalign=center
ocellwidth=
ocellinnerhtml=<input type=hidden name=vcName & lcountmx & value= & vcName & >& vcName
set ocell=orowinsertcell
ocellclassname=ListCellRow
ocellalign=center
ocellwidth=
ocellinnerhtml=<input type=hidden name=ggName & lcountmx & value= & ggName & >& ggName
set ocell=orowinsertcell
ocellclassname=ListCellRow
ocellalign=center
ocellwidth=
ocellinnerhtml=<input type=text size= name=thao & lcountmx & value=>
set ocell=orowinsertcell
ocellclassname=ListCellRow
ocellalign=center
ocellwidth=
ocellinnerhtml=<input type=hidden name=dwei & lcountmx & value= & dwei & >& dwei
set ocell=orowinsertcell
ocellclassname=ListCellRow
ocellalign=center
ocellwidth=
ocellinnerhtml=<input type=text size= name=sliang & lcountmx & onchange=changeFun( & lcountmx & ) value=>
<%
set ocell=orowinsertcell
ocellclassname=ListCellRow
ocellalign=center
ocellwidth=
ocellinnerhtml=<input type=text size= name=djia & lcountmx & onchange=changeFun( & lcountmx & ) value=>
%>
[] [] []