کد جستجو اطلاعات از بانک sql و نمایش آن روی دیتا گرید ویو

[Miryam]

میخوام وقتی دکمه جستجو رو می زنم عمل جستجو رو انجام بده و توی دیتا گرید ویو نشون بده ولی این کد قبل از اینکه جستجو رو انجام بدم وقتی فرم میاد بالا تمام رکوردارو روی دیتا نشون میده.:گریه:
لطفا راهنمایی کنید.:افسرده:




Private Sub BTNSearch_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles
BTNSearch.Click
Dim strsql As String

Dim strcon As String

strcon = "Data source=VIRTUALXP-28481;Initial catalog=Foroshgah;Integrated security=True"

Dim con As New SqlConnection(strcon)
con.Open()

strsql = " select* from tblBankMoshtari where ID= '" & TxtID.Text & "'"

Dim da As New SqlDataAdapter(strsql, con)
Dim ds As New DataSet()
ds.Clear()
If da.Fill(ds, "TblBankMoshtari") Then

DataGridView1.DataSource = ds.Tables("TblBankMoshtari")

[morrning]

حتما توی رویداد فرم لود چیزی نوشتی

[alimanam]

با سلام

کمی جستجو میکردین بهتر بود کلی تاپیک در این رابطه نوشته شده سوالات تکراری در حد تیم ملی داره زیاد میشه دوستان مدیر بخش ها پس کجان !؟!

اگه نوع فیلد ID شما رشته ایی باشه !!! کد زیر رو بنویس :

Private Sub BTNSearch_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BTNSearch.Click()

Dim con As New SqlConnection("Data source=VIRTUALXP-28481;Initial catalog=Foroshgah;Integrated security=True")
Dim da As New SqlDataAdapter("Select * from tblBankMoshtari where ID = '" & TxtID.Text & "'", con)
Dim dt As New DataTable

da.Fill(dt)
DataGridView1.DataSource = dt

End Class

اگرم نوع فیلد ID از نوع Integer باشه از کد زیر استفاده کن :

Private Sub BTNSearch_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BTNSearch.Click()

Dim con As New SqlConnection("Data source=VIRTUALXP-28481;Initial catalog=Foroshgah;Integrated security=True")
Dim da As New SqlDataAdapter("Select * from tblBankMoshtari where ID = " & TxtID.Text, con)
Dim dt As New DataTable

da.Fill(dt)
DataGridView1.DataSource = dt

End Class

موفق باشید ./

[djhooman]

به این پست برو مشکلت 100% حل میشه ....

http://barnamenevis.org/showthread.php?293940-%D8%AC%D8%B3%D8%AA%D8%AC%D9%88-%D8%AF%D8%B1-Datagrade-View&p=1305295&viewfull=1#post1305295

[Miryam]

مرسی آقا علی جواب داد شرمنده که باز سوال تکراری پرسیدم

[barca6]

سپاسگذارم واقعا به درد منم خورد (من ثبت نام رو فقط برا تشکر ازتون کامل کردم).