Discussion :

[mlww]

Bonsoir,
J'ai un petit soucis et je n'ai pas trouvé de solution pour l'instant

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
S = S & "DS_Com='" & Me.TextBox7.Value & "'"
Insert_DB "DataSuivie", "Lnk_Hir_ID,Lnk_Tic_Ticket,DS_DatInter,DS_Intervenant,DS_Domaine,DS_SDomaine,DS_Action,DS_Dure,DS_Com", S

Mon soucis est que ma TextBox7.value et une mutiligne
du coup ma requet insert plante a cause du retour chariot dans la texbox7
est ce quelqu'un aurait une idée pour contourner ce problème

merci d'avance

[mjpmjp]

bonjour,
pour supprimer retour chariot (qui peu être confondu avec un espace)

Data = Replace(Data, vbcrlf, " ") ---> = Trim(Replace(Data, vbcrlf, " "))

@+JP

[mlww]

Donc cela veut que je perd la mise en forme du texte

bonjour,
pour supprimer retour chariot (qui peu être confondu avec un espace)

Data = Replace(Data, vbcrlf, " ") ---> = Trim(Replace(Data, vbcrlf, " "))

@+JP

[mjpmjp]

bonjour,
plus de retour chariot donc ton texte est sur une ligne

@+JP

[mjpmjp]

re,
mais c'est réversible ...
quand tu replace / remplace : vbcrlf par "un texte identifiable",
tu reverses avec replace(Data, "un texte identifiable",vbcrlf)

@+JP

[mjpmjp]

re,
j'utilisais ";" --> blabla;blabla;blabla
mais aujourd'hui, je migre (à tord ou à raison ??) vers "|" --> blabla|blabla|blabla
tu peu utiliser TabElement = split(Data,"|") ou directement DataElement2 = split(Data,"|")(2) --> dernier blabla

Data = Replace("blabla|blabla|blabla","|",vbcrlf)

blabla
blabla
blabla

@+JP