[ BRATISLAV @ 22.09.2003. 12:09 ] @
| Pozdrav, svima! Hteo bih da predjem na ADO.Evo dela koda. Dim con As ADODB.Connection Dim ConString As String Dim sTri As String Dim rs As ADODB.Recordset Set con = New ADODB.Connection Set rs = New ADODB.Recordset sTri = Text2.Text ConString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\My Documents\Plate.mdb;Persist Security Info=False" con.Open ConString rs.Open "select * from Radnici where Ime like'" & sTri & "*'", con, adOpenKeyset, adLockOptimistic Text1.Text = rs!Prezime Ne funkcionise mi ovaj SQL upit, dok pri radu sa DAO sve lepo radi. Kad unesem pocetna slova ne izbacuje rezultat upita, niti javlja neku gresku. Ako izbacim * (zvezdicu) i otkucam puno ime, onda radi i vraca mi rezultat upita. Hteo bih da ovo radi i kad unesem npr. samo pocetno slovo. U cemu je problem. Hvala unapred. |