ich rede einen quark, der fehler liegt wo ganz anders. ;-)

find den schon, hehe

-----Urspr�ngliche Nachricht-----
Von: Thomas Bandt [mailto:[EMAIL PROTECTED]]
Gesendet: Mittwoch, 21. November 2001 11:12
An: ASP Diskussionsliste fuer Anfaenger
Betreff: [aspdebeginners] AW: Datum


danke erstmal, hab es allerdings schon hinbekommen denke ich.

nur bringt er mir jetzt bei folgendem einen "�berlauf", kann
damit gar nichts anfangen. :(

                        Dim Heute               :               Heute = date()
                        Dim Gestern             :               Gestern = date() - 1

                        SET RSCheckIt = objCon.execute("SELECT * FROM Traffic WHERE 
Datum Like '"
& Heute & "' OR Datum Like '" & Gestern & "'")

                        While Not RSCheckIt.EOF
                                Dim intSumme, strOutput
                                        intSumme = intSumme + 
RSCheckIt.Fields("VTraffic").Value
                                        i = i + 1
                        RSCheckIt.MoveNext
                        Wend

                        RSCheckIt.Close
                        SET RSCheckIt = Nothing

-----Urspr�ngliche Nachricht-----
Von: Andreas Roth [mailto:[EMAIL PROTECTED]]
Gesendet: Mittwoch, 21. November 2001 11:12
An: ASP Diskussionsliste fuer Anfaenger
Betreff: [aspdebeginners] AW: Datum


Du musst das Datum erst in ein Format bringen, dass die Datenbank lesen
kann. Leider ist dass je nach DB sehr unterschiedlich.

Hier 3 Funktionen die das f�r Access oder SQL Server erledigen.
Anwendung zB.

> SET RSCheckIt = objCon.execute("SELECT * FROM Traffic WHERE
> Datum LIKE " &
> Heute & " AND LIKE " & AccessDate(Gestern) & "")

'---------------------------------------------------------------------------
----
' Stellt je nach Bedarf "0"llen vor einen String
'---------------------------------------------------------------------------
----
Function FillWithZeros(DerString , Stellen )
    Dim AnzahlNullen , Zaehler
    If Len(DerString) < Stellen Then
        AnzahlNullen = Stellen - Len(DerString)
        For Zaehler = 1 To AnzahlNullen
            FillWithZeros = FillWithZeros & "0"
        Next
    End If
    FillWithZeros = FillWithZeros & DerString
End Function
'---------------------------------------------------------------------------
----
' Wandelt Datum in T-SQL lesbares Format
'---------------------------------------------------------------------------
----
Function SQLDate(DasDatum)
    SQLDate = "'" & FillWithZeros(Year(DasDatum), 2) &
FillWithZeros(Month(DasDatum), 2) & FillWithZeros(Day(DasDatum), 2) & "'"
End Function

'---------------------------------------------------------------------------
----
' Wandelt Datum in Access-SQL lesbares Format
'---------------------------------------------------------------------------
----
Function AccessDate(DasDatum )
    AccessDate = "#" & Month(DasDatum) & "/" & Day(DasDatum) & "/" &
Year(DasDatum) & "#"
End Function


Andreas Roth
--------------------------------------
[EMAIL PROTECTED]           *jetzt mit Chat*
http://www.EuphoriasChild.DarkTech.org
--------------------------------------

> -----Urspr�ngliche Nachricht-----
> Von: Thomas Bandt [mailto:[EMAIL PROTECTED]]
> Gesendet: Mittwoch, 21. November 2001 10:04
> An: ASP Diskussionsliste fuer Anfaenger
> Betreff: [aspdebeginners] Datum
>
>
> guten morgen allerseits,
>
> ich will eigentlich nur alle datens�tze auslesen von
> heute oder gestern, aber er mag nicht:
>
> Dim Heute             :               Heute = date()
> Dim Gestern           :               Gestern = date() - 1
>
> SET RSCheckIt = objCon.execute("SELECT * FROM Traffic WHERE
> Datum LIKE " &
> Heute & " AND LIKE " & Gestern & "")
>
> habe bestimmt schon 10 varianten ausprobiert... aber er
> will einfach nicht.
>
> Auch SELECT * FROM Traffic WHERE Datum =  " & Heute & " geht zb
> net.
>
> er bringt dann einen syntax-fehler.
>
>
> | Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
> | [aspdebeginners] als [EMAIL PROTECTED] subscribed
> | http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
> | Sie knnen sich unter folgender URL an- und abmelden:
> |
http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp

| Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
| [aspdebeginners] als [EMAIL PROTECTED] subscribed
| http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
| Sie knnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp


| Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
| [aspdebeginners] als [EMAIL PROTECTED] subscribed
| http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
| Sie knnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp


| Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
| [aspdebeginners] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
| Sie knnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp

Antwort per Email an