Проблема с подключением к SQL Server (Express)

0
задан Cindy Meister 15 January 2019 в 17:04
поделиться

1 ответ

Обновление, спасибо Ларсу за разъяснение, что вы выполняете ВСТАВКУ. Это не ясно в вашей просьбе о помощи.

Код ниже может служить чистым примером, но, пожалуйста, не принимайте это как ответ.

Public Function ExecuteSQLStatement(ByVal SQLString As String, ByVal myDataGrid As DataGridView)

    Dim result As Boolean = True
    Dim myDataSet As DataSet = New DataSet("dsData")

    Try

        Using cnn As SqlConnection = New SqlConnection(ConnString)

            cnn.Open()

            Dim cmd As SqlCommand = New SqlCommand(SQLString, cnn)
            cmd.CommandType = CommandType.Text

            Dim sda As SqlDataAdapter = New SqlDataAdapter(cmd)
            sda.Fill(myDataSet)

        End Using

        myDataGrid.DataSource = myDataSet.Tables(0)

    Catch ex As Exception

        result = False
        MsgBox(ex.Message)

    End Try

    Return result

End Function
0
ответ дан Critical Error 15 January 2019 в 17:04
поделиться
Другие вопросы по тегам:

Похожие вопросы: