Torna al Thread
Dim cmd As MySqlCommand = New MySqlCommand("AnagraficaAddUpdate", Connection)
cmd.CommandType = CommandType.StoredProcedure
cmd.Parameters.AddWithValue("@_ID", lblIDtext.Text)
cmd.Parameters.AddWithValue("@_Nominativo", txtNominativo.Text)
cmd.Parameters.AddWithValue("@_Beneficiario_Tfr", txtNominativoTFR.Text)
cmd.Parameters.AddWithValue("@_Parentela", txtparentelaTFR.Text)
cmd.Parameters.AddWithValue("@_Indirizzo", txtIndirizzoTFR.Text)
cmd.Parameters.AddWithValue("@_Telefono", txttelefonoTFR.Text)
cmd.Parameters.AddWithValue("@_TasckForce", ddlTaskFOrce.SelectedValue)
cmd.Parameters.AddWithValue("@_Nr_IDCard", txtIDCard.Text)
If txtAssunzione.Text = "" Then
cmd.Parameters.AddWithValue("@_Assunzione", DBNull.Value)
Else
cmd.Parameters.AddWithValue("@_Assunzione", ConvertData.GetDataForMySql(txtAssunzione.Text))
End If
If txtLicenziamento.Text = "" Then
cmd.Parameters.AddWithValue("@_Licenziamento", DBNull.Value)
Else
cmd.Parameters.AddWithValue("@_Licenziamento", ConvertData.GetDataForMySql(txtLicenziamento.Text))
End If
If txtDecorrenza.Text = "" Then
cmd.Parameters.AddWithValue("@_Decorrenza_Contratto", DBNull.Value)
Else
cmd.Parameters.AddWithValue("@_Decorrenza_Contratto", ConvertData.GetDataForMySql(txtDecorrenza.Text))
End If
If txtTermine.Text = "" Then
cmd.Parameters.AddWithValue("@_Termine_Contratto", DBNull.Value)
Else
cmd.Parameters.AddWithValue("@_Termine_Contratto", ConvertData.GetDataForMySql(txtTermine.Text))
End If
cmd.Parameters.AddWithValue("@_Incarico", ddlIncarico.SelectedValue)
cmd.Parameters.AddWithValue("@_LCT", txtLct.Text)
cmd.Parameters.AddWithValue("@_STEP", txtStep.Text)
cmd.Parameters.AddWithValue("@_Capitolo", DBNull.Value)
Connection.Open()
Dim k As Integer = cmd.ExecuteNonQuery()
If k <> 0 Then
Me.ClientScript.RegisterStartupScript(Me.GetType, "Conferma", "alert('Operazione avvenuta');", True)
End If
Connection.Close()