2015-11-08 188 views
-1

我正在嘗試在VB中編寫一個小的Customer/sales數據庫。然而在編譯時,我收到了主題中提到的錯誤。顯然,數據庫沒有連接。類型System.Data.SqlClient的未處理的異常System.Data.dll中的SQL異常

這裏是我到目前爲止的代碼:

Public Class Principal 
Using Connect As SqlConnection = 
Friend Sub CreateDatabase() 
New SqlConnection("Data Source=(local);" & 
"Integrated Security='SSPI';") 

Dim strCreateDatabase As String = "IF EXISTS (" & 
"SELECT name " & 
"FROM sys.databases " & 
"WHERE name = N'BMSTIDB'" & 
") " & 
"DROP DATABASE BMSTIDB; " & 
"CREATE DATABASE BMSTIDB" 

Dim Command As SqlCommand = 
New SqlCommand(strCreateDatabase, Connect) 

Connect.Open() 
Connect.ExecuteNonQuery() 

MsgBox("A Database with the name of " & 
"BMSTIDB has been created. ") 
End Using 

它編譯罰款和它好好嘗試顯示任何錯誤或問題。但是,如上所述,它在運行時會首先嚐試連接到數據庫時發生錯誤。

我正在使用Visual Studio 2015 Enterprise和Community。

非常感謝,

BenjB

+0

您標記了這個「mysql」,但那些是Sql Server連接字符串和SqlCommand/SqlConnection類型。您需要完全不同的連接線和數據訪問對象才能與MySql對話。 –

+0

感謝您的建議。編輯並添加了我做的其他更改。 – BenjB

+0

目前還不清楚你使用的是什麼數據庫引擎。這是一件大事,你應該在問題上加上正確的標籤。 –

回答

0
New SqlConnection("Data Source=(local);" & 

「集成安全性= 'SSPI'; 數據庫=主」)

+0

@ f0r3v3r-A-Noob感謝您的快速回復。我已經添加了'code'「Integrated Security ='SSPI'; Database = master」)'code'但它給出了相同的錯誤。 – BenjB

0

你在這裏缺少一個右單引號:

"WHERE name = N'BMSTIDB" & 

應該是:

"WHERE name = N'BMSTIDB'" & 

一旦你解決,你會發現你還缺少BEGINEND關鍵字。

+0

謝謝,我固定那一個。錯誤仍然存​​在,並保持不變。我也試圖把'(local)'改成'(localDB)'而沒有成功。 – BenjB

+0

你能通過sql server management studio連接到數據庫嗎? –

相關問題