在 ASP 中使用 Request.ServerVariables("REMOTE_ADDR") 来取得客户端的 IP 地址，但如果客户端是使用代理服务
器来访问，那取到的就是代理服务器的 IP 地址，而不是真正的客户端 IP 地址。要想透过代理服务器取得客户端的真实
IP 地址，就要使用 Request.ServerVariables("HTTP_X_FORWARDED_FOR") 来读取。
不过要注意的事，并不是每个代理服务器都能用 Request.ServerVariables("HTTP_X_FORWARDED_FOR") 来读取客户端
的真实 IP，有些用此方法读取到的仍然是代理服务器的 IP。
还有一点需要注意的是：如果客户端没有通过代理服务器来访问，那么用 Request.ServerVariables
("HTTP_X_FORWARDED_FOR") 取到的值将是空的。因此，如果要在程序中使用此方法，可以这样处理：
......
userip = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If userip = "" Then userip = Request.ServerVariables("REMOTE_ADDR")
......
即：如 ......
<%
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(request(”page”))>m then
page=m
end if
page=cint(page)
if not rs.eof then
rs.absolutepage=page
end if
if m>page+3 then
endpage=page+3
else
endpage=m
end if
if page>4 then
pagetitle=pagetitle & “ ” & “….”
end if
for i=page-3 to endpage
if not i<1 then
if i = page then
pagetitle=pagetitle & “ ” & “<B>[” & i & “]</B>”
else
pagetitle=pagetitle & “ ” & “[” & “<a href=userlist.asp?page=” & i & “>” & i & “<a>” & “]”
end if
end if
next
if ......
在多项选择的一些应用中，可以用二进制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 '� ......
1.数值型函数： abs(num): 返回绝对值 sgn(num): num>0 1; num=0 0; num<0 -1;判断数值正负 hex(num): 返回十六进制值 直接表示：&Hxx 最大8位 oct(num): 返回八进制值 直接表示：&Oxx 最大8位 sqr(num): 返回平方根 num>0 int(num): 取整 int(99.8)=99; int(-99.2)=100 fix(num): 取整 fix(99.8)=99; fix(-99.2)=99 round(num,n): 四舍五入取小数位 round(3.14159,3)=3.142 中点数值四舍五入为近偶取整 round(3.25,1)=3.2 log(num): 取以e为底的对数 num>0 exp(n): 取e的n次幂 通常用 num^n sin(num): 三角函数，以弧度为值计算 (角度*Pai)/180=弧度 con(num); tan(num); atn(num)
2.字符串函数： len(str)：计算字符串长度 中文字符长度也计为一！ mid(str,起始字符,[读取长度])：截取字符串中间子字符串 left(str,nlen)：从左边起截取nlen长度子字符串 right(str,nlen)：从右边起截取nlen长度子字符串 Lcase(str)：字符串转成小写 Ucase(str)：字符串转成大写 trim(str)：去除字符串两端空格 Ltrim(str)：去除字符串左侧空格 Rtrim(str)：去除字符串右侧空格 replace(str,查找字符串,替代字符串,[起始字符,替代次数,比较方法])：替换字符串注：默认值 ......
<input type="submit" name=""byt id="byt" value="现金销售提交" >
例如：表单中有一个名为 byt 的按钮，要求网页打开1秒后，自动点击按钮，
方法：把如下代码加在</form>后。
<script language="javascript">
function window.onload()
{
setTimeout("document.form1.byt.click()",1000);//1 minute
}
</script>
其中，form1是表单名，byt 是按钮名 ......
1.在解决方案中添加新项目数据集-mydbDataSet.xsd，在数据集里添加所要用到的表或根据需要制作新表。
2.在设计页面中拉入一个MicrosoftReportViewer，设计新报表，按照报表向导根据自己的需要选择报表的数据源和数据项，完成新报表report1.rdlc的制作。在源码中如下（“考核成绩”为数据集中的一个表）
<rsweb:ReportViewer ID="ReportViewer1" runat="server" Font-Names="Verdana"
Font-Size="8pt" Height="400px" Width="930px">
<LocalReport ReportPath="Report1.rdlc">
<DataSources>
<rsweb:ReportDataSource DataSourceId="ObjectDataSource1"
......
最新文章 : asp