Kannst Du doch noch die Tabellenstruktur schicken und was Du genau
brauchst?
Soweit konnte ich es schon entschl�sseln:
Select Start_Date, End_Date,
(Select Count(event_id) from tEvents Where Start_Date <=## and
End_Date>= ##)as anz
from tEvents Where Start_Date <=## and End_Date >= ##
Aber ich verstehe einiges in deinem Code nicht, z.B woher die 38
kommt... Vorhin war es doch noch ein Jahr...
Ausserdem scheinst Du globale Variablen zu benutzen, die Du weder in dem
Sub definierst, noch als Parameter reinbekommst (z.B. iStarttag,
sYear).. Dadurch wir Dein Code so losgel�st von der restlichen Seite
nicht gerade lesbar...
Und wozu brauchst Du iDateIncrement? Das scheint immer itag-1 zu sein...
Und f�r solche Konstrukte:
... #" & datePart("m",dValue)&"/" & datePart("d",dValue)&"/"& sYear & "#
....
Solltest Du Dir eine Funktion schreiben:
Function sqlDate(theDate)
sqlDate = "#" & datePart("m",theDate) & "/" & _
datePart("d",theDate) & "/" & _
datePart("yyyy",theDate) & "#"
End Function
Claudius
>
>
> Derzeit sieht das so aus:
>
> Sub WriteMonth(sDate)
>
> For itag = 1 to 38
> If bValidtag or itag = iStarttag Then
> bValidtag = True
>
>
> dValue = cDate(sDate) + iDateIncrement
> iDateIncrement = iDateIncrement + 1
>
> If datePart("m",dValue) <> iMonth Then
>
> bValidtag = False
> Call Writetag(itag,null,null,null)
> Else
>
>
> Set connudexrec=udexrec.Execute("Select Start_Date,
> End_Date,(Select
> Count(event_id) from tEvents Where Start_Date <=#" &
> datePart("m",dValue)&"/"& datePart("d",dValue)&"/"& sYear &
> "# and End_Date
> >= #" & datePart("m",dValue)&"/"& datePart("d",dValue)&"/"&
> sYear &"#)as anz
> >from tEvents Where Start_Date <=#" & datePart("m",dValue)&"/"&
> datePart("d",dValue)&"/"& sYear & "# and End_Date >= #" &
> datePart("m",dValue)&"/"& datePart("d",dValue)&"/"& sYear &"#")
>
> if not connudexrec.EOF then
> if connudexrec.Fields.Item("anz").Value > 1 then
> startval="anab"
> Else
> startval="norm"
> End if
> End if
>
> If connudexrec.EOF then
> Call Writetag(itag,dValue,null,null)
> Else
> Call Writetag(itag,dValue,dValue,startval)
> End if
> Set connudexrec=Nothing
> End If
> Else
>
> Call Writetag(itag,null,null,null)
> End If
> Next
>
> End Sub
>
>
>
> J�rg Schwalenberg
> _______________________________
> Extensions and Basics for Macromedia
> "Dreamweaver Ultradev"
> ..............................................................
> www.ultradevextensions.de
> www.udex.de
> [EMAIL PROTECTED]
> _______________________________
> ----- Original Message -----
> From: "Claudius Ceteras" <[EMAIL PROTECTED]>
> To: "AspGerman Kaffeehaus" <[EMAIL PROTECTED]>
> Sent: Wednesday, December 19, 2001 2:14 PM
> Subject: [aspdecoffeehouse] RE: AW: Re: AW: RE: Problem mit
> Recordcount in
> Connection
>
>
> Das h�rt sich an, als ob alles mit einer Abfrage funktionieren sollte,
> aber ich habe noch nicht richtig das DB-Schema verstanden....
> Kannst Du es mal skizzieren und/oder deine jetzigen Abfragen
> schicken...
>
> Claudius
>
> >
> >
> > Ich benm�tige eigentlich nur folgendes:
> >
> > In einer Buchungs DB wird ein Anreise - und ein Abreisedatum
> > angegeben.
> > Jetzt �berschneiden sich immer bei jeder Buchung das Anreise
> > und Abreise
> > Datum. Innerhalb der Buchung gibt es f�r dieses Datum nur
> > einen DS, An und
> > Abreise Tag hat immer zwei DS.
> >
> > In meiner Schleife ben�tige ich einmal den Tageswert f�r an-
> > und Abreise (
> > wegen eines anderen Images) und zum anderen den dazwischen
> > liegenden Wert
> > der Buchungstage.
> >
> > DS Daten ben�tige ich hier nicht, da es nur um die grafische
> > Anzeige des
> > Belegungsplanes geht.
> >
> > Jetzt habe ich ein Subselect gemacht. Das geht auch, aber
> ich mu� 365
> > Executes ausf�hren und das dauert mir zu lange. Die ganze
> > Sache l�uft auch
> > noch in SUBS ab.
> >
> >
> >
> > J�rg Schwalenberg
> > _______________________________
> > Extensions and Basics for Macromedia
> > "Dreamweaver Ultradev"
> > ..............................................................
> > www.ultradevextensions.de
> > www.udex.de
> > [EMAIL PROTECTED]
> > _______________________________
> > ----- Original Message -----
> > From: "Claudius Ceteras" <[EMAIL PROTECTED]>
> > To: "AspGerman Kaffeehaus" <[EMAIL PROTECTED]>
> > Sent: Wednesday, December 19, 2001 1:47 PM
> > Subject: [aspdecoffeehouse] RE: AW: Re: AW: RE: Problem mit
> > Recordcount in
> > Connection
> >
> >
> > >
> > > Hmm, vielleicht habe ich ja dein Problem falsch verstanden.
> > > Ich dachte,
> > > du willst wissen, wieviele Datens�tzen an jedem Tag im Jahr
> > > existieren.
> > >
> > > SELECT COUNT(*) AS Anzahl, YEAR(dtCreateDate) AS Jahr,
> > > MONTH(dtCreateDate) AS Monat, DAY(dtCreateDate) AS Tag
> > > >FROM tbl_Head
> > > GROUP BY YEAR(dtCreateDate), MONTH(dtCreateDate),
> DAY(dtCreateDate)
> > >
> > > Habe ich getestet, ist am MSSQL schnell, sollte auch bei Access
> > > funktionieren.
> > >
> > > lg
> > >
> > > Alex
> > >
> >
> > Er brauch wahrscheinlich nicht nur die Anzahl, sondern auch die
> > restlichen Tabellen-Daten...
> > Da bietet es sich an, lokal die Anzahl zu bestimmen, weil
> > sich sonst bis
> > zur n�chsten Anfrage die Anzahl auch �ndern kann...
> >
> > Claudius
> >
> >
> > | [aspdecoffeehouse] als [EMAIL PROTECTED] subscribed
> > | http://www.aspgerman.com/archiv/aspdecoffeehouse/ = Listenarchiv
> > | Sie k�nnen sich unter folgender URL an- und abmelden:
> > |
> > http://www.aspgerman.com/aspgerman/listen/anmelden/aspdecoffee
> house.asp
>
>
> | [aspdecoffeehouse] als [EMAIL PROTECTED] subscribed
> | http://www.aspgerman.com/archiv/aspdecoffeehouse/ = Listenarchiv
> | Sie k�nnen sich unter folgender URL an- und abmelden:
> |
> http://www.aspgerman.com/aspgerman/listen/anmelden/aspdecoffee
house.asp
| [aspdecoffeehouse] als [EMAIL PROTECTED] subscribed
| http://www.aspgerman.com/archiv/aspdecoffeehouse/ = Listenarchiv
| Sie k�nnen sich unter folgender URL an- und abmelden:
|
http://www.aspgerman.com/aspgerman/listen/anmelden/aspdecoffeehouse.asp
| [aspdecoffeehouse] als [EMAIL PROTECTED] subscribed
| http://www.aspgerman.com/archiv/aspdecoffeehouse/ = Listenarchiv
| Sie k�nnen sich unter folgender URL an- und abmelden:
|
http://www.aspgerman.com/aspgerman/listen/anmelden/aspdecoffeehouse.asp
| [aspdecoffeehouse] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdecoffeehouse/ = Listenarchiv
| Sie k�nnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdecoffeehouse.asp
