databind事件中:
If e.Row.RowType = DataControlRowType.DataRow Then
Dim link As New HyperLinklink = DirectCast(e.Row.Cells(3).Controls(0), HyperLink)
link.NavigateUrl = "FMADefectDetail.aspx?CodeId=" & e.Row.Cells(1).Text & "&FromDate=" & txtFromDate.Text & "&ToDate=" & txtToDate.Text & "&ShiftId=" & ddlShift.Text & "&WoType=" & ddlWoType.Text & "&LineId=" & txtLineId.Text & "&OpId=" & txtFMAOp.Text
End If