aku udah coba mas, tapi muncul run time error '3001' aku ud buat dbgrid dgn nama dft dan sourcenya sebuah adodc. apa ada yg salah ya?
--- In [email protected], Robert Suryadi <[EMAIL PROTECTED]> wrote: > > anggap aja nama dbgridnya Dft.... coba ketik ini dicodingnya : > Private Sub Dft_HeadClick(ByVal ColIndex As Integer) > Z = Dft.Columns(ColIndex).DataField > Dim rsTmp As New ADODB.Recordset > rsTmp.Source = "select * from M_RawMaterial where (stsDel <> 1) And (stsOut<>1) ORDER BY " & Z & "" > rsTmp.Open rsTmp.Source, cn, adOpenKeyset, adLockBatchOptimistic > rsTmp.Requery > Set Dft.DataSource = rsTmp > Dft.Refresh > end sub > > Semoga dapat membantu... Selamat mencoba.... > > Best Regard > Robert "Dark Blupi" > > > --------------------------------- > See the all-new, redesigned Yahoo.com. Check it out. > > [Non-text portions of this message have been removed] > Untuk berhenti berlangganan kirim email kosong ke : [EMAIL PROTECTED] Forum ini berkembang dengan pesat, jika anda memiliki dedikasi dan waktu, silahkan mengaplikasikan diri menjadi moderator. 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/
