小叶白龙 博客小叶白龙 博客

 

 设置ASP缓存的几条重要语句技巧 

设置asp缓存的几个语句
1.application变量
一般采用缓存变量:application("变量名")=[变量值]
将这些语句放在网站根目录下的global.asa中即可取到全局变量。
2.Buffer
Buffer 属性指示是否缓冲页输出。当缓冲页输出时,只有当前页的所有服务器脚本处理完毕或者调用了 Flush 或 End 方法后,服务器才将响应发送给客户端。
服务器将输出发送给客户端后就不能再设置 Buffer 属性。因此,应该在 .asp 文件的第一行调用 Response.Buffer 。
语法
Response.Buffer [= flag]参数
flag
指定是否缓冲页输出,可为如下值之一。 值 说明

感兴趣?马上浏览全文...

 于 2012-03-06 17:00:47 发表  asp相关  浏览()  评论()  收藏这篇日志

 Server.ScriptTimeout最大值 

大部分出现该错误是rs.movenext忘记写了,但是也有一些是真的需要很大的缓冲资源,解决方法如下。
设置Response.Buffer = False

服务器如下设置:
我的电脑-控制面板-管理工具-服务-找到iis admin service 关闭
 

感兴趣?马上浏览全文...

 于 2012-03-04 02:42:04 发表  asp相关  浏览()  评论()  收藏这篇日志

 ASP防采集代码-几招让你的网站免受采集之苦 

如今的采集系统是一个比一个NB,站长们辛苦收集制作的网站内容总是很快出现在在另一个网站上,一个网站轻易的就被复制了又复制。有办法既不影响搜索引擎的正常收入又能解决网站被采集之苦么?答案是肯定的。

最常用的防采集方法:

1.每个文章的命名不要有任何规律,比如你的文章是<%=id%>.htm的话,请在前面或后面生成个日期,如:20070911-1234.htm,前面的就是日期了,这样对采集新手来说是非常有效的。

感兴趣?马上浏览全文...

 于 2011-12-21 02:04:54 发表  asp相关  浏览()  评论()  收藏这篇日志

 ASP格式化显示时间为几分钟前或几秒前 

vb 代码
 
  1. Function DateStringFromNow(Byval sTheDate)
  2. ' 格式化显示时间为几个月,几天前,几小时前,几分钟前,或几秒前
  3.     Dim iSeconds, iMinutes, iHours, iDays

 

感兴趣?马上浏览全文...

 于 2011-12-13 14:54:54 发表  asp相关  浏览()  评论()  收藏这篇日志

 ASP数据库被挂马的编程处理方法 

数据库被挂马我相信很多人都碰到过。在这里,我讲下我处理的方法。

    第一步:为现有数据库做好备份。

    第二步:执行如下ASP文件,这样就可以去掉数据库当中的JS木马:

    注:conn.asp自己去写了。

    '这里放入JS木马内容:请记得改为自己数据库中的JS木马内容。

    <!--#include file="conn.asp"-->

感兴趣?马上浏览全文...

 于 2011-12-05 13:49:56 发表  asp相关  浏览()  评论()  收藏这篇日志

 asp 获取汉字第一个字母(可多汉字) 

vb 代码
 
  1. function getchar(char)
  2. charobj=65536+asc(char)
  3. if(charobj>=45217 and charobj<=45252) then 
  4. getchar= "A"
  5. elseif(charobj>=45253 and charobj<=45760) then
  6. getchar= "B"
  7. elseif(charobj>=45761 and charobj<=46317) then
  8. getchar= "C"
  9. elseif(charobj>=46318 and charobj<=46825) then
  10. getchar= "D"
  11. elseif(charobj>=46826 and charobj<=47009) then 
  12. getchar= "E"
  13. elseif(charobj>=47010 and charobj<=47296) then 
  14. getchar= "F"
  15. elseif(charobj>=47297 and charobj<=47613) then 
  16. getchar= "G"
  17. elseif(charobj>=47614 and charobj<=48118) then
  18. getchar= "H"
  19. elseif(charobj>=48119 and charobj<=49061) then
  20. getchar= "J"
  21. elseif(charobj>=49062 and charobj<=49323) then 
  22. getchar= "K"
  23. elseif(charobj>=49324 and charobj<=49895) then 
  24. getchar= "L"
  25. elseif(charobj>=49896 and charobj<=50370) then 
  26. getchar= "M"
  27. elseif(charobj>=50371 and charobj<=50613) then 
  28. getchar= "N"
  29. elseif(charobj>=50614 and charobj<=50621) then 
  30. getchar= "O"
  31. elseif(charobj>=50622 and charobj<=50905) then
  32. getchar= "P"
  33. elseif(charobj>=50906 and charobj<=51386) then 
  34. getchar= "Q"
  35. elseif(charobj>=51387 and charobj<=51445) then 
  36. getchar= "R"
  37. elseif(charobj>=51446 and charobj<=52217) then 
  38. getchar= "S"
  39. elseif(charobj>=52218 and charobj<=52697) then 
  40. getchar= "T"
  41. elseif(charobj>=52698 and charobj<=52979) then 
  42. getchar= "W"
  43. elseif(charobj>=52980 and charobj<=53640) then 
  44. getchar= "X"
  45. elseif(charobj>=53689 and charobj<=54480) then 
  46. getchar= "Y"
  47. elseif(charobj>=54481 and charobj<=62289) then
  48. getchar= "Z"
  49. else 
  50. getchar=char
  51. end if
  52. end function

 

感兴趣?马上浏览全文...

 于 2011-11-29 19:01:24 发表  asp相关  浏览()  评论()  收藏这篇日志

 ASP实例:解决ASP图像上传漏洞 

const adTypeBinary=1

dim jpg(1):jpg(0)=CByte(&HFF):jpg(1)=CByte(&HD8)
dim bmp(1):bmp(0)=CByte(&H42):bmp(1)=CByte(&H4D)
dim png(3):png(0)=CByte(&H89):png(1)=CByte(&H50):png(2)=CByte(&H4E):png(3)=CByte(&H47)
dim gif(5):gif(0)=CByte(&H47):gif(1)=CByte(&H49):gif(2)=CByte(&H46):gif(3)=CByte(&H39):gif(4)=CByte(&H38):gif(5)=CByte(&H61)

感兴趣?马上浏览全文...

 于 2011-11-18 00:22:17 发表  asp相关  浏览()  评论()  收藏这篇日志
成员登录通道
正在载入成员登录通道...
BLOG 日历助手
正在载入日历助手...
BLOG 统计信息
正在载入统计信息...
BLOG 日志归档
BLOG 最新评论
{$SideComment}
BLOG 最新留言
{$SideGB}
BLOG 站内搜索

BLOG 友情链接

Copyright © 2009-2012 xiaoyebailong.com. All Rights Reserved.

程序运行时间:毫秒
京ICP备09037676号