Bonjour,
Je débute en VB, et j'ai un petit soucis lors de la création d'un fichier texte.
J'aimerai au dessus du File.AppendAllText(SFD_sql.FileName, ");")
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7 Dim map As XmlNamedNodeMap = node.Attributes Dim attrnode As Object For Each attrnode In map File.AppendAllText(SFD_sql.FileName, ");") File.AppendAllText(SFD_sql.FileName, vbNewLine) File.AppendAllText(SFD_sql.FileName, "INSERT INTO " & node.Name & " VALUES ('" & CType(attrnode, XmlNode).Value & "',") Next
Supprimer le dernier caractère ajouté dans le fichier. J'ai essayé pas mal de choses mais à la fin il ouvre toujours le fichier, enlève le caractère et ferme le fichier, parfois même supprime le fichier :S
Si quelqu'un aurait l'amabilité de m'aider, du moins de m'inquiéter une solution sur laquelle je pourrais me pencher Merci et Bonne journée
Partager