自定义博客皮肤VIP专享

*博客头图:

格式为PNG、JPG,宽度*高度大于1920*100像素,不超过2MB,主视觉建议放在右侧,请参照线上博客头图

请上传大于1920*100像素的图片!

博客底图:

图片格式为PNG、JPG,不超过1MB,可上下左右平铺至整个背景

栏目图:

图片格式为PNG、JPG,图片宽度*高度为300*38像素,不超过0.5MB

主标题颜色:

RGB颜色,例如:#AFAFAF

Hover:

RGB颜色,例如:#AFAFAF

副标题颜色:

RGB颜色,例如:#AFAFAF

自定义博客皮肤

-+

saihoo(天涯)的专栏

编程无涯 网络作舟

  • 博客(10)
  • 收藏
  • 关注

原创 Tomcat禁止目录浏览

在tomcat的/conf/web.xml中将listings  改为false

2004-07-02 08:01:00 2253

原创 ASP对base64编码解码程序

针对邮件退信,内容进行解码!网上收集,具体出处不详!                                                                     sBASE_64_CHARACTERS = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/" sBASE_64_CHAR

2004-06-26 14:36:00 995 2

原创 IP地址限制函数

获取访问者的地址ip=Request.ServerVariables("REMOTE_ADDR") 允许的IP地址段为10.0.0.0~10.68.63.255allowip1="10.0.0.0"allowip2="10.68.10.71" response.write checkip(ip,allowip1,allowip2) function checkip(ip,allowip1,a

2004-06-25 11:36:00 1368

原创 Asp生成系形码

Asp生成系形码*         {font:menu}--> 条形码生成程序海娃@2004-4-4http://www.51windows.Netfunction haiwaocde(zfstr) zf = zfstr zf = replace(zf,"0","_|_|__||_||_|") zf = replace(zf,"1","_||_|__|_|_||") zf = replac

2004-06-25 11:11:00 761

原创 精华ASP代码(CSDN)

1.  oncontextmenu="window.event.returnvalue=false"      将彻底屏蔽鼠标右键    no   可用于Table 2.                   取消选取、防止复制 3.  onpaste="return false"                                        不准粘贴 4.  oncopy="ret

2004-06-25 11:09:00 609

原创 隔行显示

i=1do while not rs.eofif i mod 2=0 then显示一种颜色的信息else显示其它的end ifrs.movenexti=i+1loop

2004-06-25 10:55:00 710

原创 asp生成图片

//一个最简单的例子 //可广泛应用于计数器、时钟等任何需要动态生成图形的地方 //通过改变ContentType的值,比如改为 "image/gif"可以作出更漂亮的图形 Response.ContentType ="image/x-xbitmap"; Response.Write ("#define counter_width 8/r/n");  //图形宽 Response.Write

2004-06-25 10:53:00 2570 1

原创 ASP设计常见问题及解答精要

作为微软推出的网页与数据库解决方案,ASP由于有微软得天独厚的操作系统等技术后盾支持,因此得到了迅速的发展,并且正受到越来越多的欢迎,在目前在电子商务网站的建设中有很多都使用ASP来编写程序。   近来有很多的读者向我们咨询学习ASP的方法和在学习中遇到的一些问题,其中有一些是初学者经常遇到和面临的问题。为了让读者在学习ASP的过程中加深对ASP的了解,并能够有效地解决遇到的问题,我们特别收集了比

2004-06-25 10:51:00 947 1

原创 解决从XXX开始,屏蔽以后的字符串的三种方法

str="用户名:xxx密码:ddd"str1="d"function restr(str, str1)if instr(str, str1) = 0 then exit functionrestr = left(str, instr(str, str1) - 1 + len(str1))end functiondocument.write restr(str, str1)//--> str="用

2004-06-25 10:49:00 1011

原创 防止重复提交数据

if DateDiff("s",session("tjtime"),now())   session("tjtime")=now()   response.write "" & chr(13) & "alert(请在5秒之内不要重复发言。!);" & "history.back(-1)" & ""   response.End()end ifsession("tjtime")=now()

2004-06-25 10:42:00 942 2

空空如也

空空如也

TA创建的收藏夹 TA关注的收藏夹

TA关注的人

提示
确定要删除当前文章?
取消 删除