斑竹求救

zz95469 2006-06-26 04:33:31
sub oBtnAddItem_onclick()

set newTr = mytable.insertRow()
set newTd0 = newTr.insertCell()
newtd0.align = "center"
newtd0.height = "35"
newtd0.width = "40"
set newTd1 = newTr.insertCell()
newtd1.align = "center"
newtd1.width = "80"
set newTd2 = newTr.insertCell()
newtd2.align = "center"
set newTd3 = newTr.insertCell()
newtd3.align = "center"
newtd3.width = "100"


newTd0.innerHTML = "<font CLASS='Font-14point'>"&int(Frm_workLog.myrowcount.value)&"</font>"
newTd1.innerHTML = "<SELECT HEIGHT='20' NAME='oSelGZLX"&int(Frm_workLog.myrowcount.value)&"'><option value='1' SELECTED>程序开发</option><option value='2'>系统测试</option><option value='3'>数据整理</option><option value='4'>工作会议</option><option value='5'>知识学习</option></SELECT>"
newTd2.innerHTML = "<input TYPE='TEXT' SIZE='65' maxlenth='200' HEIGHT='20' NAME='oTxtGZNR"&int(Frm_workLog.myrowcount.value)&"' id='oTxtGZNR"&int(Frm_workLog.myrowcount.value)&"'>"
newTd3.innerHTML = "<input TYPE='TEXT' SIZE='5' NAME='oTxtGZSC"&int(Frm_workLog.myrowcount.value)&"' HEIGHT='20' id='oTxtGZSC"&int(Frm_workLog.myrowcount.value)&"'>小时"
Frm_workLog.myrowcount.value=Frm_workLog.myrowcount.value+1
end sub

动态添加的 NAME=oTxtGZNR&int(Frm_workLog.myrowcount.value) 几个文本框,怎么动态引用阿

for i=1 to int(Frm_workLog.myrowcount.value)
Frm_workLog.oTxtGZNR&int(Frm_workLog.myrowcount.value).value
的引用方式好象不行啊
...全文
104 1 打赏 收藏 举报
写回复
用AI写文章
1 条回复
切换为时间正序
请发表友善的回复…
发表回复
  • 打赏
  • 举报
回复
设置id

28,402

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