asp里使用M$的ACTIVE控件:LISTVIEW

idlecloud 2005-09-09 09:37:52
<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
for(i = 1; i <= Item.ListSubItems.Count; i ++) theValue = theValue + "\n" + Item.ListSubItems(i).Text
myValue.value = theValue
</script>
<script language = 'javascript' for = 'myList' event = 'ItemdbClick(Item)'>
var theValue = ""

theValue = Item.Text+key
for(i = 1; i <= Item.ListSubItems.Count; i ++) theValue = theValue + "\n" + Item.ListSubItems(i).Text
myValue.value = theValue
</script>
<body onload = 'InitList(myList, myTale, 11,1, false)' scroll = 'no' bgcolor = 'buttonface' topmargin='0' leftmargin='0'>
<table border='0' cellpadding='0' cellspacing='0' style='border-collapse: collapse' width='100%' height='100%'>
<tr>
<td nowrap>
<script language = 'javascript'>
document.write( "<object classid='clsid:BDD1F04B-858B-11D1-B16A-00C0F0283628' style = 'width:" + (document.body.clientWidth - 150) + ";height:" + document.body.clientHeight + "' id='myList'></object> ")
</script>

请问大家有没有用过以上这个控件,如何在其显示的表格列表里能显示超级链接。
下面这样写没有用:
<td width='6%'><a href='change.asp?id=200406080008&id1=339'>修改</a></td> 只能显示“修改”,超链接的效果出不来。
...全文
149 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
idlecloud 2005-09-16
  • 打赏
  • 举报
回复
100分啊,没人知道吗?大家来抢分吧!!
idlecloud 2005-09-09
  • 打赏
  • 举报
回复
上面的回答是错误的,在LISTVIEW里显示的列表都是以文本就显示出来,你上面的语句和我原来的实际效果是一样的。

源代码如下,但实际显示出来,修改无法显示超链接。
<!--
body { font-size: 12px }
table { font-size: 13px }
-->
</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
for(i = 1; i <= Item.ListSubItems.Count; i ++) theValue = theValue + "\n" + Item.ListSubItems(i).Text
myValue.value = theValue
// window.location.href = "change.asp?id=200406080007&id1=" + Item.Key
</script>

<body onload = 'InitList(myList, myTale, 13,1, false)' scroll = 'no' bgcolor = 'buttonface' topmargin='0' leftmargin='0'>
<table border='0' cellpadding='0' cellspacing='0' style='border-collapse: collapse' width='100%' height='100%'>
<tr>
<td nowrap>
<script language = 'javascript'>
document.write( "<object classid='clsid:BDD1F04B-858B-11D1-B16A-00C0F0283628' style = 'width:" + (document.body.clientWidth - 150) + ";height:" + document.body.clientHeight + "' id='myList'></object> ")
</script>



<table border="1" cellpadding="1" cellspacing="1" style="border-collapse: collapse" bordercolor="#111111" id = 'myTale' style = 'display:none'>
<tr id = 'tablehead'>
<td>0</td><td>1</td><td>2</td><td>3</td><td>4</td><td>5</td><td>6</td><td>7</td><td>8</td><td>9</td><td>10</td><td>11</td><td>12</td>
</tr>
<tr id='mytr'>
<td id='mytd'>1289</td><td id='mytd'></td><td id='mytd'>q</td><td id='mytd'>面</td><td id='mytd'>58143</td><td id='mytd'></td><td id='mytd'></td><td id='mytd'></td><td id='mytd'></td><td id='mytd'></td><td id='mytd'></td><td id='mytd'></td><td width='6%'><a href='change.asp?id=1234&id1=1289'>修改</a></td>
</tr>



</table>
</td>
<td nowrap width='150' align="center" valign="top">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" width="100%" id="AutoNumber1">
<tr>
<td>
</td>
</tr>
<tr>
<td> 内容:</td>
</tr>
<tr>
<td>
<TEXTAREA name=myValue rows=30 cols=16></TEXTAREA> </TD></TR>
<tr><td>

<BR></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
tigerwen01 2005-09-09
  • 打赏
  • 举报
回复
document.write(<td width='6%'><a href='change.asp?id=200406080008&id1=339'>修改</a></td> );

28,390

社区成员

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

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