我正在使用VB编程的Windows CE应用程序。我正在尝试添加SQL连接,以便应用程序访问数据库并检索所需的信息。我尝试了很多不同的连接字符串而没有运气。谁能指出我做错了什么?或者在此阶段提出建议,任何建议都会有所帮助。提前致谢
下面的代码是我用来尝试访问SQLDatabase的代码
Public Class SQLTest
Dim sqlCMD As SqlCommand
Dim myDA As SqlDataAdapter
Dim myDataSet As DataSet
Private Sub SQLTest_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'"Data Source=.;Integrated Security=True;AttachDbFilename=|DataDirectory|\SqlDatabase.mdf"
Dim con As SqlConnection = New SqlConnection("Data Source=192.168.1.62,1433;Initial Catalog=CASILynasFulfilment;User ID=rfgun;Password=Casiuk2012*;")
' Dim con As SqlConnection = New SqlConnection("Data Source=192.168.1.62;Integrated Security=True;AttachDbFilename=|DataDirectory|\master.mdf")
Dim cmd As String = "SELECT * FROM [Order]"
'Dim cmd As SqlCommand = New SqlCommand("SELECT * FROM [Order]")
con.Open()
sqlCMD = New SqlCommand(cmd, con)
Dim sqlReader As SqlDataReader = sqlCMD.ExecuteReader()
While sqlReader.Read()
MsgBox(sqlReader.Item(0) & " - " & sqlReader.Item(1) & " - " & sqlReader.Item(2))
End While
sqlReader.Close()
sqlCMD.Dispose()
con.Close()
'Automatically generates DeleteCommand, UpdateCommand and InsertCommand for DataAdapter object
' Dim builder As SqlCommandBuilder = New SqlCommandBuilder(myDA)
' myDataSet = New DataSet()
' myDA.Fill(myDataSet, "MyTable")
' DataGrid1.DataSource = myDataSet.Tables("MyTable").DefaultView
' con.Close()
' con = Nothing
End Sub
下面的图片是我得到的错误。
答案 0 :(得分:0)
您是手动编写连接字符串吗?
如果是,那就不要那样做
打开你的服务器资源管理器
选择您的服务器名称(这是您的机器名称)
选择您的db文件
并通过clcik在“测试连接按钮”上测试连接
如果成功,则只需通过righr点击你的db文件
来复制连接字符串并将其粘贴到您需要的地方
答案 1 :(得分:0)
我弄明白了这个问题。在Configuration Manager中,未启用命名管道,因此不允许连接到数据库。