开发者社区> 科技小能手> 正文
阿里云
为了无法计算的价值
打开APP
阿里云APP内打开

Asp编程中的一些重要函数(1)

简介:
+关注继续查看
   本文将Asp编程中的一些常用的函数进行了归纳和总结,这些函数在程序中都是经常用到的,例如打开一个新的窗体,关闭窗体,文中进行注释等等。欢迎有兴趣的朋友一起来完善。
(1)打开一个窗体
<script language="JavaScript">
<!--
function openWindow(topic) {
 window.open("xxxx.asp",topic,"width=600,height=380,scrollbars=yes");
}
//-->
</script>
(2)弹出命令,并指向一个新的页面
response.write"<SCRIPT language=JavaScript>alert('用户"&uname&"成功退出登录,正在返回首页!');"
response.write"this.location.href='./';</SCRIPT>"  %>
response.write"<SCRIPT language=JavaScript>alert('用户"&firm_username&"资料修改成功!');"
response.write"this.location.href='index.asp';</SCRIPT>"  %>
(3)关闭窗口
response.write"<SCRIPT language=JavaScript>alert('新闻添加成功!');"
response.write"javascript:window.close();</SCRIPT>"%>
<a href="javascript:window.close()"><font size="3">[关闭窗口]</font></a>
[<a href="javascript:window.close()">关闭窗口</a>]
(4)在项目中加入注释
<!--
/*****************************************************************
 * Project Name: 
 * Version:  1.0.1
 ***************************************************************** 
 * Copyright (c) 2003 *********. All Rights Reserved.
 *
 ***************************************************************** 
 * Maintain Logs Time   Author Comments
 *----------------------------------------------------------------
 *   1   2004-02-09 21:43 ****** for Ver1.0.1
 *----------------------------------------------------------------
 *****************************************************************
 */
-->
(5)取得表单提交的所有数据
<% For Each x In Request.Form %>
Request.Form( <%= x %> ) = <%= Request.Form(x) %> <BR>
<% Next %>

<%
For i = 1 To Request.Form("inputname").Count
  Response.Write Request.Form("inputname")(i) & "<BR>"
Next
%>
(6)限制某个段的IP地址
function IP2Num(sip)
 dim str1,str2,str3,str4
 dim num
 IP2Num=0
 if isnumeric(left(sip,2)) then
  str1=left(sip,instr(sip,".")-1)
  sip=mid(sip,instr(sip,".")+1)
  str2=left(sip,instr(sip,".")-1)
  sip=mid(sip,instr(sip,".")+1)
  str3=left(sip,instr(sip,".")-1)
  str4=mid(sip,instr(sip,".")+1)
  num=cint(str1)*256*256*256+cint(str2)*256*256+cint(str3)*256+cint(str4)-1
  IP2Num = num
 end if
end function
function Num2IP(nip)
 iip1 = int(nip/256/256/256)
 iip2 = int((nip-iip1*256*256*256)/256/256)
 iip3 = int((nip-iip1*256*256*256-iip2*256*256)/256)
 iip4 = int((nip-iip1*256*256*256-iip2*256*256-iip3*256) mod 256)
 iip0 = iip1 &"."& iip2 & "." &iip3 &"."& iip4
 Num2IP = iip0
end function
userIPnum = IP2Num(Request.ServerVariables("REMOTE_ADDR"))
if userIPnum > IP2Num("192.168.0.0") and userIPnum < IP2Num("192.168.0.255") then
 response.write ("<center>您的IP被禁止</center>")
 response.end
end if
(7)获取真实的IP地址
function GetIp()
 dim realip,proxy
 realip = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
 proxy = Request.ServerVariables("REMOTE_ADDR")
 if realip = "" then
  GetIp = proxy
 else
  GetIp = realip
 end if
end function


 本文转自 simeon2005 51CTO博客,原文链接:http://blog.51cto.com/simeon/9664

版权声明:本文内容由阿里云实名注册用户自发贡献,版权归原作者所有,阿里云开发者社区不拥有其著作权,亦不承担相应法律责任。具体规则请查看《阿里云开发者社区用户服务协议》和《阿里云开发者社区知识产权保护指引》。如果您发现本社区中有涉嫌抄袭的内容,填写侵权投诉表单进行举报,一经查实,本社区将立刻删除涉嫌侵权内容。

相关文章
asp.net最常用的三十三种编程代码
asp.net最常用的三十三种编程代码      1. 打开新的窗口并传送参数:      传送参数:      response.write("window.
788 0
[转贴]ASP.NET程序中常用编程代码
1、绑定在DataList中的DropDownList   private void dlistOrder_EditCommand(object source, System.Web.UI.WebControls.
2672 0
ASP.NET自定义控件组件开发 第一章 第三篇
原文:ASP.NET自定义控件组件开发 第一章 第三篇                                             第三篇:第一章的完结篇     系列文章链接: ASP.
889 0
ASP.NET自定义控件组件开发 第一章 第二篇 接着待续
原文:ASP.NET自定义控件组件开发 第一章 第二篇 接着待续      ASP.NET自定义控件组件开发 第一章 第二篇 接着待续     很感谢大家给我的第一篇ASP.NET控件开发的支持!在写这些之前,我也看了一些例子,想选中一些好上手的例子,这样,可能一些例子大家以前都见过,但是我想说:同样是弹钢琴,同样一首“命运交响曲”,有的人弹的让人荡气回肠,有的人弹的就很一般。
922 0
一起谈.NET技术,asp.net控件开发基础(10)
  集合属性相信大家都很熟悉也很常用,如DropDownList,ListBox等控件             测试1            测试2            测试3           1.实现集合属性效果   经过前面几篇的学习,相信这一篇看起来已经相对简单了.我们要做的就是,先定义一个复杂属性,然后用迭代语句获取数组数据即可。
772 0
文章
问答
文章排行榜
最热
最新
相关电子书
更多
低代码开发师(初级)实战教程
立即下载
阿里巴巴DevOps 最佳实践手册
立即下载
冬季实战营第三期:MySQL数据库进阶实战
立即下载