SQL den alınan tarih bilgisini düzenleme
Loading ...Bildiğiniz üzere hem MSSQL hem de MySQL den bir tarih alanını çektiğimizde bize TR formatında gelmez.(default server ayarları ile). Bize dönen string 2007-03-28 gibidir. Bunu bizim tarih formatımız olan 28-03-2007 şekline çevirmek için aşağıdaki fonksiyonu kullanabilirsiniz.
İlk fonksiyon sadece tarihi, ikinci fonksiyon ise hem tarihi hemde zamanı çevirir.
'Sadece Tarihi Çevirir.
Function SqLDate(Tarih As String)
Dim Gun As String
Dim Ay As String
Dim YIL As String
Tarih = left$(Tarih, 10)
Gun = left$(Tarih, 2)
Ay = Mid$(Tarih, 4, 2)
YIL = right$(Tarih, 4)
SqlDate = YIL & "-" & Ay & "-" & Gun
End Function
'Hem Tarihi Hemde Zamanı Çevirir
Function SqLDateTime(DateTime As String)
Dim Gun As String
Dim Ay As String
Dim YIL As String
Dim ssaaT As String
Dim Saat As String
Dim Dakika As String
Dim Saniye As String
ssaaT = right$(DateTime, 9)
DateTime = left$(DateTime, 10)
Gun = left$(DateTime, 2)
Ay = Mid$(DateTime, 4, 2)
YIL = right$(DateTime, 4)
SqlDateTime = YIL & "-" & Ay & "-" & Gun & ssaaT
End Function
Kolay Gelsin.
Benzer Yazılar
Eğer yazıyı beğendiyseniz ya da ekleyecekleriniz varsa, lütfen yorumunuz yazın veya RSS aboneliği ile yeni yazılardan anında haberdar olun.
tablom lokal mysql de ama ona dinamik bağlantı ile Access2007 den bağlanıyorum. oluşturduğum formdan tarihi gg.aa.yy şeklinde nasıl girebilirim ???