IIS 7 应用程序池自动回收关闭的解决方案

如果你正在做ASP.NET，那肯定会用到IIS

如果你想在ASP.NET Application中加入某个定时任务，那想必一定是用一个线程在不停地做定时计算

那假设我们在自己的ASP.NET应用程序中加入了Quartz.NET框架，并且配置等等都OK了。

这个站点访问量很少，现在只有几个人上班的时候才会使用，结果第二天过来一看，后台调度的线程和计算任务都停止了，如果你抓取了Application_End事件，会发现这个事件居然被调用了。

那一定是IIS的应用程序池回收的机制在作怪了。因为IIS的默认设置里面，如果一个站点所处的应用程序池超过一段时间没有被访问或者请求，IIS就会自动回收这个程序池，并且把进程杀掉。那进程里面的线程肯定也活不下来了。

但是我们可以通过设置应用程序池参数使其不会被简单的自动回收（有些情况无法避免，比如热部署的站点，错误数量超限等等）

在IIS中找到这个站点所用的程序池，点击“高级设置...”

在打开的列表中更改以下设置：

回收——固定时间间隔（分钟） 改为 0

——虚拟/专用内存限制（KB） 改为 0

进程模型——闲置超时（分钟） 改为 0

这样子，一般情况下程序池就不会被自动回收了，后台一些简单的计算线程就会正常工作

我的网站有大量用户数据交换，需要保存很多临时数据，所以为了使网站更快，我用到很多 Application，但是很多时候莫明其妙的Application 数据丢失了，使得网站无法再保证正确运行，在网站搜了好多久，大家说是因为应用程序池被收回了，所在我想，主动按一定时间在服务器自动回收之前用我做个程序回收，保证Application数据不丢失，请高手写出完整asp代码，如果问题得到很好的解决，我可以考虑付您人民币

如果这样asp 页面不能实现，请给我一个很好解决Application 数据丢失的问题，Application 必须要用，用数据库解决的话网站太慢了

首先要给WScript.Shell权限，因为这个组件太危险，所以一般情况是禁止的，如果定时执行回收进程池可以计划任务中添加指定时间激发一个IIS.vbs(回收进程)

IIS.vbs代码如下
set WebAppPool = GetObject("IIS://LocalHost/w3svc/AppPools/DefaultAppPool")
WebAppPool.Stop
WebAppPool.Start
set WebAppPool=Nothing

网站由于使用比较多的缓存，有时会出现缓存错误，导致程序异常，这个时候需要回收一个应用程序池就可以了。
以前每次都是通过远程桌面连接到服务器，然后在应用程序池上右击》回收，感觉比较麻烦，于时找了如下的一个办法来实现。
其实就是普通的一个asp.net页面，加上一个按钮，进行回收，主要程序如下：

1
2 protected void StartStopRecycleApp(string method)
3 {
4 string AppPoolName = this.tbAppName.Text.Trim();
5 //string method = "Recycle";
6
7 try
8 {
9 DirectoryEntry appPool = new DirectoryEntry("IIS://localhost/W3SVC/AppPools");
10 DirectoryEntry findPool = appPool.Children.Find(AppPoolName, "IIsApplicationPool");
11 findPool.Invoke(method, null);
12 appPool.CommitChanges();
13 appPool.Close();
14 lbMsg.Text = string.Format("应用程序池{0}{1}成功", AppPoolName,method);
15 }
16 catch (Exception ex)
17 {
18 lbMsg.Text = string.Format("应用程序池{0}{2}失败:{1}", AppPoolName, ex.Message,method);
19 }
20 }

tbAppName是一个textbox，用来输入应用程序池的名字，如“DefaultAppPool”。
当method="Recycle"时就是回收，为“Start”时是启动，为“Stop”时是停止。

注意：
1. 必须引入System.DirectoryServices包
2. 运行此程序的应用程序也的用户必须权限比较高，可以单独为此程序提供应用程序程，或者建立一个虚拟目录在配制里模拟高级用户（如administrators或者system），否则应用程序会抛出“拒绝访问”的异常。

应用程序池在使用一段时间后需要回收，想用程序来控制，就用vbs实现了以下代码，在asp上一样运行。

set apppools = GetObject("IIS://LocalHost/W3SVC/AppPools")
for each apppool in apppools
msgbox apppool.name
apppool.recycle
next

上面的程序在安装有iis的服务器上面运行，即可弹出所有的应用程序池，想回收指定的应用程序池，只需要判断相应的apppool.name即可。

后面是在网上(suntw.com)找到的相关操作iis的vbs脚本。
'设置应用程序池的属性
function SetAppPoolSetting(AppPoolName,Values)
SetAppPoolSetting=false
Set apps=GetObject("IIS://localhost/w3svc/AppPools/"&AppPoolName)
SetValue=split(Values,"|")
apps.CpuLimit=int(SetValue(1))*1000'最大CPU百分比
apps.CPUAction=SetValue(2)'超过处理方式0忽略1关闭
apps.PeriodicRestartMemory=int(SetValue(3))*1024'虚拟内存
apps.PeriodicRestartPrivateMemory=int(SetValue(4))*1024'物理内存
apps.PeriodicRestartTime=SetValue(5)'回收时间
apps.SetInfo
set apps=nothing
SetAppPoolSetting=true
end function

'创建一个池并设置属性
'================================================================
function CreateAppPool(NewAppPoolName)
Set AppPools = GetObject("IIS://localhost/W3SVC/AppPools")
set NewPool = AppPools.Create("IIsApplicationPool", NewAppPoolName)
NewPool.AppPoolIdentityType = 2'预定义账户0本地系统1本地服务2网络服务
NewPool.PeriodicRestartMemory = 512 * 1000 '最大虚拟内存使用值
NewPool.PeriodicRestartPrivateMemory = 500 * 1000 '500物理内存限制'
NewPool.CPUAction = 0'超过CPU不操作，1就是超过cpu就关闭。
NewPool.CPULimit = "80000"'最大80%的CPU
NewPool.PeriodicRestartTime = 180'内存回收时间(分钟)
NewPool.CPUResetInterval = 2'刷新CPU使用率值(分钟)
NewPool.AppPoolAutoStart = true'自动启动此池
NewPool.SetInfo
Set AppPools = nothing
set NewPool = nothing
if err.number=0 then CreateAppPool=true
end function