---
title: "dateadd"
type: "forum-thread"
url: "https://www.webforum.nu/amne/dotnet/169230-dateadd"
topic: ".NET"
topic_url: "https://www.webforum.nu/amne/dotnet"
author: "devotion"
published: "2008-02-20T21:45:41.000Z"
updated: "2008-02-20T22:48:37.000Z"
replies: 1
views: 375
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/dotnet/169230-dateadd"
---

# dateadd

## #1 — devotion, 2008-02-20T21:45Z

Jag har följande kod som skall lägga till en vecka på ett befintligt datum...

Datumet består av både datum och tid enligt: 2005-01-03 08:00:00.00

Lägger jag till 7 dagar enlgt koden nedan, så blir resultatet: 2005-01-10 00:00:00.000

Hur gör jag för att behålla klockslaget, när jag lägger till 7 dagar?

Mvh 
Henrik :)  

```
sSQL="SELECT * FROM tblTask_grund_lönn order by [PlanStartDate]"
	Rs.Open sSQL, Conn
	
	iId = 1000000
	
	while not Rs.EOF
		
		tmPlanStartDate = Rs("PlanStartDate")
		tmPlanStopDate = Rs("PlanStopDate")
		
		sCreatedBy = Rs("CreatedBy")
		sTaskNr = Rs("TaskNr")
		sUserName = Rs("User")
		sCustomerNr = Rs("CustomerNr")
		sCustomerName = Rs("CustomerName")
		sTask = Rs("Task")
		
		For i = 1 to 4
			
			tmNewPlanStartDate=dateAdd("d", tmPlanStartDate, i*7)
			tmNewPlanStopDate=dateAdd("d", tmPlanStopDate, i*7)
			
			if sSQL <> "" then sSQL = sSQL & vbcrlf
			sSQL = sSQL & "INSERT INTO [tblTask_grund_lönn] ([Id], [CreatedBy], [TaskNr], [PlanStartDate], [PlanStopDate], [User], [CustomerNr], [CustomerName], [Task])" _
						& " Values (" & iId & ", '" & sCreatedBy & "', '" & sTaskNr & "', '" & tmNewPlanStartDate & "', '" & tmNewPlanstopDate & "', '" & sUserName & "', '" & sCustomerNr & "', '" & sCustomerName & "', '" & sTask & "')"
			iId = iId+1
		next
		Rs.MoveNext
	wend
```

Permalänk: https://www.webforum.nu/p/169230

## #2 — voigtann1, 2008-02-20T22:48Z

2005-01-03 08:00:00.00 ser inte ut som ett korrekt datum (2005-01-03 08:00:00)? Du kan prova att ta CDate(left(tmPlanStartDate,19)) kanske?

Permalänk: https://www.webforum.nu/p/2084176

---

Tråden på webben: https://www.webforum.nu/amne/dotnet/169230-dateadd