熱點推薦:
您现在的位置: 電腦知識網 >> 編程 >> .NET編程 >> 正文

.net中申請單動態添加實現方法及代碼[3]

2013-11-13 11:04:38  來源: .NET編程 

set ocell=orowinsertcell
ocellclassname=ListCellRow
ocellinnerhtml=<input type=button value=刪除 onClick=vbscript:bdel( & lcountmx & ) id=button name=button>
ocellalign=center

documentapplicationsFormypslvalue = lcountmx
end function

function bdel(l)
tabzxdeleteRow documentgetElementById(trzx & l)rowindex
end function

function changeFun(obj)
change obj
end function

function changeFun(obj)
change obj
end function
</script>

  選擇設備頁面的調用代碼如下

<SCRIPT LANGUAGE=vbscript>

  選擇多種用品並返回到主頁面

function doOk(sFlag)
Dim StrIDmnewStrIDiinewStrID_
StrID=
for each m in FormEditelements
IF mtype=checkbox then
if mchecked and mname <> selectAllCheck then

if StrID = then
StrID= mvalue
else
StrID=StrID & & mvalue
end if
end if
END IF
NEXT

IF StrID<> THEN
newStrID = Split(StrID)
for ii= to ubound(newStrID)
newStrID(ii) = replace(newStrID(ii)()
newStrID_ = Split(newStrID(ii))
windowopenerbadd newStrID_()newStrID_()newStrID_()newStrID_()newStrID_()newStrID_()newStrID_()newStrID_()newStrID_()
next
if sFlag then
windowclose
end if
else
msgbox 您沒有選擇任何用品! vbExclamation提示
exit function
END IF
End function
</SCRIPT>

[]  []  []  


From:http://tw.wingwit.com/Article/program/net/201311/15114.html
    推薦文章
    Copyright © 2005-2013 電腦知識網 Computer Knowledge   All rights reserved.