目的:这个页面主要是修改各个用户的资料,页面的上部分是客户列表。下半部分默认为添加新用户的表格,当需要对已存在客户的资料进行修改时,单击相应的用户,下半部分变为要修改用户的资料,此时进行修改。
问题:如何实现单击列表中用户时,页面下半部分显示要修改用户的资料,实现一个值传递。声明的secBoard()函数中,mainTable.tBodies[1].tds[0].value="x";引用单元格的内容存在错误。页面代码如下,请高手赐教!<!--#include file="../Connections/cli.asp" -->
<%
var Recordset1 = Server.CreateObject("ADODB.Recordset");
Recordset1.ActiveConnection = MM_cli_STRING;
Recordset1.Source = "SELECT * FROM dbo.users";
Recordset1.CursorType = 0;
Recordset1.CursorLocation = 2;
Recordset1.LockType = 1;
Recordset1.Open();
var Recordset1_numRows = 0;
%>
<%
var Repeat1__numRows = 8;
var Repeat1__index = 0;
Recordset1_numRows += Repeat1__numRows;
var varcode = 1;
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
<script language="javascript">
<!--
function secBoard(x)
{
mainTable.tBodies[0].style.display="none";
mainTable.tBodies[1].style.display="block";
mainTable.tBodies[1].tds[0].value="x";
}
//-->
</script>
<style>
td {
font-size: 13px;
line-height: 25px;
border-collapse:collapse;
};
.td1 {
font-size: 13px;
line-height: 25px;
border-collapse:collapse;
border:1px solid #cccccc;
};
.td2 {
font-size: 13px;
line-height: 25px;
border-collapse:collapse;
border:1px solid #cccccc;
cursor: hand;
}
</style>
</head><body>
<table width="666">
<tr><td align="center">用户权限管理</td></tr>
<tr><td>用户列表:</td></tr>
<tr><td height="240" valign="top">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse:collapse;" >
<tr>
<td width="100" class="td1">用户代码</td>
<td width="100" class="td1">用户密码</td>
<td width="100" class="td1">用户名称</td>
<td width="100" class="td1">权限范围</td>
<td width="100" class="td1">操作权限</td>
<td width="100" class="td1">说明</td>
</tr>
<% while ((Repeat1__numRows-- != 0) && (!Recordset1.EOF)) { %>
<tr onMouseover="this.bgColor='orange'" onMouseOut="this.bgColor='white'"> <td class="td1"><%=(Recordset1.Fields.Item("usercode").Value)%></td>
<td class="td1"><%=(Recordset1.Fields.Item("password").Value)%></td>
<td class="td1"><%=(Recordset1.Fields.Item("username").Value)%></td>
<td class="td1"><%=(Recordset1.Fields.Item("rightarea").Value)%></td>
<td class="td1"><%=(Recordset1.Fields.Item("rightlevel").Value)%></td>
<td class="td2" onClick="<%varcode=(Recordset1.Fields.Item('usercode').Value)%>;secBoard(<%=varcode%>)">双击修改</td>
</tr>
<%
Repeat1__index++;
Recordset1.MoveNext();
}
%>
</table>
</td></tr>
<tr><td height="25"></td></tr>
</table>
<table name=mainTable id=mainTable>
<tbody style="display:block;">
<tr>
<td valign="top" >增加新用户</td>
</tr>
</tbody>
<tbody style="display:none;">
<tr>
<td valign="top" id=td1><%=varcode%></iframe></td>
</tr>
</tbody>
</table>
</body>
</html>
<%
Recordset1.Close();
%>
问题:如何实现单击列表中用户时,页面下半部分显示要修改用户的资料,实现一个值传递。声明的secBoard()函数中,mainTable.tBodies[1].tds[0].value="x";引用单元格的内容存在错误。页面代码如下,请高手赐教!<!--#include file="../Connections/cli.asp" -->
<%
var Recordset1 = Server.CreateObject("ADODB.Recordset");
Recordset1.ActiveConnection = MM_cli_STRING;
Recordset1.Source = "SELECT * FROM dbo.users";
Recordset1.CursorType = 0;
Recordset1.CursorLocation = 2;
Recordset1.LockType = 1;
Recordset1.Open();
var Recordset1_numRows = 0;
%>
<%
var Repeat1__numRows = 8;
var Repeat1__index = 0;
Recordset1_numRows += Repeat1__numRows;
var varcode = 1;
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
<script language="javascript">
<!--
function secBoard(x)
{
mainTable.tBodies[0].style.display="none";
mainTable.tBodies[1].style.display="block";
mainTable.tBodies[1].tds[0].value="x";
}
//-->
</script>
<style>
td {
font-size: 13px;
line-height: 25px;
border-collapse:collapse;
};
.td1 {
font-size: 13px;
line-height: 25px;
border-collapse:collapse;
border:1px solid #cccccc;
};
.td2 {
font-size: 13px;
line-height: 25px;
border-collapse:collapse;
border:1px solid #cccccc;
cursor: hand;
}
</style>
</head><body>
<table width="666">
<tr><td align="center">用户权限管理</td></tr>
<tr><td>用户列表:</td></tr>
<tr><td height="240" valign="top">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse:collapse;" >
<tr>
<td width="100" class="td1">用户代码</td>
<td width="100" class="td1">用户密码</td>
<td width="100" class="td1">用户名称</td>
<td width="100" class="td1">权限范围</td>
<td width="100" class="td1">操作权限</td>
<td width="100" class="td1">说明</td>
</tr>
<% while ((Repeat1__numRows-- != 0) && (!Recordset1.EOF)) { %>
<tr onMouseover="this.bgColor='orange'" onMouseOut="this.bgColor='white'"> <td class="td1"><%=(Recordset1.Fields.Item("usercode").Value)%></td>
<td class="td1"><%=(Recordset1.Fields.Item("password").Value)%></td>
<td class="td1"><%=(Recordset1.Fields.Item("username").Value)%></td>
<td class="td1"><%=(Recordset1.Fields.Item("rightarea").Value)%></td>
<td class="td1"><%=(Recordset1.Fields.Item("rightlevel").Value)%></td>
<td class="td2" onClick="<%varcode=(Recordset1.Fields.Item('usercode').Value)%>;secBoard(<%=varcode%>)">双击修改</td>
</tr>
<%
Repeat1__index++;
Recordset1.MoveNext();
}
%>
</table>
</td></tr>
<tr><td height="25"></td></tr>
</table>
<table name=mainTable id=mainTable>
<tbody style="display:block;">
<tr>
<td valign="top" >增加新用户</td>
</tr>
</tbody>
<tbody style="display:none;">
<tr>
<td valign="top" id=td1><%=varcode%></iframe></td>
</tr>
</tbody>
</table>
</body>
</html>
<%
Recordset1.Close();
%>
解决方案 »
- 急!如何将new ActiveXObject出的控件标记为安全,或通过js实现将没有标记为安全的控件由禁用改为启用啊?
- Table怎么就不出现呢???? 解决立即分
- 有关使用您的(cool)信息提示组件后,发现了一个问题,向您请教下!
- 如何通过部分名字得到控件?
- 导航菜单指定位置!! 在线等,马上给分
- 请问下 jquery中find("> *")代表啥意思呢?
- 问几个关于按钮的js应用,我是菜鸟,只要你喂我代码就谢谢了
- javascript对网页显示速度的影响
- 请问三个简单的问题?
- 怎么在fullscreen的窗体中输入一个新的窗体,而不是象我代码实现那样的!!!!!!!!!!!!!!!!!!!!!
- js在超连接中怎么传值?
- ▄︻┻┳═一菜鸟求教个题目,急!!
{
var td=document.getElementById("td1");
td.innerText=x;
mainTable.tBodies[0].style.display="none";
mainTable.tBodies[1].style.display="block";
}