asp在线解压缩
除非您以系统帐户的身份登陆到服务器（在浏览器环境中也是可以实现），或者主机端进行了良好的权限配置，否则本文涉及的功能是很难实现的。因为我们通过iis访问某个页面时，一般是iis匿名帐户的身份，在大多数情况下，asp的WScript.Shell是被禁用的，因为它有很大的安全隐患。
要想实现这种功能，首先要得到Rar程序的解压缩核心文件支持（可以下载WinRar软件，再把其中的WinRar.exe文件单独“拿”出来。），并且还需要Windows操作系统自带的cmd.exe程序（这个程序用来执行WinRar.exe文件。操作系统自带的，NT内核的操作系统可以在操作系统安装目录下的System32文件夹下找到它；Windows 9X的操作系统可以在操作系统安装目录下的System文件夹下找到它。）。然后把它们上传到同一目录中。建立asp文件，见以下代码：
<%
Dim a,b,Main,Shell,Runing,Runcode,Cmd,comm,fso
Main="d:\chencheng\rar\" `上传后Winrar.exe和cmd.exe后的路径。
a=Server.mappath("rar")&"\" ''解压rar文件后的存放路径。
b=Server.mappath("rar\homepage.rar") ''要解压的rar文件，把其中homepage.rar修改为需要解压缩的文件。
Set Shell = Server.CreateObject("WScript.Shell")
Runing= "d:\chencheng\rar\cmd.exe /c "&Main&"Winrar.exe x -t -o+ -p- " ’设置运行解压缩的命令。
Cmd=Run&b&" "&a
Runcode = Shell.Run(Cmd,1, True)
%>
相关文档：
升华提供终身免费ASP+access PHP+mysql虚拟主机
一：升华网络科技有限公司,与升华同在站长终身免费空间扶持计划.
1、尊敬的用户您好,也许您还在为每年一交的空间费用发愁,也许您想获得一个更优质的空间却不想投入太多,从现在起 这些问题将迎刃而解→升华网络←与升华同在站长扶持计划全面启动。
2、没有注册公司 ......
随 着网站访问量的加大，每次从数据库读取都是以效率作为代价的，很多用ACCESS作数据库的更会深有体会，静态页加在搜索时，也会被优先考虑。互联网上流 行的做法是将数据源代码写入数据库再从数据库读取生成静态面，这样无形间就加大了数据库。将现有的ASP页直接生成静态页，将会节省很多。
下面的例子是将、index.asp?i ......
<!--#include file="conn.asp"-->
<!--#include file="inc/head.asp"-->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="zh-cn" lang="zh-cn" xmlns:q ......
<%
'以下部分是验证提交的page是否为合法的参数
'这部分最好判断一下提交的参数是否为数值字符
dim page
page=Trim(request("page"))
If page="" Then
page=1
Elseif CInt(page)<=0 then
page=1
else
page=CInt(page)
End If
'进行查询，取出要显示的记录
str=rs1("content")
'把出 ......
