摘要: 1.服务器端缓存 ListBox=Application("ListBox") If ListBox<>"" then Response.Write "本次通过服务器缓存读取数据:<BR>" End If If ListBox="" then Response.Write "本次为第一次读取数据,从数据库中读取:<BR>" Response.Write "另外打... 阅读全文
posted @ 2010-10-17 15:45 龙圆 阅读(437) 评论(0) 推荐(0) 编辑
摘要: Set Jpeg = Server.CreateObject("Persits.Jpeg") Path = Server.MapPath("images/sogou.gif") Jpeg.Open Path ' 设置缩略图大小(这里比例设定为50%) Jpeg.Width = Jpeg.OriginalWidth / 2 Jpeg.Height = Jpeg.OriginalHeight / 2 阅读全文
posted @ 2010-10-17 15:17 龙圆 阅读(4255) 评论(0) 推荐(0) 编辑