VB.NET SqlException.Server属性代码示例

OGeek|极客世界-中国程序员成长平台 › 门户 › 编程› VB.NET›VB.NET教程

原作者: [db:作者] 来自: [db:来源] 收藏邀请

本文整理汇总了VB.NET中System.Data.SqlClient.SqlException.Server属性的典型用法代码示例。如果您正苦于以下问题：VB.NET SqlException.Server属性的具体用法？VB.NET SqlException.Server怎么用？VB.NET SqlException.Server使用的例子？那么恭喜您, 这里精选的属性代码示例或许可以为您提供帮助。您也可以进一步了解该属性所在类System.Data.SqlClient.SqlException的用法示例。

在下文中一共展示了SqlException.Server属性的2个代码示例，这些例子默认根据受欢迎程度排序。您可以为喜欢或者感觉有用的代码点赞，您的评价将有助于我们的系统推荐出更棒的VB.NET代码示例。

示例1: ShowSqlException

Public Sub ShowSqlException(ByVal connectionString As String)
    Dim queryString As String = "EXECUTE NonExistantStoredProcedure"
    Dim errorMessages As New StringBuilder()

    Using connection As New SqlConnection(connectionString)
        Dim command As New SqlCommand(queryString, connection)

        Try
            command.Connection.Open()
            command.ExecuteNonQuery()

        Catch ex As SqlException
            Dim i As Integer
            For i = 0 To ex.Errors.Count - 1
                errorMessages.Append("Index #" & i.ToString() & ControlChars.NewLine _
                    & "Message: " & ex.Errors(i).Message & ControlChars.NewLine _
                    & "Error Number: " & ex.Errors(i).Number & ControlChars.NewLine _
                    & "LineNumber: " & ex.Errors(i).LineNumber & ControlChars.NewLine _
                    & "Source: " & ex.Errors(i).Source & ControlChars.NewLine _
                    & "Procedure: " & ex.Errors(i).Procedure & ControlChars.NewLine)
            Next i
            Console.WriteLine(errorMessages.ToString())
        End Try
    End Using
End Sub

开发者ID:VB.NET开发者，项目名称:System.Data.SqlClient，代码行数:25，代码来源:SqlException.Server

示例2: MainClass

' 导入命名空间
Imports System
Imports System.Data
Imports System.Data.SqlClient


public class MainClass
   Shared Sub Main()
      Dim SqlConnection1 As New SqlConnection("server=(local)\SQLEXPRESS;" & _
          "integrated security=sspi;database=MyDatabase")

      Dim thisCommand As SqlCommand = SqlConnection1.CreateCommand()
      thisCommand.CommandText = "Select nonExistColumn from Employee"

      Try
         SqlConnection1.Open()
         thisCommand.ExecuteNonQuery()

      Catch ex As System.Data.SqlClient.SqlException
         Dim str As String
         str = "Source : " & ex.Source & ControlChars.NewLine
         str &= "Number : " & ex.Number & ControlChars.NewLine
         str &= "Message : " & ex.Message & ControlChars.NewLine
         str &= "Class : " & ex.Class.ToString() & ControlChars.NewLine
         str &= "Procedure : " & ex.Procedure & ControlChars.NewLine
         str &= "Line number : " & ex.LineNumber.ToString() & ControlChars.NewLine
         str &= "Server : " & ex.Server
         Console.WriteLine("Database Exception" & str)

      Catch ex As System.Exception
         Dim str As String
         str = "Source : " & ex.Source
         str &= ControlChars.NewLine
         str &= "Exception Message : " & ex.Message
         Console.WriteLine("General Exception" & str)

      Finally
         If SqlConnection1.State = ConnectionState.Open Then
            Console.WriteLine("Finally block closing the connection")
            SqlConnection1.Close()
         End If
      End Try
   End Sub
End Class

开发者ID:VB程序员，项目名称:System.Data.SqlClient，代码行数:44，代码来源:SqlException.Server

注：本文中的System.Data.SqlClient.SqlException.Server属性示例整理自Github/MSDocs等源码及文档管理平台，相关代码片段筛选自各路编程大神贡献的开源项目，源码版权归原作者所有，传播和使用请参考对应项目的License；未经允许，请勿转载。