http://blog.sina.com.cn/goodast[订阅][手机订阅]
个人资料
精品博文
分类
    内容读取中…
评论
读取中...
友情链接
音乐播放器
图片幻灯
公告
由于本人很少看留言,想与我联系的朋友请加我QQ:275775630
访客
读取中...
好友
读取中...
博文

使用ASP在IIS创建WEB站点的函数
程序代码:

''==========================================================''函数介绍:创建WebSite
''本函数使用ADSI,需要Administrators组用户权限
''函数名称:CreateWebSite(Computer,IPAddr,PortNum,HostName,WebSiteDirectory,LogDirectory,WebSiteInfo,GuestUserName,GuestUserPass,StartOrStop)
''用法:CreateWebSite 计算机名(一搬为LocalHost或127.0.0.1),站点IP地址,端口号,主机名,站点根目录,,LOG文件的目录站点说明,网站访问时所使用的帐号,网站访问时所用帐号的口令,是否启动站点
''例:CreateWebSite 'LocalHost','127.0.0.123','80','www.test.net','E:UserDataUserNum001','E:UserDataUserNum001LogFiles','CnKnow.Com','IUSR_Num001_test.net','abc888',True
''==================================================Function CreateWebSite(Computer,IPAddr,PortNum,HostName,WebSiteDirectory,LogDirectory,WebSiteInfo,GuestUserName,GuestUserPass,StartOrStop)
Dim w3svc, WebServer, NewWebServer, NewDir
Dim Bindings, BindingString, NewB

js获取页面各种高度(2009-11-17 00:21)

网页可见区域宽:document.body.clientWidth; (这个没有搞明白!)
网页可见区域高:document.body.clientHeight;
网页可见区域高:document.body.offsetWidth   (包括边线的宽);
网页可见区域高:document.body.offsetHeight (包括边线的宽);
网页正文全文宽:document.body.scrollWidth;
网页正文全文高:document.body.scrollHeight;
网页被卷去的高:document.body.scrollTop;
网页被卷去的左:document.body.scrollLeft;
网页正文部分上:window.screenTop;
网页正文部分左:window.screenLeft;
屏幕分辨率的高:window.screen.height;
屏幕分辨率的宽:window.screen.width;
屏幕可用工作区高度:window.screen.availHeight;
屏幕可用工作区宽度:window.screen.availWidth;

ASP加图片水印(2009-11-05 22:41)

<%
'利用AspJpeg组件给上传图片自动加水印,在使用该组件前请测试你的服务器是否支持。
'在你的上传文件(如:upfilea.asp)中加入以下代码:

'程序代码
Dim Jpeg'' 水印部分代码开始
Set Jpeg = Server.CreateObject('Persits.Jpeg')
Jpeg.Open Server.MapPath(FileName) '获取图片,根据实际情况更改
Jpeg.Canvas.Font.Color = &330066'' 绿色'' '设置文字水印颜色
Jpeg.Canvas.Font.Family = '宋体'                '设置文字字体
Jpeg.Canvas.Font.Size = 12                        '设置字体大小
Jpeg.Canvas.Pen.Width = 2                        '画笔宽度
Jpeg.Canvas.Font.Quality = 1    &nbs

今天在写程序的时候。一不小心造成了我的程序陷入的死循环,导致了浏览器报错误如下:错误“ASP 0251 :80004005 超过响应缓冲区”。现在通过总结一下来阐述产生这样的原因。
      从错误的提示我们不难看出,之所以错误的原因很明显是我们的内存缓冲区已经不够用了。在IIS5.0以后缓冲区默认都是打开的。那么造成这个错误的原因是什么呢?我想总的来说可以有以下三点,第一,程序员也就是你自己将你的缓冲区设置的太小,这个错误的可能性很小;第二,就是你的网页确实很大,已经超过了默认的大小200k,这种可能想也不大,因为很少有网页能够超过200k的,但是也不排除例外,如果真是这样的情况的话,并且您又使用缓冲那么就需要扩大缓冲区的大小了;第三,就是您的程序出现了问题例如死循环,造成你的网页太大。
      针对上面的原因我们可以采取两种方法来改正这些错误
       第一种,打开c:\windows\system32\inesrv\下的metabase.xml来看,搜索Buffer,一共找到四个,借助金山词霸确定 是572行的AspBufferingLimit='4194304',换算了一下是4096(4M),于是将测试下载的

现代的浏览器IE6和Firefox都支持客户端Gzip,也就是说,在服务器上的网页,传输之前,先使用Gzip压缩再传输给客户端,客户端接收之后由浏览器解压显示,这样虽然稍微占用了一些服务器和客户端的CPU,但是换来的是更高的带宽利用率。对于纯文本来讲,压缩率是相当可观的。如果每个用户节约50%的带宽,那么你租用来的那点带宽就可以服务多一倍的客户了。

IIS 6.0中配置HTTP Gzip压缩的步骤:

1) 打开Internet信息服务(IIS)管理器,右击”网站”->”属性”,选择”服务”。在”HTTP压缩”框中选中”压缩应用程序文件”和”压缩静态文件”,按需要设置”临时目录”和”临时目录的最大限制”;

