斑竹求救

zz95469 zz95469 墨衍会员 · AI 创作全网分发 墨衍智能分发 通过墨衍一键同步至各平台 可同步平台 CSDN微信公众号微博知乎掘金百家号博客园抖音小红书 你的文章也可以这样分发 墨衍会员 ¥399起/年,写一次发全网 我也要 + 加入社区
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
的引用方式好象不行啊
...全文
评论 1
收藏 已收藏
分享
返回顶部
zz95469
ASP 28,401 成员 356,940 内容