Public vidurl As String
  Protected Sub Page_Load(ByVal sender As Object,ByVal e As System.EventArgs) Handles Me.Load
        Dim id As String = Request.QueryString("id")
        Dim DT As New DataTable
        Dim vidInfo As VideoInfo
        Try


            If id IsNot Nothing Then

                Dim sqlConnection_Cont As New sqlConnection(sqlConntStr)
                DT = f.GetVideoInfo(id,sqlConnection_Cont)

                If DT IsNot Nothing Then
                    If DT.Rows.Count > 0 Then
                        vidInfo = New VideoInfo With {
                             .ID = DT.Rows(0).Item("FTPID"),.Processed = DT.Rows(0).Item("Processed"),.URL = DT.Rows(0).Item("URL"),.VideoName = DT.Rows(0).Item("VideoName"),.VidID = DT.Rows(0).Item("VidID"),.Created = DT.Rows(0).Item("Created"),.MonthDiff = DT.Rows(0).Item("Monthdiff")}


                        If vidInfo.MonthDiff = 0 Then
                            vidurl = "http://webpath.com/virtualdirectory/content/" & vidInfo.VideoName
                           End If
                    End If
                End If 
          End If

        Catch ex As Exception
            WriteExToFile("Video.aspx.vb",ex.ToString)
        End Try

    End Sub