Pak Arief Wibowo, Terimakasih banyak... Dan kalau tidak keberatan mohon informasinya mengenai statement LIKE, kalau di SQL Server untuk menampilkan data yang mirip bisa memakai statement LIKE, (contoh: Select * from Data_Mahasiswa where alamat LIKE '%Depok%').
Kalau penulisan statement ini di VB bagaimana, yah... Mohon bantuannya... Ahmad_sts --- In [email protected], "Arief Wibowo" <[EMAIL PROTECTED]> wrote: > > === BEGIN ARIEFWT'S POSTING === > Coba mas pake contoh script ini: > > 1. Untuk Koneksi ADO ke Database dengan SQL > '=== BEGIN CODE - COPY FROM HERE === > ado_db1.CommandType = adCmdText > ado_db1.RecordSource = "select * from table1 where id="' & id.text & '" > ado_db1.Refresh > 'powered by Arief Softwares Lab ([EMAIL PROTECTED]) > '=== END CODE - COPY UNTIL HERE === > > 2. Untuk Koneksi DataGrid ke ADO > '=== BEGIN CODE - COPY FROM HERE === > dbGrid.DataSource = "ado_db1" > dbGrid.Refresh > 'powered by Arief Softwares Lab ([EMAIL PROTECTED]) > '=== END CODE - COPY UNTIL HERE === > > > Nah... Setelah mendapatkan kode2 diatas, mas sudah bisa > mengimplementasikannya ke program mas yang sesungguhnya... > > Happy coding! > > === END ARIEFWT'S POSTING === > > Catatan: > * Semoga posting di atas dapat bermanfaat secara positif bagi kita semua > * Kalau ada pertanyaan, silahkan hubungi saya di [EMAIL PROTECTED] > * Mohon maaf sebesar-besarnya apabila ada kata-kata yang kurang > berkenaan di hati Anda > > > Salam, > (Arief Wibowo, C.Hts, RM) > Computer Programmer and Alternative Therapist > > Medan, 31 Maret 2007dddddd|0) > > > --- In [email protected], "A. Sutrisno" <ahmad_sts@> > wrote: > > > > Assalamualaikum, semua programmer. > > > > Mohon bantuannya (karena saya masih belajar): Bagaimana cara > menulis script untuk menampilkan hasil query ke dalam DBGRID, script > saya sbb: > > > > Private Sub Command1_Click() > > ado_db1.recordsource="select * from table1 where" & _ > > "id="' & id.text & '" > > > > ado_db1.refresh > > with ado_db1.recordset > > if .pagecount<>0 then > > db_grid1. ????? > > ?????? > > ?????? > > else > > msgbox"...." > > endif > > End Sub > > > > Mohon bantuannya, > > > > Terimakasih, > > > > Ahmad > > >
