Number of count weeks display wrong in between two dates.

Question

1.00/5 (1 vote)

See more:

Hi,

I have the two date's such as From Date and To Date.

When i take a count of week for the Two Date's it showing empty.

From Date : 12/1/2011
To Date : 12/22/2011

Difference Count of week is : 3 ( But, it's showing wrong).

What is the problem here..

see my code...
-----------

C#

If txtStartdate.Text <> "" And txtEndDate.Text <> "" Then
           Dim WeeksDiff As Integer
           Dim monthsApart As Integer = 12 * (StDate.Year - EdDate.Year) + StDate.Month - EdDate.Month
           WeeksDiff = Math.Abs(monthsApart * 4)
           txtDuration.Text = WeeksDiff
       End If

Posted 12-Dec-11 0:28am

gani7787

Updated 12-Dec-11 0:41am

Karthik Harve

v2

Add a Solution

6 solutions

Solution 5

The other solutions should give you what you need to get the answer you expect. The problem with your code (a question you asked) is obvious if you manually perform the calculations for your example. Since StDate.Year = EndDate.Year and StDate.Month = EndDate.Month for your two dates, (12/1/2011 and 12/22/2011), you have monthsApart= 12 x 0 + 0 = 0. Then WeeksDiff = 0 * 4 = 0. I assume your comment that the answer shows empty actually means the answer is 0.

If test cases don't return the expected result check both the coding and the algorithm.

Posted 13-Dec-11 15:30pm

JRickey

Solution 1

check this link[^]

Posted 12-Dec-11 0:34am

koolprasad2003

Solution 2

Another method would be to take number of days difference between two dates and divide it by 7.

Posted 12-Dec-11 0:35am

nagendrathecoder

Solution 6

hi,
You can get by using this query also ...

SQL

SELECT DATEDIFF( week,'12/1/2011','12/22/2011') as[No of Weeks]

Regards,
Pal

Posted 13-Dec-11 17:00pm

palraj001

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

OriginalGriff · Accepted Answer · 2011-12-12T00:38:00

The major problem is that there aren't 4 weeks in a month: there are 28/7, 29/7, 30/7, or 31/7. Only one of which is 4.

Try this:

VB

Public Shared Function NumberOfWeeks(dateFrom As DateTime, dateTo As DateTime) As Integer
	Dim diff As TimeSpan = dateTo.Subtract(dateFrom)

	If diff.Days <= 7 Then
		If dateFrom.DayOfWeek > dateTo.DayOfWeek Then
			Return 2
		End If
		Return 1
	End If

	Dim Days As Integer = diff.Days - 7 + CInt(dateFrom.DayOfWeek)
	Dim WeekCount As Integer = 1
	Dim DayCount As Integer = 0
	WeekCount = 1
	While DayCount < Days
		DayCount += 7
		WeekCount += 1
	End While

	Return WeekCount
End Function

Valery Possoz · Accepted Answer · 2011-12-12T00:42:00

Hello,

I would do that differently:

VB

Dim strFromDate, strToDate As String

strFromDate = "12/1/2011"
strToDate = "12/22/2011"

Dim toDate, fromDate As DateTime
toDate = DateTime.Parse(strToDate, New CultureInfo("en-US", False))
fromDate = DateTime.Parse(strFromDate, New CultureInfo("en-US", False))

Dim nbWeeks As Long
nbWeeks = Math.Abs(DateDiff(DateInterval.Day, fromDate, toDate) / 7)

Valery.