Ma requête ressemble à ceci
Dim vReq2 As String = "INSERT INTO ESSAI1(Adresse,Title,Description,) VALUES ('" & (lecteur("ADRESSE").ToString()).Replace("'", "''") & "','" & (lecteur("NOM").ToString()) & "','" & "Nom : " & "'+'" & (lecteur("NOM").ToString()) & "'+'" & (lecteur("SAUT").ToString()) & "'+'" & "Adresse : " & "'+'" & (lecteur("ADRESSE").ToString()).Replace("'", "''") & "'+'" & (lecteur("SAUT").ToString()) & "'+'" & vbCrLf & "'+'" & "Activite : " & "'+'" & (lecteur("id_activite").ToString()) & "'+'" & (lecteur("SAUT").ToString()) & "'+'" & vbCrLf & "'+'" & "Téléphone : " & "'+'" & (lecteur("TELEPHONE").ToString()) & "'.....
Partager