[ActiveX]Web中使用ListView 完全示例

[ActiveX]Web中使用ListView 完全示例(1)

[HTML]
<title>列表</title>
<style>
<!--
body     { font-size: 10px }
table    { font-size: 12px }
-->
</style>
<script language = 'Javascript'>
function InitList(theList, theTable, iEnd, iId, checkIt)
{
var colWidth = (document.body.clientWidth - 200) / iEnd

with(theList)
{
View = 3
BorderStyle = 0
GridLines = true
Checkboxes = checkIt
FullRowSelect = true
LabelEdit = 1

for(var i = 0; i < iEnd; i ++)
{
ColumnHeaders.Add(i + 1, 'Col' + i, theTable.rows[0].cells[i].innerText, colWidth) //, 100, myAlign)
}
for(var i = 1; i < theTable.rows.length; i ++)
{
myList.ListItems.Add( i, 'Key' + theTable.rows[i].cells[iId -1].innerText.replace(" ", ""), theTable.rows[i].cells[0].innerText.replace(" ", ""))
for(var j = 1; j < iEnd; j ++)
{
  ListItems(i).SubItems(j) = theTable.rows[i].cells[j].innerText.replace(" ", "")
}
}
Sorted = true
}
}
</script>
<script language = 'javascript' for = 'myList' event = 'ColumnClick(ColumnHeader)'>

if(ColumnHeader.SubItemIndex == myList.SortKey)
{
    if(myList.SortOrder == 0) myList.SortOrder = 1
    else myList.SortOrder = 0
    }
else
{
    myList.SortKey = ColumnHeader.SubItemIndex
    if(myList.SortOrder == 0) myList.SortOrder = 1
else myList.SortOrder == 0
    }
</script>
<script language = 'javascript' for = 'myList' event = 'ItemClick(Item)'>
var theValue = ""
 
   theValue = Item.Text + Item.Key
   for(i = 1; i <= Item.ListSubItems.Count; i ++) theValue = theValue + "\n" + Item.ListSubItems(i).Text
   myValue.value = theValue