Как переместить метку времени с одного нажатия кнопки на другую - PullRequest
0 голосов
/ 07 ноября 2019

В настоящее время для нашей системы управления компанией, когда есть ошибка для отметки времени в «MarketTrial» перед массовым производством.

В разделе «Сведения о MarketTrial» пользователь может редактировать размер, наборы, разделы перед отправкой формы ввода с помощью кнопки «Вставить». Я также хотел бы добавить, что при выборе размера это также автоматически изменяет «конечную дату»

. После выбора кнопки ссылки «Вставить» эта дата затем ставится с меткой «Подробности MartketTrial», однако мои намерениязаключается в том, что эта дата не должна иметь отметки времени до тех пор, пока не будет выбрано «Отправить для массы» после того, как сведения о рыночных испытаниях и другие поля ввода данных заполнены во всей форме.

Ниже приведен код для ссылки «Вставить» Кнопка

Protected Sub Insert_Click(ByVal sender As Object, ByVal e As System.EventArgs)
    Dim strEDate As String
    With odMarketTrial

        .InsertParameters("Row").DefaultValue = CType(gvmtrial.FooterRow.FindControl("lblRowInsert"), Label).Text
        .InsertParameters("Size").DefaultValue = CType(gvmtrial.FooterRow.FindControl("txtSizeEditF"), TextBox).Text
        .InsertParameters("Sets").DefaultValue = CType(gvmtrial.FooterRow.FindControl("ddSetsInsert"), DropDownList).SelectedValue
        .InsertParameters("Sections").DefaultValue = CType(gvmtrial.FooterRow.FindControl("ddSectionsInsert"), DropDownList).SelectedValue
        .InsertParameters("Type").DefaultValue = CType(gvmtrial.FooterRow.FindControl("ddType"), DropDownList).SelectedValue

        .InsertParameters("EndDate").DefaultValue = CType(gvmtrial.FooterRow.FindControl("txtEndDateInsert"), TextBox).Text 

        strEDate = CType(gvmtrial.FooterRow.FindControl("txtEndDateInsert"), TextBox).Text
        If strEDate = "" Or Not IsDate(strEDate ) Or (DateTime.Compare(Now, strEDate ) > 0) Then
            'If CType(gvmtrial.FooterRow.FindControl("txtEndDateInsert"), TextBox).Text = "" Then
            lblRequestedDateError.Visible = True
            lblRequestedDateError.ForeColor = Drawing.Color.Red
            'ElseIf isValidDate(CType(gvmtrial.FooterRow.FindControl("txtEndDateInsert"), TextBox).Text) Then
        Else
            lblendDateError.Visible = False
            lblendDateError.ForeColor = Drawing.Color.Red
        End If

        If lblDRFStatus.Text = "" Then
            .InsertParameters("LBSStatus").DefaultValue = "0 -"
        Else
            .InsertParameters("LBSStatus").DefaultValue = lblLBSStatus.Text
        End If
        .Insert()
    End With

    Session.Add("Redirect", "LBS")
    LBS_Action()

End Sub

Итак, я хотел бы знать, как я могу перенести запись данных для «EndDate» из «Insert» в «Submit for Mass», поскольку до сих пор моим главным препятствием было то, что после нажатия «Insert» на данныене будет отправлено, поскольку в 'txtEndDateInsert' нет даты

1 Ответ

0 голосов
/ 07 ноября 2019

Вы можете попробовать:

.InsertParameters("EndDate").DefaultValue = If(string.IsNullorEmpty(CType(gvmtrial.FooterRow.FindControl("txtEndDateInsert"), TextBox).Text), DateString, CType(gvmtrial.FooterRow.FindControl("txtEndDateInsert"), TextBox).Text)
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...