我能'；t将asp.net VB与SQL Server连接

我曾尝试将asp.net Webform aspx.vb与sql server连接，但问题是，当我将此代码

Dim cn作为新的SqlConnection（con）

编写时，它在

con

上出错，我试图找出它不起作用的原因

错误消息

con未声明它可能无法访问到其保护级别

我的Web.config代码

<connectionStrings>
  <add name="connection"
  connectionString="Data Source=HOUCHANDARA;Initial Catalog=website;Integrated Security=True"
  providerName="System.Data.SqlClient" />
</connectionStrings>

我的aspx.vb代码

Imports System.Data.SqlClient

Public Class HomePage
  Inherits System.Web.UI.Page

  Protected Sub Page_Load(ByVal sender As Object, ByVal e As EventArgs) Handles Me.Load
    Dim cn As New SqlConnection(con)
    If Not IsPostBack Then
      Try
        cn.Open()
        MsgBox("connect")
      Catch ex As Exception
        MsgBox("faild")
      End Try
    End If
  End Sub
End Class

使用

除此之外，请注意，它也是缓存的。因此，使用“全局”变量不会带来性能提升。您还应该为连接使用

Using

-语句，以确保即使出现错误也能尽快释放/关闭连接。

使用

除此之外，请注意，它也是缓存的。因此，使用“全局”变量不会带来性能提升。您还应该为连接使用

Using

-语句，以确保即使出现错误也能尽快释放/关闭连接。

使用

除此之外，请注意，它也是缓存的。因此，使用“全局”变量不会带来性能提升。您还应该为连接使用

Using

-语句，以确保即使出现错误也能尽快释放/关闭连接。

使用

---

---

除此之外，请注意，它也是缓存的。因此，使用“全局”变量不会带来性能提升。您还应该为连接使用

Using

-语句，以确保即使出现错误也能尽快处理/关闭连接。

包括您在con上收到的错误消息。一旦您确定了如何打开连接，您需要在代码中添加一个FINALLY块来关闭和销毁连接对象，以便释放连接连接回池。错误是？捕获异常而不显示错误消息有点无用。另外，请记住，在IIS上下文中运行此代码时，当前用户是用于启动IIS服务的用户。它需要有权限才能打开Sql Server“con”未声明它可能无法访问到其保护级别我不是VB专家，但它不应该作为新的SqlConnection（Connection.con）使用包括您在con上收到的错误消息。一旦您知道如何打开连接，您需要在代码中添加一个FINALLY块来关闭和销毁连接对象，以便它将连接释放回池。错误是？捕获异常而不显示错误消息有点无用。另外，请记住，在IIS上下文中运行此代码时，当前用户是用于启动IIS服务的用户。它需要有权限才能打开Sql Server“con”未声明它可能无法访问到其保护级别我不是VB专家，但它不应该作为新的SqlConnection（Connection.con）使用包括您在con上收到的错误消息。一旦您知道如何打开连接，您需要在代码中添加一个FINALLY块来关闭和销毁连接对象，以便它将连接释放回池。错误是？捕获异常而不显示错误消息有点无用。另外，请记住，在IIS上下文中运行此代码时，当前用户是用于启动IIS服务的用户。它需要有权限才能打开Sql Server“con”未声明它可能无法访问到其保护级别我不是VB专家，但它不应该作为新的SqlConnection（Connection.con）使用包括您在con上收到的错误消息。一旦您知道如何打开连接，您需要在代码中添加一个FINALLY块来关闭和销毁连接对象，以便它将连接释放回池。错误是？捕获异常而不显示错误消息有点无用。另外，请记住，在IIS上下文中运行此代码时，当前用户是用于启动IIS服务的用户。它需要有权限才能打开Sql Server“con”未声明它可能无法访问到它的保护级别我不是VB专家，但它不应该作为新的SqlConnection（Connection.con）

Imports System.Data.SqlClient

Public Class HomePage
  Inherits System.Web.UI.Page

  Protected Sub Page_Load(ByVal sender As Object, ByVal e As EventArgs) Handles Me.Load
    Dim cn As New SqlConnection(con)
    If Not IsPostBack Then
      Try
        cn.Open()
        MsgBox("connect")
      Catch ex As Exception
        MsgBox("faild")
      End Try
    End If
  End Sub
End Class

Dim cn As New SqlConnection(Connection.con)