[RESOLVED] how to calculate the difference between two dates ignoring weekends?

[vblover2008]

Hi

I need to calculate the difference between two days excluding weekends.

this code counts the difference between two days.

 Public Class Form1
    Dim date1 As Date
    Dim date2 As Date
    Dim difference As Integer
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        date1 = #3/5/2009#
        date2 = #1/6/2009#
        Dim daysTimeSpan As TimeSpan = date1.Date.Subtract(date2.Date)
        difference = CInt(daysTimeSpan.Days)
        MsgBox(difference)
        

    End Sub
End Class 

thanks