Format Uang dari String currency di DBGRID Selasa, Jun 5 2007 

Pada kesempatan kali ini saya akan berbagi pengalaman dalam membuat format angka atau uang didalam DBGrid tanpa harus mengubah settingan regional yang ada didalam fitur sistem operasi.

Mungkin dari beberapa temen-temen terutama yang belajar bahasa pemrograman Delphi, mengalami kesulitan ketika menggunakan object DBGrid yang didalamnya ada field dengan tipe money atau currency ingin menampilkannya dengan tampilan format rupiah dan bukan format dollar.

Namun demikian, jangan khawatir ada cara yang mudah untuk bisa mewujudkan keinginan tersebut.
Sebelumnya silahkan anda lihat tampilan screenshot dibawah ini.

.

Berdasarkan tampilan gambar diatas, terlihat bahwa kita bisa membuat field dengan beberapa tipe data yang intinya mengandung angka bisa kita buat menjadi seperti tampilan format uang .

Untuk lebih jelasnya silahkan anda download program diatas dialamat ini:

http://esnips.com/doc/2e815a5d-389c-429c-bf0a-ae966c7d65cc/Format-Uang-dari-String-currency-di-DBGRID

Pencarian data dalam database MS SQL Server Selasa, Jun 5 2007 

Berikuti ini saya berikan tips untuk pencarian data dengan menggunakan ADO.

sebagai gambaran lihatlah tampilan berikut ini.

[IMG]http://img523.imageshack.us/img523/3604/untitled1mz.jpg[/IMG]

kemudian untuk lebih jelas + SC + aplikasinya dapat anda download [b][url=http://esnips.com/web/TipnTrikDatabase]disini[/url][/b] dengan nama file [b]Belajar database bagian 1[/b].

semoga bisa membantu dan berguna

Pelajaran 1 Selasa, Jun 5 2007 

Anda ingin belajar database MS SQL Server terutama mengenai cursor?……

jangan khawatir…

Baca artikel ini dengan pelan2, saya yakin anda pasti bisa.

Gimana cara menggunakan cursor didalam stored procedure:

contoh kasus :

CREATE PROCEDURE sp_Inventory;4
@Kode varchar(10)
AS

DECLARE Supplier Cursor
FOR SELECT [Nama Lengkap]
FROM CardDetailSupplier
WHERE [ID Barang] = @Kode

DECLARE @Supplier varchar(50),
@SemuaSupplier varchar(1000),
@Counter int
OPEN Supplier
FETCH NEXT FROM Supplier INTO @Supplier
SET @SemuaSupplier = ”
SET @Counter = 0
WHILE @@Fetch_Status = 0
BEGIN
SET @Counter = @Counter + 1
IF @Counter = 1
BEGIN
SET @SemuaSupplier = @SemuaSupplier + @Supplier
END
ELSE
BEGIN
SET @SemuaSupplier = @SemuaSupplier +’
‘+ @Supplier
END
FETCH NEXT FROM Supplier INTO @Supplier
END
CLOSE Supplier
DEALLOCATE Supplier

ini tadi merupakan contoh cursor untuk menampilkan beberapa record menjadi satu record.

misalkan :

record ke-1 Eko indriyawan
record ke-2 Fransisca Aurelia
record ke-3 Taufik Al farisi

maka hasil dari variabel tersimpan menjadi

Eko indriyawan
Fransisca Aurelia
Taufik Al farisi

so, jika temen2 ada masalah seperti ini, sekarang dah saya berikan contoh dan semoga membantu.

Eko curhat….. Minggu, Jun 3 2007 

Sebulan lebih sudah aku lalui hari-hariku dengan tidak ada kepastian masa depan. Aku merasa seakan jantungku berhenti dengan tubuh yang belum ingin mati. Banyak kejadian aneh yang aku alami, seakan ini pertanda kalau aku sedang diuji.

Kedamaian hati juga sudah tidak bisa digemgam dengan erat, resonansi hati semakin tak terlihat begitu juga ruang hati makin terlihat gelap.

aku jauh dari Engkau, tapi aku seakan makin menjauh dan menjauh. Kini aku baru sadari ketika hatiku mulai beku, jantungku juga sudah layu, tubuh terasa linu hingga aku tak bisa berpaling darimu. Sungguh luar biasa sekali Engkau masih mau mengingatkan betapa Maha Besarnya Engkau lebih dari yang bisa aku bayangkan.

bersambung…..