CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg

Log ind eller opret profil

Du kan også logge ind via nedenstående tjenester

ferdinand.k Mester

14. juli 2003 - 07:56 Der er 26 kommentarer og
1 løsning

hvad er der i vejen med den her?!

Betalingsfrist er en tekstboks i en rapport, og nedenstående bliver aktiveret når rapporten bliver aktiveret!

If Format(Now(), "m") = 12 Then
Betalingsfrist = "1-1" & "-" & Format(Now(), "yyyy") + 1
Betalingsfrist_ = "1-1" & "-" & Format(Now(), "yyyy") + 1
Else
Betalingsfrist = "1-" & Format(Now(), "m") + 1 & "-" & Format(Now(), "yyyy")
Betalingsfrist_ = "1-" & Format(Now(), "m") + 1 & "-" & Format(Now(), "yyyy")
End If

Synes godt om

ferdinand.k Mester

14. juli 2003 - 07:57 #1

nogen gange virker den, andre gange ikke...

Synes godt om

ferdinand.k Mester

14. juli 2003 - 07:58 #2

den brokker sig i 5 linie...

Synes godt om

terry Ekspert

14. juli 2003 - 08:14 #3

Try
Betalingsfrist = "1-" & Format(Now(), "m") & "1"

Synes godt om

terry Ekspert

14. juli 2003 - 08:15 #4

Your mixing strings and numbers as far as I can see and you cant ADD (+) 1 to a sting but you can append it with &

Synes godt om

molberg Nybegynder

14. juli 2003 - 08:22 #5

1. Jeg ville nok bruge Month(Now()) i linie 1 istedet for format()
2. Til at regne med datoer kan du bruge DateAdd. jeg går ud fra du ønsker at lægge en dag til din dato.

mvh
Steen

Synes godt om

terry Ekspert

14. juli 2003 - 08:23 #6

You should also look at functions year() and month()

Synes godt om

ferdinand.k Mester

14. juli 2003 - 08:24 #7

er de anderledes end brugen af now()?

Synes godt om

terry Ekspert

14. juli 2003 - 08:26 #8

