Discussion :

[Miska59]

Bonjour,
je suis entrain de crée un fichier openssl.cnf.mon problème c'est vérifier multiple mots existe dans richtextbox pour enregistrer avec StringBuilder.


dans richtextbox :

..etc
#1: ObjectId: 2.5.29.19 Criticality=false
BasicConstraints:[
CA:true
PathLen:2147483647
]

mon code :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
If Me.ContainsAll(Info, "CA:true,CA:false") Then sr.AppendLine("basicConstraints = CA:" & BasicConstraints.ToString.ToLower)
        If Me.ContainsAll(Info, "critical,CA:true,CA:false") Then sr.AppendLine("basicConstraints = critical,CA:" & BasicConstraints.ToString.ToLower)
        If Me.ContainsAll(Info, "CA:true,CA:false,PathLen:") Then sr.AppendLine("basicConstraints = CA:" & BasicConstraints.ToString.ToLower & ", pathlen:" & PathLen)
 
Private Function ContainsAll(source As String, values As String) As Boolean
        Dim str As String() = values.Split(",")
        For Each result As String In str
            If source.Contains(result) Then
                Return True
            End If
        Next
        Return False
    End Function

resultas dans le fichier openssl.cnf :

basicConstraints = CA:true
basicConstraints = critical,CA:true
basicConstraints = CA:true, pathlen:2147483647

je voudrais savoir comment faire pour avoir si existe dans richtextbox: "CA:true,CA:false,critical,PathLen" pour enregistrer avec stringbuilder en une seul fois?
exemple si existe :

basicConstraints = CA:true, pathlen:2147483647

merci d'avance

[popo]

C'est toi qui lui spécifie de répéter le bascContraints via "sr.AppendLine("basicConstraints"

Il suffit de mettre une seule fois "sr.AppendLine("basicConstraints" et et de rajouter le reste avec des "sr.Append()" et la valeur