本文介绍了什么是错在SELECT语句的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧!
问题描述
保护小组的Page_Load(BYVAL发件人为对象,BYVAL E上System.EventArgs)把手Me.Load
昏暗SQLDATA作为新System.Data.SqlClient.SqlConnection(数据源= \\ SQLEX $ P $干燥综合征; AttachDbFilename = | DataDirectory目录| \\ Database.mdf;集成安全=真;用户实例=真)
昏暗cmdSelect作为新System.Data.SqlClient.SqlCommand(SELECT * FROM表1 WHERE座椅='&放大器; TextBox1.Text&安培;',SQLDATA) SQLData.Open() 使用适配器作为新的SqlDataAdapter(cmdSelect)
使用表作为新Data.DataTable()
adapter.Fill(表)
TextBox1.Text = [字符串]。加入(,table.AsEnumerable()。[选择](功能(R)r.Field(整数)(seat_select)))
使用完
使用完 SQLData.Close()
结束小组
此行将与蓝线突出显示:
TextBox1.Text = [字符串]。加入(,table.AsEnumerable()。[选择](功能(R)r.Field(整数)(seat_select )))
解决方案
请尝试更改code到
TextBox1.Text =的string.join(,table.AsEnumerable(),选择(功能(R)r.Field(整数)(seat_select))。 ToArray的()
希望这有助于
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim SQLData As New System.Data.SqlClient.SqlConnection("Data Source=.\SQLEXPRESS;AttachDbFilename=|DataDirectory|\Database.mdf;Integrated Security=True;User Instance=True")
Dim cmdSelect As New System.Data.SqlClient.SqlCommand("SELECT * FROM Table1 WHERE Seats ='" & TextBox1.Text & "'", SQLData)
SQLData.Open()
Using adapter As New SqlDataAdapter(cmdSelect)
Using table As New Data.DataTable()
adapter.Fill(table)
TextBox1.Text = [String].Join(", ", table.AsEnumerable().[Select](Function(r) r.Field(Of Integer)("seat_select")))
End Using
End Using
SQLData.Close()
End Sub
This line will be highlighted with blue line:
TextBox1.Text = [String].Join(", ", table.AsEnumerable().[Select](Function(r) r.Field(Of Integer)("seat_select")))
解决方案
try changing your code to
TextBox1.Text = String.Join(", ", table.AsEnumerable().Select(Function(r) r.Field(Of Integer)("seat_select")).ToArray()
hope this helps
这篇关于什么是错在SELECT语句的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持!