Notifikationer

Markér alle som læst Log ud

bsn Forsker

Oprettet i går kl. 14:01 Der er 4 kommentarer

VBS

Prøver at finde mandage i en periode...loop

bruger
Fradato = Datoer i en given periode...

If WeekDay(Fradato)=2 Then

Synes godt om

arne_v Ekspert

Skrevet i går kl. 14:23 #1

Til inspiration:

startd = CDate("Jan 01 2026")
endd = CDate("Dec 31 2026")
d = startd
While d <= endd
If weekday(d) = 2 Then
WScript.Echo CStr(d)
End If
d = dateadd("d", 1, d)
WEnd

Synes godt om

bsn Forsker

Skrevet i går kl. 23:58 #2

Har prøvet at gemme dit forslag i database :

Sql="INSERT INTO tblBooking(Book) VALUES(" & d & ");"
Conn.Execute(Sql)

Giver nedenstående datoer...

17-06-1894
24-06-1894
01-07-1894
08-07-1894
13-06-1894
20-06-1894
27-06-1894
04-07-1894
12-06-1894
19-06-1894
26-06-1894
03-07-1894
10-07-1894
15-06-1894
22-06-1894
29-06-1894
06-07-1894
12-06-1894
19-06-1894
26-06-1894
03-07-1894
08-06-1894
15-06-1894
22-06-1894
29-06-1894
06-07-1894
12-06-1894
19-06-1894
26-06-1894
03-07-1894
08-06-1894
15-06-1894
22-06-1894
29-06-1894
06-07-1894
11-06-1894
18-06-1894
25-06-1894
02-07-1894
08-06-1894
15-06-1894
22-06-1894
29-06-1894
04-06-1894
11-06-1894
18-06-1894
25-06-1894
02-07-1894
08-06-1894
15-06-1894
22-06-1894
29-06-1894

Synes godt om

arne_v Ekspert

Skrevet i dag kl. 00:10 #3

Hvad med:

Sql="INSERT INTO tblBooking(Book) VALUES(" & CStr(d) & ");"

?

Synes godt om

arne_v Ekspert

Skrevet i dag kl. 00:11 #4

Hvis det ikke virker skal du formatere datoen som databasen forventer *eller* bruge parameters.

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

Programmeringssprog kurser

Kurser inden for grundlæggende programmering

Se alle Programmeringssprog kurser

Flere spørgsmål fra VBscript kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Ændre navn på folder Af bsn i VBscript	12	07/07/202312:45	09/07/202307:04
Outlook makro Af Webnoob i VBscript	6	09/02/202313:32	16/02/202315:51
Sti / Filname med mellemrum ??? Af ksor i VBscript	10	07/10/202200:43	07/10/202215:40
GetLastRow - Google spreadsheet Af rickiegrayholm i VBscript	2	22/04/202213:23	22/04/202214:55
Batch fil Af BDV i VBscript	1	12/01/202210:00	12/01/202210:05

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