Skip to main content

How To Separate Date & Time For DateTime Format In SQL2005 With VB.Net

I'm sure few people just like i did a few hours ago. i have a problem when having a code and debugging an application in VB.Net. 

case :
i want to show data in datagridview from a database with field using DateTime type. but sure it was confused me, how to show data for only the time not include the date (sample, 13:30:00). as datetime format is should always shows (29/07/2013 13:30:00).

then after fighting  couple hours finally i get this code. so i hope it can solve if one of you having same trouble as i did...

DTA = New SqlDataAdapter("SELECT IdMaintenance, IdMesin, IdSistemUser, IdSimpulMasalah, " & _
                                     "IdSeksi, Convert(Varchar,JamMulai,101) as Mulai, " & _
                                     "Convert(Varchar,JamMulai,108) as JMulai, " & _
                                     "Convert(Varchar,JamSelesai,101) as Selesai, " & _
                                     "Convert(Varchar,JamSelesai,108) as JSelesai, " & _
                                     "InformasiMain, PenyebabMain, PerbaikanMain, TindakanMain, PesanMain " & _
                                     "FROM MaintenanceTabel ORDER BY IdMaintenance ASC", MeKONEKSI.BUKAKONEKSI)


pay more attention to codes :

Convert(Varchar,JamMulai,101) as Mulai
above code is to show only DATE data from field name JamMulai (29/07/2013)

Convert(Varchar,JamMulai,108) as JMulai
above code is to show only TIME data from field name JamMulai (13:30:00)

Comments

Popular posts from this blog

CheckBox dalam DataGridView VB.Net

Pada saat membuat aplikasi (VB.Net) untuk materi skripsi, terbesit bagaimana cara baru untuk memberikan hak akses user secara dinamis pada sistem. setelah dicoba dengan tanya-tanya. akhirnya bisa mendapatkan cara itu... wah sesuatu banget dah.... inti dari posting ini hanya pada barisan kode berikut : Private Sub BtnSIMPAN_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnSIMPAN.Click         Dim Y As String = Mid(CmbUSER.Text, 1, 7)         Dim iROW As Integer         Dim AKSES As String         For iROW = 0 To DGVSample.Rows.Count - 1             'AksesBox = Nama CheckBox yang ada di DatagridView             If DGVSample.Rows(iROW).Cells("AksesBox").Value Then    ...

APLIKASI TERBILANG VB.NET DENGAN CLASS

Agan-agan sekalian, kali ini kita akan coba untuk membuat Aplikasi Terbilang VB.Net 2005. seperti tutorial sebelumnya buatlah sebuah form aplikasi untuk me-run lalu tambahkan sebuah CLASS pada aplikasi anda dan isikan kodingnya seperti dibawah ini dengan seksama Public Class CLASS_TERBILANG   Public Function ANGKA_TERBILANG(ByVal n As Double) As String   Dim SATUAN As String() = {"", "SATU", "DUA", "TIGA", "EMPAT", "LIMA", _   "ENAM", "TUJUH", "DELAPAN", "SEMBILAN", "SEPULUH", "SEBELAS"}   Select Case n   Case 0 To 11   ANGKA_TERBILANG = " " + SATUAN(Fix(n))   Case 12 To 19   ANGKA_TERBILANG = ANGKA_TERBILANG(n Mod 10) + " BELAS"   Case 20 To 99   ANGKA_TERBILANG = ANGKA_TERBILANG(Fix(n / 10)) + " PULUH" + _   ANGK...