Question : Classer la trouvaille/remplacer (ou modifier) le dossier de corde/mise à jour

Je dois apporter quelques modifications à un dossier de propriétés de Java.  Au-dessous de sont mes conditions, mes problèmes et mon code courant qui fonctionne presque.
** ne doit pas être le vb **
Requirements : Le
1) localisent un dossier qui est toujours dans le même endroit pour chaque utilisateur - subfolder dans les documents de l'utilisateur et le changement de Settings
2) ou modifie une corde dans le file
Problems : Le
1) pas sure comment appliquer %Homepath% ou au moins %UserName% dans le script
2) chaque fois que le manuscrit court n'importe quel s déjà là reste - je finis vers le haut avec des https - > des httpss - > des httpsss et ainsi on
class= > " clair " de
> de " codeSnippet " de class= de
class= " lineNumbers " de
class= de
1 :
2 :
3 :
4 :
5 :
6 :
7 :
8 :
9 :
10 :
11 :
12 :
13 :
14 :
15 :
16 :
17 :
18 :
19 :
20 :
21 :
22 :
23 :
24 :
25 :
26 :
27 :
28 :
29 :
30 :
31 :
32 :
33 :
34 :
35 :
36 :
37 :
38 :
39 :
40 :
41 :
42 :
43 :
44 :
45 :
46 :
47 :
48 :
49 :
50 :
51 :
52 :
53 :
54 :
55 :
56 :
57 :
58 :
59 :
60 :
>Imports " de l'id= " codeSnippet744344 de
           
class= de

Réponse : Classer la trouvaille/remplacer (ou modifier) le dossier de corde/mise à jour

Suit un vb qui remplace une corde spécifique

Juste le besoin d'instancier ces variables :

strTxtFile = « C:\Documents and Settings\ » et strUser et » \ reste du chemin "
strMatch = « TEXTE À MODIFIER »
strNewText = « TEXTE POUR REMPLACER L'ORIGINAL »
1 :
2 :
3 :
4 :
5 :
6 :
7 :
8 :
9 :
10 :
11 :
12 :
13 :
14 :
15 :
16 :
17 :
18 :
19 :
20 :
21 :
22 :
23 :
24 :
Faibles strAllLines, strTxtFile, strMatch, objFSO, objFile, strNewText
Const ForReading = 1
Const ForWriting = 2

Placer l'objNetwork = le CreateObject (« Wscript.Network »)
strUser = objNetwork.UserName


strTxtFile = « C:\Documents and Settings\ » et strUser et » \ reste du chemin "
strMatch = « TEXTE À MODIFIER »
strNewText = « TEXTE POUR REMPLACER L'ORIGINAL »


'Lit le dossier de TXT
Placer l'objFSO = le CreateObject (« Scripting.FileSystemObject »)
Placer objFile = objFSO.OpenTextFile (strTxtFile, ForReading)
strAllLines = objFile.ReadAll
objFile.Close

le strNewText = remplacent (les strAllLines, le strMatch, le strNewText)

objFile réglé = objFSO.OpenTextFile (strTxtFile, ForWriting)
objFile.WriteLine (strNewText)
objFile.Close
Autres solutions  
  •  MS Excel 2007 et pdf - l'exportation vers le pdf prend de longues heures !
  •  Dans le Perl, comment j'ajoute une valeur à la liste, puis le contrôle pour voir si la valeur existent avant d'ajouter une nouvelle valeur
  •  Comment fais j'initialiser de la HP BL460c G6 de san et de la HP XP 240000
  •  Comment fais j'employer une clef de permis de volume sur un ordinateur de HP avec du CD de restauration
  •  Emplacement primaire de deux SCCM dans l'annuaire actif
  •  L'initiateur et la HP D2D de l'iSCSI R2 du serveur 2008 de Windows GERCENT l'issue
  •  Stocker le dossier dans le mysql using connector.net et le champ de goutte
  •  Carte vidéo d'USB - bit 32 sur le matériel travaillant au niveau du bit 64 ?
  •  asp.net que j'essaye de convertir une forme de HTML en forme d'aspx ou ? ce qui jamais. Aide du besoin sur la façon dont à à elle.
  •  Winzip 12 issues de secours du travail ?
  •  
    programming4us programming4us