Jag har en databas med en datum post som jag skall göra urval efter i ett vb formulär. Hej ...och sedan om det är sparat som en DateTime i databasen : Det finns en trevlig funktion som heter DateSerial(). Jämnföra datum från en databas
Problemet är att datumet skall skrivas in i tre textboxar: År ,Månad ,Dag.
Hur får jag vb att slå samman informationen i dom tre textboxarna för att kunna jämnför mot datum posten i databasen med en if sats?
Tack på FörhandSv: Jämnföra datum från en databas
Woops
Dim dString As String
dString = Text1.Text & "-" & Text2.Text & "-" & Text3.TextSv: Jämnföra datum från en databas
<code>
if cDate(dString) = cDate(rsMyRecordset.Fields("Datum").value) then
...
end if
</code>
annars kanske datumet är sparat som en sträng (varchar, text, nvarchar el dyl) och då blir det ju en ren strängjämförelse. Möjligen behöver du då gardera dig för månader och dagar med inledande nolla, vilket du kan göra genom att använda format() :
<code>
dDate = txtYear.text & "-" & format(txtMonth.text,"00") & "-" & format(txtDay.text,"00")
</code>
Finns säkert mer att säga om detta, men hör av dig om du inte fick den info du behövde...Sv: Jämnföra datum från en databas
<code>
Dim MyDate As Date
MyDate = DateSerial(txtÅr.Text, txtMånad.Text, txtDag.Text)
</code>