/ Forside / Teknologi / Udvikling / VB/Basic / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
VB/Basic
#NavnPoint
berpox 2425
pete 1435
CADmageren 1251
gibson 1230
Phylock 887
gandalf 836
AntonV 790
strarup 750
Benjamin... 700
10  tom.kise 610
Kald af foresprøgsel i Acces
Fra : Beck


Dato : 09-06-02 13:16

Jeg har brug for at kunne udskrive resultatet af en Acces foresprørgsel. Kan
man det i VB5
Jeg kan godt udskrive hele DB´en
Jeg skal også kunne ændre kriterierne i forsprg, men jeg kan ikke finde ud
af det.

Hjælp.......please.


MVH lars.




 
 
Beck (09-06-2002)
Kommentar
Fra : Beck


Dato : 09-06-02 23:34

Nu virker det næsten.

Set qdef = db.CreateQueryDef("", _
"SELECT * FROM indtastTabel where dato Between (#05-06 2002#) And
(#07-06 2002#);")

Men den udskiller ikke data rigtig. Der kommer både tidligere og senere
datoer med.
Hvad gør jeg forkert ?
Jeg har også brug for at kunne bruge variabler istedet for #05-06 2002#, kan
man det ?


MVH. Lars




Jan V. (10-06-2002)
Kommentar
Fra : Jan V.


Dato : 10-06-02 06:52


"Beck" <Lars.Beck@REMOVEmail.tdcadsl.dk> skrev i en meddelelse
news:3d03d787$0$74244$edfadb0f@dspool01.news.tele.dk...
> Nu virker det næsten.
>
> Set qdef = db.CreateQueryDef("", _
> "SELECT * FROM indtastTabel where dato Between (#05-06 2002#) And
> (#07-06 2002#);")
>
> Men den udskiller ikke data rigtig. Der kommer både tidligere og senere
> datoer med.
> Hvad gør jeg forkert ?
> Jeg har også brug for at kunne bruge variabler istedet for #05-06 2002#,
kan
> man det ?
>
>
> MVH. Lars
>
>
>

Prøv med:

"SELECT * FROM indtastTabel where dato>= #05-06 2002# And
dato<= #07-06 2002#)"

Jan




Tomas Christiansen (10-06-2002)
Kommentar
Fra : Tomas Christiansen


Dato : 10-06-02 21:30

Jan V. skrev:
> Prøv med:
>
> "SELECT * FROM indtastTabel where dato>= #05-06 2002# And
> dato<= #07-06 2002#)"

Hmm?
Hvis Access følger standard VB(A) format for datoer, bør der bruges
"/" som skilletegn i stedet for "-", og dette skilletegn skal også
være mellem dag-måned og årstal (mellemrum mellem disse er nok ikke så
smart). Husk desuden at formatet er MM/DD/YYYY - altså amerikansk
dato-standard. Ydermere er der en ikke-parret (un-matched)
højre-parentes i udtrykket.

Hvis det er meningen at der skal bruges data i perioden 5. juni 2002
og 7. juni 2002, vil mit bud nok være:

"select * from indtastTabel " & _
"where dato between #06/05/2002# and #06/07/2002#"

Ønsker man i stedet at bruger VB-variabler til at angive fra- og
til-datoerne, kunne det jo være:

Function DBDate(ByVal dDate As Date) As String
DBDate = "#" & Format(dDate, "MM\/DD\/YYYY") & "#"
End Function

Dim dFraDato As Date: dFraDato = #06/05/2002#
Dim dTilDato As Date: dTilDato = #06/07/2002#

"select * from indtastTabel " & _
"where dato between " & DBDate(dFraDato) " & _
" and " & DBDate(dTilDato)

-------
Tomas


Jan V. (11-06-2002)
Kommentar
Fra : Jan V.


Dato : 11-06-02 08:00


"Tomas Christiansen" <toc@blikroer.removethis.dk> skrev i en meddelelse
news:ae328u$2po4$1@news.cybercity.dk...
> Jan V. skrev:
> > Prøv med:
> >
> > "SELECT * FROM indtastTabel where dato>= #05-06 2002# And
> > dato<= #07-06 2002#)"
>
> Hmm?
> Hvis Access følger standard VB(A) format for datoer, bør der bruges
> "/" som skilletegn i stedet for "-", og dette skilletegn skal også
> være mellem dag-måned og årstal (mellemrum mellem disse er nok ikke så
> smart). Husk desuden at formatet er MM/DD/YYYY - altså amerikansk
> dato-standard. Ydermere er der en ikke-parret (un-matched)
> højre-parentes i udtrykket.
>
> Hvis det er meningen at der skal bruges data i perioden 5. juni 2002
> og 7. juni 2002, vil mit bud nok være:
>
> "select * from indtastTabel " & _
> "where dato between #06/05/2002# and #06/07/2002#"
>
> Ønsker man i stedet at bruger VB-variabler til at angive fra- og
> til-datoerne, kunne det jo være:
>
> Function DBDate(ByVal dDate As Date) As String
> DBDate = "#" & Format(dDate, "MM\/DD\/YYYY") & "#"
> End Function
>
> Dim dFraDato As Date: dFraDato = #06/05/2002#
> Dim dTilDato As Date: dTilDato = #06/07/2002#
>
> "select * from indtastTabel " & _
> "where dato between " & DBDate(dFraDato) " & _
> " and " & DBDate(dTilDato)
>
> -------
> Tomas
>

Tja, jeg havde ikke lige fanget den med "/" og "-" - men generelt er dato
noget sjovt noget at rode med ifbm Access.

Jan



Carsten Pedersen (11-06-2002)
Kommentar
Fra : Carsten Pedersen


Dato : 11-06-02 18:59


"Jan V." <jv@miljodata.dk> skrev i en meddelelse
news:3d05a057$0$80384$edfadb0f@dspool01.news.tele.dk...
>
> "Tomas Christiansen" <toc@blikroer.removethis.dk> skrev i en meddelelse
> news:ae328u$2po4$1@news.cybercity.dk...
> > Jan V. skrev:
> > > Prøv med:
> > >
> > > "SELECT * FROM indtastTabel where dato>= #05-06 2002# And
> > > dato<= #07-06 2002#)"
> >
> > Hmm?
> > Hvis Access følger standard VB(A) format for datoer, bør der bruges
> > "/" som skilletegn i stedet for "-", og dette skilletegn skal også
> > være mellem dag-måned og årstal (mellemrum mellem disse er nok ikke så
> > smart). Husk desuden at formatet er MM/DD/YYYY - altså amerikansk
> > dato-standard. Ydermere er der en ikke-parret (un-matched)
> > højre-parentes i udtrykket.
> >
> > Hvis det er meningen at der skal bruges data i perioden 5. juni 2002
> > og 7. juni 2002, vil mit bud nok være:
> >
> > "select * from indtastTabel " & _
> > "where dato between #06/05/2002# and #06/07/2002#"
> >
> > Ønsker man i stedet at bruger VB-variabler til at angive fra- og
> > til-datoerne, kunne det jo være:
> >
> > Function DBDate(ByVal dDate As Date) As String
> > DBDate = "#" & Format(dDate, "MM\/DD\/YYYY") & "#"
> > End Function
> >
> > Dim dFraDato As Date: dFraDato = #06/05/2002#
> > Dim dTilDato As Date: dTilDato = #06/07/2002#
> >
> > "select * from indtastTabel " & _
> > "where dato between " & DBDate(dFraDato) " & _
> > " and " & DBDate(dTilDato)
> >
> > -------
> > Tomas
> >
>
> Tja, jeg havde ikke lige fanget den med "/" og "-" - men generelt er dato
> noget sjovt noget at rode med ifbm Access.
>
> Jan

Jeg fik engang nogle sjove resultater, når jeg skulle indtaste datoer via en
formular i ASP (VBScript), da de blev oversat helt forkert ved overførsel
til Access. Men så fandt jeg på at overføre dem som en streng i stedet for,
og det gik fint. Har siden lavet det samme nummer i Visual Basic, hvor det
også fungerer uden problemer - i hvert fald med ADO.

Mvh

C@rsten


Besøg min hjemmeside på adressen
http://www.wwwizard.dk




Søg
Reklame
Statistik
Spørgsmål : 177557
Tips : 31968
Nyheder : 719565
Indlæg : 6408885
Brugere : 218888

Månedens bedste
Årets bedste
Sidste års bedste