Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs)
Dim dv As Data.DataView
dv = srcProduct.Select(DataSourceSelectArguments.Empty)
Dim dr As Data.DataRowView = dv(0)
Dim S_VdoUrl As String = dr("S_VdoUrl")
lblS_VdoUrl1.Text = S_VdoUrl
End Sub