摘要:
1.服务器端缓存 ListBox=Application("ListBox") If ListBox<>"" then Response.Write "本次通过服务器缓存读取数据:<BR>" End If If ListBox="" then Response.Write "本次为第一次读取数据,从数据库中读取:<BR>" Response.Write "另外打... 阅读全文
摘要:
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
阅读全文