1 2 3 4
|
Dim commandeSql As OleDbCommand = dbConn.CreateCommand()
commandeSql.CommandText = "INSERT INTO T_EMPLOYE (NUMSECUSOCIAL, NOM, PRENOM, ADRESSERUE, ADRESSEVILLE, ADRESSECP, NUMTEL, DATENAISS, LIEUNAISS, COEF, POSITION, STATUT, DATEARRIVEE, NBMUTUEL, NOMSOC, NOMCHEFSERVICE, SERVICE) VALUES ('" & str_numSecu & "', '" & str_nom & "', '" & str_prenom & "', '" & str_addresseRue & "', '" & str_adresseVille & "', '" & int_adresseCp & "', '" & int_numTel & "', '" & date_dateNaiss & "', '" & str_lieuNaiss & "', '" & int_coef & "', '" & int_position & "', '" & str_statut & "', '" & date_dateArriv & "', '" & int_mutuelle & "', '" & str_societe & "', '" & str_chefService & "', '" & str_service & "')"
commandeSql.ExecuteReader() |
Partager