25-04-19, 02:45 AM
اخي سعود لكن ظهرة لي نفس الخطأ Incorrect syntax near عند TextBox1.Text = Cmd2.ExecuteScalar
Dim con As New SqlClient.SqlConnection(constring)
con.Open()
'
Dim strsq2 As String = "SELECT SUM(T3) FROM (SELECT T1, T3 FROM Table1 GROUP BY T1)"
Dim Cmd2 As New SqlClient.SqlCommand(strsq2, con)
TextBox1.Text = Cmd2.ExecuteScalar
con.Close()
Dim con As New SqlClient.SqlConnection(constring)
con.Open()
'
Dim strsq2 As String = "SELECT SUM(T3) FROM (SELECT T1, T3 FROM Table1 GROUP BY T1)"
Dim Cmd2 As New SqlClient.SqlCommand(strsq2, con)
TextBox1.Text = Cmd2.ExecuteScalar
con.Close()