ASP获取和还原复选框的值(0～99多项选择)
在多项选择的一些应用中，可以用二进制1代表选中，0代表不选。例如给某用户角色分配权限abcdefg，选中情况是1001101，那么此角色包含四项权限，用一个变量表示，相应的十进制数是77。
但是，在ASP中的多项选择，就不适合这种以数值的形式记录选中情况。因为，当项目数很多时（例如64项，相应的二进制数达64位），就涉及大整数的运算，步骤繁杂，而且当项目数改变时，算法也要改变。
以下以字符的形式获取和还原ASP复选框的值，应用于角色分配、投票统计等领域，最多99项：
<script language="javascript">
function selectIt(){
form=document.lzyy
action=event.srcElement.name
for(var i=0; i<form.elements.length; i++){
if(form.elements[i].name=="test"){
e=form.elements[i]
e.checked=(action=="selectAll")?(form.selectAll.checked):(!e.checked)
}
}
}
</script>
<%
dim check,ch,test
check=99 '总项目数0～99
dim checked
redim checked(check) '各项的选中状态
if not request.form("action")="editselect" then %>
<form name="lzyy" action="" method="post">
<input type="checkbox" name="selectAll" value="checkbox" onClick="selectIt()"><b>全选</b>
<input type="checkbox" name="invest" value="checkbox" onClick="selectIt()"><b>反选</b>
<%
for chi=1 to check
ch="0"+cstr(chi)
ch=right(ch,2)
%>
<input type="checkbox" name="test" value="<%=ch%>">项目<%=ch%>
<%next%>
<input name="action" type="hidden" value="editselect" />
<input type="submit" name="Submit" value="选择" />
</form>
<%else%>
<BR>(还原选中情况：)<BR>
<%
test=request.form("test")
Response.Write "<br>选中之后，保存在数据库中的文本(例如01, 02, 03, 05 )：" & test & "<br>"
'循环取值/操作
'strCheck=Spli
相关文档：
本机ip[客户端]:
request.servervariables("remote_addr")
从哪个页面转到当前页面的：
Request.ServerVariables("HTTP_REFERER")
得到本页地址：
<%="http://" + Request.ServerVariables("SERVER_NAME") + ":" + Request.ServerVariables("SERVER_PORT") + reques ......
直奔主题.
目前在维护一套大型的ASP售后系统(2000多个asp page),代码是2001年出来的,期间多年未做更新,代码中参杂多个程序员的风格,结构上只是简单的将main function 集中起来,将复杂的sql集中起来. 页面上相当混乱.
没有简单地去转向.net环境,因为这个系统使� ......
对于三层架构的概念性意义,网络上有很多专文探讨,若想深入了解,可以自寻解答.本文仅作为一种应用性探讨,讲的更多的是实现的细节.
简单地讲,三层架构是将代码按其作用分成三部分,每部分解决自己负责的流程.
从表入深,分别是:
界面层-UI&nb ......
<%
set rs=server.CreateObject(”ADODB.recordset”)
sql =”select * from 表”
rs.open sql,conn,1,1
page=cint(request(”page”))
n=rs.RecordCount
rs.pagesize=12
m=cint(rs.pagecount)
if page=”" then
page=1
elseif page<1 then
page=1
end if
if cint(r ......
