how to get the answer from "count(*) into a textbox

Question

Post reply

how to get the answer from "count(*) into a textbox

sherm

Old Hand

Points: 358
More actions
March 27, 2015 at 12:56 pm

#315990

Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
myconnection.Open()
'define the command
Dim cmd As New SqlCommand
cmd.Connection = myconnection
cmd.CommandText = "SELECT COUNT(*) FROM petrol_costs_table"
cmd.ExecuteNonQuery()
myconnection.Close()
MsgBox("Succes....", MsgBoxStyle.Information, "Success")
End Sub
Hi everyone,
i would like to know how to get the answer from the above Count(*) function into a textbox.
many thanks for reading my question

Viewing 5 posts - 1 through 4 (of 4 total)

You must be logged in to reply to this topic. Login to reply

Lowell SSC Guru Points: 323518 More actions · Answer 1

ExecuteScalar will return a single value....that's what you want.

untested, but this is roughly what you want:

Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click

myconnection.Open()

'define the command

Dim cmd As New SqlCommand

Dim i as Integer

cmd.Connection = myconnection

cmd.CommandText = "SELECT COUNT(*) FROM petrol_costs_table"

i = cmd.ExecuteScalar()

myconnection.Close()

MsgBox("Success...." & i, MsgBoxStyle.Information, "Success")

End Sub

Lowell

--help us help you! If you post a question, make sure you include a CREATE TABLE... statement and INSERT INTO... statement into that table to give the volunteers here representative data. with your description of the problem, we can provide a tested, verifiable solution to your question! asking the question the right way gets you a tested answer the fastest way possible!

sherm Old Hand Points: 358 More actions · Answer 2

Thank you for your reply...

i did the following:-

Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click

myconnection.Open()

Dim ReturnCount As Int32 = 0

'define the command

Dim cmd As New SqlCommand

cmd.Connection = myconnection

cmd.CommandText = "SELECT COUNT(*) FROM petrol_costs_table"

ReturnCount = Convert.ToInt32(cmd.ExecuteScalar())

cmd.ExecuteNonQuery()

myconnection.Close()

MsgBox("Succes....", MsgBoxStyle.Information, "Success")

TextBox1.Text = ReturnCount

End Sub

this work very well

nigel. SSChampion Points: 11636 More actions · Answer 3

You don't need to do both

cmd.ExecuteScalar())

and

cmd.ExecuteNonQuery()

You're executing the same query twice, the 'ExecuteNonQuery' is unnecessary

Nigel
How to post questions

sherm Old Hand Points: 358 More actions · Answer 4

sherm

Old Hand

Points: 358

March 30, 2015 at 5:36 am

#1787288

Thanks for the tip. 🙂