If Month(now()) = 12 Then
Betalingsfrist = "1-1" & "-" & cstr(Year(now) + 1)
Betalingsfrist_ = "1-1" & "-" & cstr(Year(now) + 1)
Else
Betalingsfrist = "1-" & cstr(now() + 1) & "-" & cstr(Year(now)
Betalingsfrist_ = "1-" & cstr(now() + 1) & "-" & cstr(Year(now)
End If

Synes godt om

terry Ekspert

14. juli 2003 - 08:28 #9

If Month(now()) = 12 Then
Betalingsfrist = "1-1" & "-" & cstr(Year(now()) + 1)
Betalingsfrist_ = "1-1" & "-" & cstr(Year(now()) + 1)
Else
Betalingsfrist = "1-" & cstr(now() + 1) & "-" & cstr(Year(now())
Betalingsfrist_ = "1-" & cstr(now() + 1) & "-" & cstr(Year(now())
End If

Synes godt om

ferdinand.k Mester

14. juli 2003 - 08:33 #10

alle dine forslag, terry, kommer ud med "1-71", hvor der skal stå "1-7-2003"

Synes godt om

ferdinand.k Mester

14. juli 2003 - 08:34 #11

1-8-2003 skal der naturligvis stå...

Synes godt om

terry Ekspert

14. juli 2003 - 08:38 #12

Oops

If Month(now()) = 12 Then
Betalingsfrist = "1-1" & "-" & cstr(Year(now()) + 1)
Betalingsfrist_ = "1-1" & "-" & cstr(Year(now()) + 1)
Else
Betalingsfrist = "1-" & cstr(month(now()) + 1) & "-" & cstr(Year(now())
Betalingsfrist_ = "1-" & cstr(month(now() + 1)) & "-" & cstr(Year(now())
End If

Synes godt om

terry Ekspert

14. juli 2003 - 08:41 #13

"1-" & month(now()+1 ) & "-" & cstr(Year(now()))

Synes godt om

terry Ekspert

14. juli 2003 - 08:42 #14

we'll get there

"1-" & month(now() )+1 & "-" & cstr(Year(now()))

Synes godt om

ferdinand.k Mester

14. juli 2003 - 08:49 #15

sådan skal den se ud:

If Month(Now()) = 12 Then
Betalingsfrist = "01-01" & "-" & CStr(Year(Now()) + 1)
Betalingsfrist_ = "01-01" & "-" & CStr(Year(Now()) + 1)
Else
Betalingsfrist = "01-" & CStr(Month(Now()) + 1) & "-" & CStr(Year(Now()))
Betalingsfrist_ = "01-" & CStr(Month(Now() + 1)) & "-" & CStr(Year(Now()))
End If

Synes godt om

terry Ekspert

14. juli 2003 - 08:53 #16

! But doesnt
Betalingsfrist = "01-" & CStr(Month(Now()) + 1) & "-" & CStr(Year(Now()))

return 01-7-2003?

Synes godt om

ferdinand.k Mester

14. juli 2003 - 08:55 #17

nej, den laver jo også "Month(Now()) + 1)"....

Synes godt om

terry Ekspert

14. juli 2003 - 08:57 #18

well thats what I thought at first but when I test it it returns 01-7-2003

But if its working with you then great :o)

Synes godt om

ferdinand.k Mester

14. juli 2003 - 08:58 #19

den første version kom ud med 01-7-2003, men den så jo også ud som: cstr(now() + 1)

Synes godt om

terry Ekspert

14. juli 2003 - 09:00 #20

take a look at these two lines, the calculations are NOT the same!
CStr(Month(Now()) + 1) and CStr(Month(Now() + 1)) do not give the same result!

Betalingsfrist = "01-" & CStr(Month(Now()) + 1) & "-" & CStr(Year(Now()))
Betalingsfrist_ = "01-" & CStr(Month(Now() + 1)) & "-" & CStr(Year(Now()))

Synes godt om

terry Ekspert

14. juli 2003 - 09:00 #21

the first is correct

Synes godt om

ferdinand.k Mester

14. juli 2003 - 09:01 #22

i know, i made the correction right after posting it here.. :) but thanx for mentioning...

Synes godt om

molberg Nybegynder

14. juli 2003 - 09:02 #23

Nå det er det I vil! Jamen er det så ikke nemmere med:

DateSerial(Year(Now)+1,Month(now),1)
og
DateSerial(Year(Now)+1,Month(now)+1,1)

mvh
Steen

Synes godt om

ferdinand.k Mester

14. juli 2003 - 09:04 #24

der er fart over feltet, hva molberg.. hehe

øhh, hva er det lige at den gør?

Synes godt om

molberg Nybegynder

14. juli 2003 - 09:06 #25

Check hjælpen. Den giver dig en adresse ud fra dag, måned og år. F.eks. DateSerial(2003,12,24) returnerer en dato for juleaften i år.
-Steen

Synes godt om

molberg Nybegynder

14. juli 2003 - 09:09 #26

En dato selvfølgelig...
Hmmm... jeg skal vidst have ferie :-)
Steen

Synes godt om

terry Ekspert

14. juli 2003 - 18:58 #27

yes there are many ways to do it :o)

Synes godt om

Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Følg dette spørgsmål

Opret Preview

Access kurser

Dyk ned i databasernes verden på et af vores praksisnære Access-kurser

Se alle Access kurser

Flere spørgsmål fra Access kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Usynlige tabeller, forespørgsler mm i Access Af sigyn i Access	4	18/07/202407:29	18/07/202410:32
Convertering af variabler Af per2edb i Access	1	30/06/202420:14	01/07/202409:18
Overfør global variabel via Macro Af per2edb i Access	7	24/06/202411:37	25/06/202408:02
vis tekst ved hjælp af mousover Af per2edb i Access	3	21/06/202409:00	21/06/202414:58
Valg af type fra liste skal åbne en rapport over alle poster med den valgte type Af visto i Access	5	07/06/202417:13	10/07/202412:34

Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS