Function nama_bulan
Parameters _BLNKE
Do Case
Case _BLNKE='01'
_SAYBLN='Januari'
Case _BLNKE='02'
_SAYBLN='Pebruari'
Case _BLNKE='03'
_SAYBLN='Maret'
Case _BLNKE='04'
_SAYBLN='April'
Case _BLNKE='05'
_SAYBLN='Mei'
Case _BLNKE='06'
_SAYBLN='Juni'
Case _BLNKE='07'
_SAYBLN='Juli'
Case _BLNKE='08'
_SAYBLN='Agustus'
Case _BLNKE='09'
_SAYBLN='September'
Case _BLNKE='10'
_SAYBLN='Oktober'
Case _BLNKE='11'
_SAYBLN='Nopember'
Case _BLNKE='12'
_SAYBLN='Desember'
Endcase
Return _SAYBLN
Endfunc
bereskan jadi nanti bulan pada date() akan menjadi 1 januari 2008.gitu kali ya
met coba aja deh...