VB.Net SQL连接问题

时间:2015-06-09 09:27:20

标签: sql vb.net

我正在使用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

下面的图片是我得到的错误。

Error Message

2 个答案:

答案 0 :(得分:0)

您是手动编写连接字符串吗?

如果是,那就不要那样做

打开你的服务器资源管理器

选择您的服务器名称(这是您的机器名称)

选择您的db文件

并通过clcik在“测试连接按钮”上测试连接

如果成功,则只需通过righr点击你的db文件

来复制连接字符串

并将其粘贴到您需要的地方

答案 1 :(得分:0)

我弄明白了这个问题。在Configuration Manager中,未启用命名管道,因此不允许连接到数据库。