Hej! <code> Glömde säga att jag skulle använda det med ASP och koden du skrev var väl för VB eller? Jag försökte konvertera den med jag lyckades inte så bra. Någon som kan?? Testa: Jag fick ändra lite i formatet i databasfältet men sen funkade det!SQL och datum
Om jag har en databas med ett antal poster som alla har ett datum och jag vill hämta alla poster från en månad ett visst år, om jag vet årtal och månad den ska visa? Hoppas ni förstår vad jag menar!
/ CarlSv: SQL och datum
Dim strSQL
Dim FirstDate
Dim LastDate
FirstDate = DateSerial(2001, 12, 1)
LastDate = DateSerial(2001, 12 + 1, 1)
strSQL = "SELECT * FROM TabellNamn WHERE FältNamn >= " & SQLDate(FirstDate) & " And FältNamn < " & SQLDate(LastDate)
Function SQLDate(Value as Variant) As String
If IsDate(Value) Then
SQLDate = "#" & Format$(Value, "m\/d\/yyyy") & "#"
Else
SQLDate = "Null"
End If
End Function
</code>Sv: SQL och datum
// CarlSv: SQL och datum
<code>
Function SQLDate(Value)
If IsDate(Value) Then
SQLDate = "#" & Month(Value) & "/" & Day(Value) & "/" & Year(Value) & "#"
Else
SQLDate = "Null"
End If
End Function
</code>Sv: SQL och datum
Tack!
/ Carl