Di Enterprise manager nya, cona anda click kanan tablenya --> manage Index.. buat baru deh... apa field yg mau di index, tinggal di centang
untuk cari nya,, sama seperti anda menampilkna, cuma belakangnya kasih where ...... Salam Ronald Irawan Pt. Sanghiang Perkasa Gd. Graha Kirana Lt.5 Jl Yos Sudarso Kav.88 Jakarta "A. Numairullah" <[EMAIL PROTECTED]> Sent by: [email protected] 29/12/2005 11:29 AM Please respond to [email protected] To [email protected] cc Subject Re: [indoprog-vb] Load Recordset Lambat ??? Thank's Bung Ronald, script buat Create index-nya kaya gimana nih sy masih awam, sblmnya saya pake Clipper. Terus metode pencariannya pake metode apa? Find atau Seek? Sy sendiri msh bingung perbedaan Find / Seek di VB. Sorry nih nambah pertanyaan :-). rgds --- Ronald Irawan <[EMAIL PROTECTED]> wrote: > Wah dengan spek spt itu mestinya cepet... > Kalau cuma mau nampilin aja sih, coba ini > Dim dbPO As ADODB.Connection > Dim rsPO As ADODB.Recordset > > Set dbPO = New ADODB.Connection > dbPO.CursorLocation = adUseClient > > dbPO.Open "PROVIDER=SQLOLEDB;" & _ > "Data Source=" & ServerName & ";" & _ > "Initial Catalog=" & DatabaseName & > ";" > & _ > "User Id=" & dbUserName & ";" & _ > "Password=" & dbPassword & ";" > > dbPO.Execute "set dateformat dmy" > > Set rsPO = New ADODB.Recordset > rsPO.Open "Select * From PORDERS with(nolock) > Order By NOSO", > dbPO,adopenforwardonlny,adlockreadonly > > Cuma saran : dari pada anda order by, lebih baik > database nya anda index > NoSO nya.... > > Salam > Ronald Irawan > Pt. Sanghiang Perkasa > Gd. Graha Kirana Lt.5 > Jl Yos Sudarso Kav.88 > Jakarta > > > > "A. Numairullah" <[EMAIL PROTECTED]> > Sent by: [email protected] > 29/12/2005 10:43 AM > Please respond to > [email protected] > > > To > VB Group <[email protected]> > cc > > Subject > [indoprog-vb] Load Recordset Lambat ??? > > > > > > > Dear All Pakar² VB, > > Sy sedang buat program dengan VB 6 db SQL Server > 2000, > Connection String/script yang sy gunakan sbb : > > Dim WithEvents dbPO As ADODB.Connection > Dim WithEvents rsPO As ADODB.Recordset > > Set dbPO = New ADODB.Connection > dbPO.CursorLocation = adUseClient > > dbPO.Open "PROVIDER=SQLOLEDB;" & _ > "Data Source=" & ServerName & ";" & _ > "Initial Catalog=" & DatabaseName & > ";" > & _ > "User Id=" & dbUserName & ";" & _ > "Password=" & dbPassword & ";" > > dbPO.Execute "set dateformat dmy" > > Set rsPO = New ADODB.Recordset > rsPO.Open "Select * From PORDERS Order By NOSO", > dbPO, _ > adOpenDynamic, adLockBatchOptimistic > > 'fungsi utk seeting header datagrid dan > menampilkan data ke > 'data grid > SetHeaderDataGrid > > Table PORDERS tsb mempunyai ± 16.000 record, mengapa > saat load recordset sampai di tampilkan ke datagrid > prosesnya lumayan lambat ± 2 menit. Bagaimana jika > jumlah recordnya > 100.000 ? Wah pasti lebih lambat > :-( > Apakah ada script yang perlu ditambah. Mohon rekan² > ada yang bisa membantu memberikan solusi. > > Utk informasi : > PC sy P4 2.4GHz, Ram 512 MB, OS Win98 > Server sy memang sudah renta sih :-) HP Netserver > E800 > 900Mhz, Ram 256 MB > > > Thanks before & Happy New Year 2006. > > > rgds > > > > > > __________________________________ > Yahoo! for Good - Make a difference this year. > http://brand.yahoo.com/cybergivingweek2005/ > > > > Untuk berhenti berlangganan kirim email kosong ke : > [EMAIL PROTECTED] > > Ikuti juga forum diskusi VB.net dengan > mengirim email kosong ke > [EMAIL PROTECTED] > > Yahoo! Groups Links > > > > > > > > > > [Non-text portions of this message have been > removed] > > __________________________________________ Yahoo! DSL – Something to write home about. Just $16.99/mo. or less. dsl.yahoo.com ------------------------ Yahoo! Groups Sponsor --------------------~--> 1.2 million kids a year are victims of human trafficking. Stop slavery. http://us.click.yahoo.com/.QUssC/izNLAA/TtwFAA/zCsqlB/TM --------------------------------------------------------------------~-> Untuk berhenti berlangganan kirim email kosong ke : [EMAIL PROTECTED] Ikuti juga forum diskusi VB.net dengan mengirim email kosong ke [EMAIL PROTECTED] Yahoo! Groups Links [Non-text portions of this message have been removed] ------------------------ Yahoo! Groups Sponsor --------------------~--> Get Bzzzy! (real tools to help you find a job). Welcome to the Sweet Life. http://us.click.yahoo.com/KIlPFB/vlQLAA/TtwFAA/zCsqlB/TM --------------------------------------------------------------------~-> Untuk berhenti berlangganan kirim email kosong ke : [EMAIL PROTECTED] Ikuti juga forum diskusi VB.net dengan mengirim email kosong ke [EMAIL PROTECTED] Yahoo! Groups Links <*> To visit your group on the web, go to: http://groups.yahoo.com/group/indoprog-vb/ <*> To unsubscribe from this group, send an email to: [EMAIL PROTECTED] <*> Your use of Yahoo! Groups is subject to: http://docs.yahoo.com/info/terms/
