dans TCL, comment appendez un contenu différent dans un seul fichier à l'aide du pour code> boucle ou
foreach code> boucle p>
3 Réponses :
Avez-vous voulu dire quelque chose comme ça? Vous ouvrez le fichier mise à jour: em> Si vous souhaitez ajouter des contenus variable, vous devez modifier le script à: p> fichier code> en mode
A code> (Ajouter) et écrivez dans le fichier. Descripteur (
$ fo code> dans l'exemple). p>
c'est ok bien. Mais j'ai un autre problème. Le problème est que supposons que si je déclare comme si je déclare comme ça: Définir Data1 "Connect / comme sysdba; \ n" SET DATA2 {SPOOL $ TMP / "DBTEST" _DBMODE.TXT} SET DATA3 "\ NSELECT Open_Mode, Nom, ControlFile_Type de V \ $ Database; \ n "et ainsi de suite .... Si je veux écrire dans un fichier, alors comment puis-je substituer les valeurs Data1, Data2 ...... Exactement ce que je veux, je veux mettre la valeur $ Data1 dans la boucle de Forache, alors comment dois-je faire, aidez-moi s'il vous plaît .. Définissez Data4 "Spool off; \ n"
@galvin: Je ne suis pas totalement sûr que si je vous ai bien compris, mais j'ai mis à jour ma réponse.
Voir la situation que je définis la valeur de la variable le permet: définir data1 "Ceci est la valeur de données1" et secondes est défini Data2 "Ceci est la valeur DATA2" Maintenant, je veux écrire la valeur des données variables1 et Data2 à l'aide de la boucle de Foreach. Puis-je faire, aidez-moi s'il vous plaît. Ici, je fais comme ceci: SET FO [OUVERT $ FILENAME W] FORECH DIFFÉRENT_Content {Data1 Data2} {Met $ $ fo $ Différent_Content} Fermer $ fo} mais ça ne fonctionne pas .???????????? ???
@galvin: Si vous le faites comme si vous le faites, vous écrirez «DATA1» et «DATA2» dans le fichier. Vous devez faire par exemple foreach différent_content "$ data1 $ data2" {met $ $ fo $ différent_content} code>
Le code suivant convient à la lecture d'un fichier, où en direction fort> p> < Pré> xxx pré> p> sample.tcl code> est disponible dans le dossier 'p'.
Le code suivant crée un fichier texte dans le dossier 'p' code> et écrit.
set fid [open p:\\temp.txt w]
puts $fid "here is the first line."
close $fid
Qu'entendez-vous par «contenu différent»?