2) 在Internet信息服务(IIS)管理器,右击”Web服务扩展”->”增加一个新的Web服务扩展…”,在”新建Web服务扩展”框中输入扩展名”HTTPCompression”,添加”要求的文件”为C:\WINDOWS\system32\inetsrv\gzip.dll,其中 Windows系统目录根据您的安装可能有所不同,选中”设置扩展状态为允许”;

这时候静态内容是可以压缩的,但是对于动态内容,aspx文件却不在压缩范围内。因为默认的可压缩文件并没有这个扩展名。

文件兼容性用于定义让IE如何编译你的网页。此文件解释文件兼容性,如何指定你网站的文件兼容性模式以及如何判断一个网页该使用的文件模式。

前言
为了帮助确保你的网页在所有未来的IE版本都有一致的外观,IE8引入了文件兼容性。在IE6中引入一个增设的兼容性模式,文件兼容性使你能够在IE呈现你的网页时选择特定编译模式。
新的IE为了确保网页在未来的版本中都有一支的外观,IE8引入了文件兼容性。当你引入一个增设的兼容性模式,
此文章说明文件兼容性的必要性,列出现有版本IE能使用的文件兼容性模式并示范如何选择特定的兼容性模式。


了解文件兼容性的必要性

每个主要版本IE新增的功能都是为了让浏览器更容易使用、增加安全性及更支持业界标准。以这些作为IE的特色,其中一个风险就是旧版本网站无法正确的显示。

为了将这个风险降到最低,IE6允许网页开发人员选择IE编译和显示他们网页的方式。'Quirks mode'为预设,这会使页面以旧版本浏览器的视点显示,'Standards mode'(也称为'strict mode')特点是支持业界标准最为完善。然而要利用这个增强的支持功能,网页必须包含恰当的<!DO

1.概念

Cache-control用于控制HTTP缓存(在HTTP/1.0中可能部分没实现,仅仅实现了Pragma: no-cache)

数据包中的格式:

Cache-Control: cache-directive

cache-directive可以为以下:

request时用到:

 | 'no-cache' | 'no-store' | 'max-age' '=' delta-seconds | 'max-stale' [ '=' delta-seconds ] | 'min-fresh' '=' delta-seconds | 'no-transform' | 'only-if-cached' | 'cache-extension' 

response时用到:

 | 'public' | 'private' [ '=' <'> field-name <'> ] | 'no-cache' [ '=' <'> field-name <'> ] | 'no-store' | 'no-transform' | 'must-ridate' | 'proxy-ridate' | 'max-age' '=' delta-seconds | 's-maxage' '=' delta-seconds | 'cache-extension' 
 部分说明: 根据是否可缓存分为 Public  指示响应可被任何缓存区缓存。 Private  指示对于单个用户的整个或部分响应消息,不能被共享缓存处理。这允许服务器仅仅描述当用户的 部分响应消息,此响应消息对于其他用户的请求无效。 no-cache 

 <%
' Set Expires Header in minutes
Function SetExpiresHeader(ByVal minutes)
    ' set Page Last-Modified Header:
    ' Converts date (19991022 11:08:38) to http form (Fri, 22 Oct 1999 12:08:38 GMT)
    Response.AddHeader 'Last-Modified', DateToHTTPDate(Now())
   
    ' The Page Expires in Minutes
    Response.Expires = minutes
   
    ' Set cache control to externel applications
    Response.CacheControl = 'public'
End Function
' Converts date (19991022 11:08:38) to http form (Fri, 22 Oct 1999 12:08:38 GMT)
Function DateToHTTPDate(ByVal OleDATE)
  Const GMTdiff = #08:00:00#
  OleDATE = OleDATE - GMTdiff
  DateToHTTPDate = engWeekDayName(OleDATE) & _
    ', ' & Right('0' & Day(OleDATE),2) &

header如何缓存ASP文件(2009-09-15 18:05)

1.缓存ASP文件

Response.Buffer = True

当属性值为True时,服务器将不会向客户端发送任何信息,直到所有程序执行完或者遇到
<% Response.Flush %>或<% Response.End %>
语句,才会释放缓冲区的信息。

Response.Flush()。他会将缓冲区中编译完成的数据先发送到客户端
但是
flush的内容至少要有256字节。也就是只有编译产生了至少256字节的数据,才能在执行Response.Flush()以后将信息发到客户端并显示。

Clear 方法
Clear 方法删除缓冲区中的所有 HTML 输出。Clear 方法只删除响应正文而不删除响应标题
语法
Response.Clear
注释
调用 Response.Clear 将清楚本页面前面部分所输出的数据,同时,如果程序设定了 Response.ContentEncoding,Response.Clear 将同时将编码方式设定为直接传送。
应用于Response 对象

 

2.不缓存ASP文件
Response.Buffer=false
Response.Expires=0
Response.ExpiresAbsolute = Now() - 1
Response.AddHeader 'Pragma','No-Cache'
Response.AddHeader 'Cache-Control','Private'

301重定向(2009-09-12 16:37)
Response.Status = '301 Moved Permanently'
Response.AddHeader 'Location',url