Try Catch를 사용하여 (App.Config) 연결 문자열에 대한 로그인 실패 표시

Question

한 줄의 코드를 사용하여 MS-SQL 2008 R2 데이터베이스에 연결하면 코드가 단순화됩니다. 그러나 로그인/암호 오류시 msgbox를 표시하고 싶습니다. 여기에 코딩이 있습니다.

My.Settings.Item("CustomerConnectionString") = "Data Source=.\SQLEXPRESS; Initial   
Catalog=customer; uid = temp ; pwd = temp" 

<< catch error required >> 

감사합니다.

Answer 1

먼저 연결 문자열을의 app.config에 값을 할당합니다

My.Settings.Item("CustomerConnectionString") = "Data Source=FAROOK-PC\SQLEXPRESS;Initial 
Catalog= '" & Me.ComboBox1.Text & "'; uid = '" & Me.Login1.Text & "'; pwd = '" & 
Me.Password1.Text & "'" 

다음 블록을 잡아보십시오 사용합니다. 연결이 실패하면 catch 블록에서 yor 메시지 상자를 사용하십시오.

Dim sqlCnn As New SqlConnection 
Dim connString as string = My.Settings.Item("CustomerConnectionString").value 

Try 
    sqlCnn = New SqlConnection(connString) 
    sqlCnn.open() 
    globalConnStr = connString 
Catch ex As SqlException 
    MsgBox("Login Failed") 
Finally 
    sqlCnn.close() 
End Try 

는 전역 변수로 globalConnStr를 선언하고이 로그인 자격 증명의 확인으로 완료되면 globalConnStr에 대한 연결 문자열을 지정합니다. 이 후에는 프로그램에서 원하는만큼 globalConnStr 문자열을 사용할 수 있습니다.