Private Sub DataGrid1_EditCommand(ByVal source As Object, ByVal e As System.Web.UI.WebControls.DataGridCommandEventArgs) Handles DataGrid1.EditCommand
DataGrid1.EditItemIndex = CInt(e.Item.ItemIndex)
DataGrid1.DataBind()
End Sub
Private Sub DataGrid1_UpdateCommand(ByVal source As Object, ByVal e As System.Web.UI.WebControls.DataGridCommandEventArgs) Handles DataGrid1.UpdateCommand
Dim myDataGridItem As DataGridItem
Dim chkStarted, chkFinished As System.Web.UI.WebControls.CheckBox
For Each myDataGridItem In DataGrid1.Items
chkStarted = myDataGridItem.FindControl("chkStart"

chkFinished = myDataGridItem.FindControl("chkComplete"

Session("TaskID"

= DirectCast(myDataGridItem.FindControl("TaskID"

, Label).Text
Dim dataset As DataSet = LoadTaskByID()
If dataset.Tables("TASKING_LOG"

.Rows(0).Item("IsStarted"

= "False" Then
If chkStarted.Checked = True Then
Dim Start As DateTime
Dim TaskNum As String
TaskNum = Session("TaskID"

Start = Date.Now.ToShortTimeString
Dim ChkConnection As New SqlConnection("Data Source=hqsqldev01;Initial Catalog=production_sched;Integrated Security = SSPI"

Dim UpdateCommand As New SqlCommand("UPDATE dbSyndicate.TASKING_LOG SET StartTime = '" + Start + "', IsStarted = 'Y' WHERE TaskID = '" + TaskNum + "'", ChkConnection)
ChkConnection.Open()
UpdateCommand.ExecuteNonQuery()
ChkConnection.Close()
End If
End If
Next
End Sub