![]() |
![]() | ![]() | ![]() | ![]() | ![]() | ![]() | ![]() |
| Welcome to Windows Vista Forums. Our forum is dedicated to helping you find solutions with any problems, errors or issues you are experiencing with Windows Vista. The Vista forum also covers news and updates and has an extensive Windows Vista tutorial section that covers a wide range of tips and tricks. |
| |||||||
![]() |
| |
| | #1 (permalink) |
| | search using 2 text box in connected mode Dear friends I want to use 2 text box on the form to search data in connected mode I'm use this code and this code not work Please see the sql because may be wrong Thank you This is the code Dim cn As New OleDbConnection cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Documents and Settings\av\Desktop\A1.mdb;Persist Security Info=False" cn.Open() Dim cmd As New OleDbCommand cmd.CommandText = "Select * from t1 where CustomerId=? or CustomerId=null or customername=? or customername=null" cmd.Connection = cn Dim pr As New OleDbParameter pr.Value = txtsearchCustomerId.Text cmd.Parameters.Add(pr) Dim pr1 As New OleDbParameter pr.Value = txtsearchcustomername.Text cmd.Parameters.Add(pr1) Dim dr As OleDbDataReader dr = cmd.ExecuteReader dr.Read() If dr.HasRows Then txtCustomerId.Text = dr(0) TxtCustomerName.Text = dr(1) End If cn.Close() cmd.Dispose() dr.Close() |
My System Specs![]() |
| | #2 (permalink) |
| | Re: search using 2 text box in connected mode "a" <a@xxxxxx> wrote in message news:ejll4OC4IHA.2064@xxxxxx Quote: > Dear friends > > > > I want to use 2 text box on the form to search data in connected mode I'm > use this code and this code not work > > Please see the sql because may be wrong > > Thank you > > > > This is the code > > > > Dim cn As New OleDbConnection > > cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data > Source=C:\Documents and Settings\av\Desktop\A1.mdb;Persist Security > Info=False" > > cn.Open() > > > > > > > > Dim cmd As New OleDbCommand > > cmd.CommandText = "Select * from t1 where CustomerId=? or > CustomerId=null or customername=? or customername=null" > > cmd.Connection = cn > > > > > > Dim pr As New OleDbParameter > > pr.Value = txtsearchCustomerId.Text > > cmd.Parameters.Add(pr) > > > > > > Dim pr1 As New OleDbParameter > > pr.Value = txtsearchcustomername.Text > > cmd.Parameters.Add(pr1) > > > > > > Dim dr As OleDbDataReader > > dr = cmd.ExecuteReader > > > > > > > > dr.Read() > > If dr.HasRows Then > > txtCustomerId.Text = dr(0) > > TxtCustomerName.Text = dr(1) > > End If > > > > > > cn.Close() > > cmd.Dispose() > > dr.Close() > > Dim pr1 As New OleDbParameter pr.Value = txtsearchcustomername.Text cmd.Parameters.Add(pr1) You never assign a value to pr1. |
My System Specs![]() |
| | #3 (permalink) |
| | Re: search using 2 text box in connected mode thank you for your help and answer this message appear to me Data type mismatch in criteria expression. thank you "PvdG42" <pvan@xxxxxx> wrote in message news:Owsmp4C4IHA.3784@xxxxxx Quote: > "a" <a@xxxxxx> wrote in message > news:ejll4OC4IHA.2064@xxxxxx Quote: >> Dear friends >> >> >> >> I want to use 2 text box on the form to search data in connected mode I'm >> use this code and this code not work >> >> Please see the sql because may be wrong >> >> Thank you >> >> >> >> This is the code >> >> >> >> Dim cn As New OleDbConnection >> >> cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data >> Source=C:\Documents and Settings\av\Desktop\A1.mdb;Persist Security >> Info=False" >> >> cn.Open() >> >> >> >> >> >> >> >> Dim cmd As New OleDbCommand >> >> cmd.CommandText = "Select * from t1 where CustomerId=? or >> CustomerId=null or customername=? or customername=null" >> >> cmd.Connection = cn >> >> >> >> >> >> Dim pr As New OleDbParameter >> >> pr.Value = txtsearchCustomerId.Text >> >> cmd.Parameters.Add(pr) >> >> >> >> >> >> Dim pr1 As New OleDbParameter >> >> pr.Value = txtsearchcustomername.Text >> >> cmd.Parameters.Add(pr1) >> >> >> >> >> >> Dim dr As OleDbDataReader >> >> dr = cmd.ExecuteReader >> >> >> >> >> >> >> >> dr.Read() >> >> If dr.HasRows Then >> >> txtCustomerId.Text = dr(0) >> >> TxtCustomerName.Text = dr(1) >> >> End If >> >> >> >> >> >> cn.Close() >> >> cmd.Dispose() >> >> dr.Close() >> >> > > Dim pr1 As New OleDbParameter > > pr.Value = txtsearchcustomername.Text > > cmd.Parameters.Add(pr1) > > You never assign a value to pr1. |
My System Specs![]() |
![]() |
| Thread Tools | |
| |
Similar Threads | ||||
| Thread | Forum | |||
| my gf laptop stays connected while in standby mode | Network & Sharing | |||
| Can't search message text in XP | Live Mail | |||
| 2 text box for search in connected mode | .NET General | |||
| E-mail text override mode | Vista mail | |||
| Text Search in Vista | Vista file management | |||