VB+ASP+MySQL如何检测存在的MySQL空闲打开连接？

嘿，这个问题我太有共鸣了！维护老ASP/ASP.NET混合栈的站点时，数据库连接泄漏简直是噩梦——尤其是没法改MySQL连接上限的情况下。下面给你几个实用的方法，帮你精准检测那些“躺平”的空闲MySQL连接：

这是最直接的方式，不管你用什么客户端（比如MySQL Workbench、Navicat，甚至通过ASP/ASP.NET执行命令），都能拿到最真实的连接状态：

• 执行基础进程列表查询：

  SHOW PROCESSLIST;
  

  或者想看完整的查询语句用：

  SHOW FULL PROCESSLIST;
  

  重点看这几列：

  • State：标记为Sleep的就是空闲连接
  • Time：该连接处于空闲状态的秒数，数值越大说明闲置越久
  • Info：空闲连接这里会是空值（或者NULL）

• 如果你想直接过滤出闲置超过N秒的连接（比如5分钟=300秒），用这个查询：

  SELECT id, user, host, db, time, state 
  FROM information_schema.processlist 
  WHERE state = 'Sleep' AND time > 300;
  

你可以写一个简单的ASP页面，放在网站后台（记得加权限控制，别暴露给外人），随时查看当前MySQL连接状态：

<%
' 替换成你的MySQL连接字符串
Dim connStr : connStr = "Driver={MySQL ODBC 8.0 Unicode Driver};Server=你的服务器;Database=你的库;User=用户名;Password=密码;Option=3;"

Set conn = Server.CreateObject("ADODB.Connection")
conn.Open connStr

' 执行进程列表查询
Set rs = conn.Execute("SHOW FULL PROCESSLIST")

' 输出表格展示结果
Response.Write "<html><head><title>MySQL连接状态检测</title></head><body>"
Response.Write "<h3>当前MySQL连接列表</h3>"
Response.Write "<table border='1' cellpadding='4'>"
Response.Write "<tr><th>连接ID</th><th>用户</th><th>主机</th><th>数据库</th><th>空闲时间(秒)</th><th>状态</th><th>执行语句</th></tr>"

Do While Not rs.EOF
    Response.Write "<tr>"
    Response.Write "<td>" & rs("Id") & "</td>"
    Response.Write "<td>" & rs("User") & "</td>"
    Response.Write "<td>" & rs("Host") & "</td>"
    Response.Write "<td>" & rs("db") & "</td>"
    Response.Write "<td>" & rs("Time") & "</td>"
    Response.Write "<td>" & rs("State") & "</td>"
    Response.Write "<td>" & rs("Info") & "</td>"
    Response.Write "</tr>"
    rs.MoveNext
Loop

Response.Write "</table></body></html>"

' 别忘了关闭连接
rs.Close : Set rs = Nothing
conn.Close : Set conn = Nothing
%>

访问这个页面就能一目了然看到所有连接，轻松定位空闲的“漏网之鱼”。

如果你的ASP.NET部分用的是MySQL官方驱动（MySql.Data.MySqlClient），可以写一个后台监控页面，或者利用性能计数器辅助排查：

方式一：内嵌检测页面 #

<%@ Page Language="VB" %>
<%@ Import Namespace="MySql.Data.MySqlClient" %>
<script runat="server">
    Protected Sub Page_Load(sender As Object, e As EventArgs)
        ' 替换成你的连接字符串
        Dim connStr As String = "server=你的服务器;user id=用户名;password=密码;database=你的库;"
        
        Using conn As New MySqlConnection(connStr)
            conn.Open()
            Dim cmd As New MySqlCommand("SHOW FULL PROCESSLIST", conn)
            Dim reader As MySqlDataReader = cmd.ExecuteReader()
            
            ' 用GridView展示结果
            ProcessListGrid.DataSource = reader
            ProcessListGrid.DataBind()
            
            reader.Close()
        End Using
    End Sub
</script>
<!DOCTYPE html>
<html>
<head>
    <title>ASP.NET MySQL连接监控</title>
</head>
<body>
    <h3>MySQL连接状态一览</h3>
    <asp:GridView ID="ProcessListGrid" runat="server" AutoGenerateColumns="True" 
        CssClass="table table-bordered" />
</body>
</html>

方式二：利用Windows性能计数器 #

打开Windows的性能监视器，添加.NET Data Provider for MySQL下的计数器：

• NumberOfActiveConnections：当前活跃的连接数
• NumberOfIdleConnections：连接池中闲置的连接数
  这个可以帮你对比应用端连接池状态和MySQL端的空闲连接，判断是不是连接池配置或者代码泄漏导致的问题。

如果想找到是哪些页面/代码导致的连接泄漏，可以：

• 临时开启MySQL通用日志：记录所有连接的建立和执行语句，事后过滤出没有关闭连接的请求（注意别开太久，会生成大量日志）
• 自定义应用日志：在ASP/ASP.NET的连接打开和关闭处添加日志，比如在ASP里：

  ' 打开连接时记录
  Response.AppendToLog "打开连接：" & Now() & " - 页面：" & Request.ServerVariables("SCRIPT_NAME")
  ' 关闭连接时记录
  Response.AppendToLog "关闭连接：" & Now() & " - 页面：" & Request.ServerVariables("SCRIPT_NAME")
  

  然后在IIS的日志里查看哪些页面只有“打开”没有“关闭”，那大概率就是泄漏的源头！

小提示：检测到空闲连接后，重点排查代码里有没有遗漏conn.Close()（ASP）或者没正确使用Using语句（VB.NET）的情况——很多时候都是粗心忘了释放连接导致的。

内容的提问来源于stack exchange，提问作者Master Kongling