VB.Net SQLserverへの接続ができない
解決したいこと
VB.Net初心者です。
開発環境
OS:windows10
IDE: Visual Studio 2019 Community
SQLserverへの接続を試みています。
https://hironimo.com/prog/vbnet/sqlrenkei/
上記サイトに掲載のコードをそのままコピペしたところ、下記コードの6行目に
「'sqlserver'は'MySettings'のメンバーではありません。」というエラーメッセージが表示されます。
解決方法を知っている方がいらっしゃいましたら、ご教授いただないでしょうか。
発生している問題・エラー
'sqlserver'は'MySettings'のメンバーではありません。
該当するソースコード
Imports System.Data.SqlClient
Public Class Form1
Private Sub Label1_Click(sender As Object, e As EventArgs) Handles Label1.Click
Try
'SQLServerの接続開始
Dim sqlconn As New SqlConnection(My.Settings.sqlserver)
sqlconn.Open()
Try
'SQL作成
Dim sql As New System.Text.StringBuilder
sql.AppendLine("SELECT")
sql.AppendLine(" *")
sql.AppendLine("FROM hironimoTable")
'SQL実行
Dim command As New SqlCommand(sql.ToString, sqlconn)
Dim adapter As New SqlDataAdapter(command)
Dim dt As New DataTable
adapter.Fill(dt)
'実行結果
For rowindex As Integer = 0 To dt.Rows.Count - 1
For colindex As Integer = 0 To dt.Columns.Count - 1
Console.Write(dt.Rows(rowindex).Item(colindex).ToString & " ")
Next
Console.WriteLine()
Next
Catch ex As Exception
Throw
Finally
sqlconn.Close()
End Try
Catch ex As Exception
MsgBox(ex.ToString)
End Try
End Sub
End Class
0 likes