[es] - Konvertovanje varchar u datetime

klacklac
otpravnik,železnica
024 Sb

Član broj: 200408
Poruke: 2
91.150.98.*

Profil

^{07.11.2008. u 08:29 - pre 214 meseci}

Molim za pomoć,
Koristim vb6 i sql server 2005. Imam tabelu voz i u njoj kolone datum,voz_broj...Kolona datum je tipa varchar(50), što je i problem, ali ne može drugačije.
Potrebno je pretražiti tabelu između datuma.

Kod je sledeći:

Private Sub cmdPrikaz_Click()
rst.Open "select voz_broj from voz where convert(datetime,datum,4) between
convert(datetime,'" & DTPicker1.Value & "',4) and convert(datetime,'" & DTPicker2.Value & "',4)", con, adOpenDynamic, adLockOptimistic
Set MSHFlexGrid1.DataSource = rst
rst.Close
End Sub

Ovo ne radi: "Conversion failed when converting datetime from character string"

Pokušavao sam razne kombinacije, a radi samo sledeće:

Private Sub cmdPrikaz_Click()
rst.Open "select voz_broj from voz where convert(datetime,datum,4) between
convert(datetime,'01.10.08',4) and convert(datetime,'25.11.08',4)", con, adOpenDynamic, adLockOptimistic
Set MSHFlexGrid1.DataSource = rst
rst.Close
End Sub

Ovo mi nije od značaja jer korisniku je potrebno da sam bira datume. Koristim dtpicker, ali slučaj je isti za textbox.
Ima li neko ideju?

Odgovor na temu

Jbyn4e

Član broj: 422
Poruke: 6049
*.yunix.co.rs.

+257 Profil

Re: Konvertovanje varchar u datetime

^{07.11.2008. u 12:31 - pre 214 meseci}

Da. Ideja je da postujes u pravi forum. Ovde se prica o MySQL-u (maj, ne ms).

moderatori - premestite ovo... u ms sql.

Kad sve ostalo zakaže, pročitaj uputstvo...

Odgovor na temu

klacklac
otpravnik,železnica
024 Sb

Član broj: 200408
Poruke: 2
93.86.76.*

Profil

Re: Konvertovanje varchar u datetime

^{07.11.2008. u 13:46 - pre 214 meseci}

OK izvinjavam se na smetnji, problem rešen

Private Sub cmdPrikaz_Click()
rst.Open "select datum,voz_broj from voz where convert(datetime,datum,4) between
'" & Format(DTPicker1.Value, "yyyy.MM.dd") & "' and '" & Format(DTPicker2.Value, "yyyy.MM.dd") & "'", con, adOpenDynamic, adLockOptimistic
Set MSHFlexGrid1.DataSource = rst
rst.Close
End Sub

Odgovor na temu