Mengecek apakah field sudah ada atau belum dalam tabel di SQL Server 2005

Jika kita ingin mengetahui apakah suatu field sudah ada atau belum didalam tabel, kita dapat memanfaatkan fungsi yang telah disediakan oleh Sql Server, fungsi tersebut adalah col_length.
Contoh Penggunaannya :
jika ingin mengecek field nama1 di tabel customer :
if col_length(‘customer’,'nama1′) is null print(‘Field tidak ditemukan’)

Contoh lain :
declare @namaTable varchar(50)
set @namaTable =’customer’
declare @namaField varchar(50)
set @namaField =’nama’
if col_length(@namaTable,@namaField) is null print(‘Field ‘ + @namafield + ‘ Tidak Ada’)
else print(‘Field ‘ + @namafield + ‘ Ada’)

Filed under: SQL

Default Format Tanggal SQL Server 2005

Default format tanggal yang digunakan oleh SQL Server 2005 adalah format ISO 8601 yang mempunya format yyyy-mm-ddThh:mm:ss[.mmm].
Sebelum membuat aplikasi, kita terlebih dahulu harus mengenali format tanggal yang digunakan oleh Database Engine, agar dikemudian hari tidak menyebabkan kekacauan. Tanggal 02 Agustus 2008 bisa saja berubah menjadi 08 Februari 2008 karena ada perubahan regional setting(khususnya format tanggal) pada mesin komputer kita.
Jika kita menggunakan VB 2005, sebelum memasukan data bertipe tanggal sebaiknya format dahulu tanggal tersebut dengan menggunakan String.Format
.
Contoh:
String.Format(“{0:yyyy/MM/dddd hh:mm:ss}”) dan bukan Format(date,”yyyy/MM/dd hh:mm:ss”)

dengan cara diatas, apapun format tanggal di komputer kita tidak akan menimbulkan masalah, karena data yang akan kita masukan sudah menggunakan format ISO 8601

Filed under: SQL, VB .Net

Membulatkan Angka Keatas (Ceiling)

Untuk membulatkan angka pecahan di visual basic 6 kita dapat menggunakan fungsi Round, kira-kira hasilnya akan sebagai berikut :
Round(1.1) -> 1
Round(1,5) -> 2
Round(1,7) -> 2

Bagaimana jika kita ingin membulatkan selalu kebawah? gampang…., tinggal ambil nilai integernya.
Int(1.1) -> 1
Int(1,5) -> 1
Int(1,7) -> 1

Yang agak sulit, bagaimana jika kita ingin pembulatan selalu keatas? pake fungsi apa ya?, hmmm… saya sempat bingung juga, tapi akhirnya ketemu caranya juga, caranya sebagai berikut :

Buat fungsi berikut :

Function Ceiling(number As Double) As Long
    Ceiling = -Int(-number)
End Function

Cara penggunaannya :
x=Ceiling(1.1) -> x=2
x=Ceiling(1,5) -> x=2
x=Ceiling(1,7) -> x=2

Filed under: VB 6