使用DHTML添加控制項

<table id=DataGrid1>
 <tr onclick="element_click(0,0)"><td>1</td></tr>
</table>

<script>
function element_click(irowID,icolID)
{
 DataGrid1.rows(irowID).cells(icolID).innerText = "";
 var oText = document.createElement("input");
 oText.id = "oText";
 oText.type="text";
 oText.value = 'this is a test';
 oText.onclick = function()
 {
  alert(this.value);
 };
 DataGrid1.rows(irowID).cells(icolID).appendChild(oText);
}
</script>

<SCRIPT>
function fnCreate(){
    oData.innerHTML="";
    var oOption=oSel.options[oSel.selectedIndex];
    if(oOption.text.length>0){
    var aElement=document.createElement(oOption.text);
    eval("aElement." + oOption.value + "='" + oText.value + "'");
    if(oOption.text=="A"){
        aElement.href="javascript:alert('A link.')";
   }
   }
    oData.appendChild(aElement);
}
</SCRIPT>
<SELECT ID="oSel" onchange="fnCreate()">
<OPTION VALUE="innerText">A
<OPTION VALUE="value">&lt;INPUT TYPE="button"&gt;
</SELECT>
<SELECT ID=oText onchange="fnCreate()">
<OPTION>
<OPTION VALUE="Text">Text
<OPTION VALUE="More and More Text">More and More Text
</SELECT>
<SPAN ID="oData" ></SPAN>