Arsip: filter field datetime tanggal dan bulan

 
user image
more 16 years ago

putra_wlh

Ada yg bisa bantu.. saya ingin memfilter field datetime menurut taggal dan bulan saja pada SQLServer menggunakan Delphi 7 dengan BDE. saya sudah mencoba beberapa cara menggunakan Query maupun Table di antaranya: 1. Dengan menggunakan table pada event OnFilterRecord tgl := FormatDateTime('DD/MMM', Date); s := DataSet['tgl']; Accept := s = QuotedStr(tgl); 2. pada button saya beri variabel dengan nilai yg di sesuaikan pada event onFilterRecord 3. dataset di beri value. 4. pada table di tentukan fieldnya 5. Dengan menggunakan Query menggnakan parameter pada tangal if Query1.paramByName('tgl').AsString = FormatDateTime('DD/MMM', Date) then Query1.Open 6. pernah juga di beri copy (dah lieur pisan jigana mah.. hueuuehehehe..) 6. dan masih banyak lagi klo di tulis smuanya ga kan slesai... field tgl sudah di set menjadi string atau value dengan menggunakn table maupun query tetap mengalami error.. Mohon Bantuannya.....
user image
more 16 years ago

ichan29

sederhana sebenernya, cuman dikau ngga baca di help SQLServer nya.. manfaatkan fungsi month dan year
decodedate(tanggal,tahun,bulan,hari)
select * from table where year(tanggal)='+QutoedStr(inttostr(tahun))+
' and month(tanggal)='+QuotedStr(inttostr(bulan));
kurang lebih seperti itu, kembangkan sendiri sesuai dg yg dimaksud
user image
more 16 years ago

ichan29

eh sorry, yg ditanya adalah bulan dan hari ya..
select * from table where month(tanggal)='+QutoedStr(inttostr(bulan))+ 
' and day(tanggal)='+QuotedStr(inttostr(hari));
tp klo buat periode tinggal hari mulai dari sampai dg... tau kan.
user image
more 16 years ago

ir1keren

sklian klo mo filter dengan range bulan dan taon tertentu, misal dari bulan 01/04 ampe 07/05

'select * from table where (month(tanggal) between '+QuotedStr(IntTostr(bulan_1))+' AND '+
QuotedStr(IntToStr(bulan_2))+') AND (day(tanggal) between '+QuotedStr(IntToStr(tanggal_1))+
' AND '+QuotedStr(IntToStr(tanggal_2))+')'
user image
more 15 years ago

putra_wlh

Master2.. terima kasih jawabannya... sudah d coba pada query di delphi untuk SQLServer menggunakan BDE.. Memang klo d SQL Explorer Delphi ataupun SQLServernya bisa... hanya saja setelah d coba pada Query d Delphi hasilnya Optimizer Lock Hints. Setelah itu saa coba ubah dengan berbagai macam cara tapi tetep aja hasilnya sama, atau error pada code yang saya ubah... bagaimana seharusnya untuk menangani Optimizer Lock Hints...
user image
more 15 years ago

putra_wlh

Yaa... sudah berhasil... setelah coba di ulang dari awal lagi semuanya baru bisa... hehehe... ;p :oops:
more ...
  • Pages:
  • 1
Share to

AI Forward

🚀 We're thrilled to partner with Alibaba Cloud for "AI Forward - Alibaba Cloud Global Developer Summit 2025" in Jakarta! Join us and explore the future of AI. Register now: https://int.alibabacloud.com/m/1000400772/
#AlibabaCloud #DeveloperSummit #Jakarta #AIFORWARD

Local Business Directory, Search Engine Submission & SEO Tools FreeWebSubmission.com SonicRun.com