Top-Themen

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Mit vbscript ein Wert in einer .js Datei erweitern

Frage Entwicklung VB for Applications

Mitglied: sergio1993

sergio1993 (Level 1) - Jetzt verbinden

06.05.2010 um 16:41 Uhr, 4102 Aufrufe, 9 Kommentare

Guten Tag alle Administratoren

Kann mir jemand von euch helfen? Ich komme einfach nicht weiter...

Ich will mit einem vbscript die Datei all.js editieren. Und zwar möchte ich dort , diesen Wert erweitern :

pref("network.automatic-ntlm-auth.trusted-uris", "tickettracker,rss-feeds");


Dort will ich ein Script schreiben der den Wert erweitert. Ich weis es ist möglich aber ich schaff es einfach nicht.

Ich will z.B. das anstatt nur "tickettracker,rss-feeds", dass steht --> "tickettracker,rss-feeds, gx-galaxy"

Nun wie muss ich den Script aufbauen, da ich echt keine Ahnung habe.


ICh hoffe es sehr, dass ihr mir helfen könnt.



Mfg Sergio
Mitglied: LotPings
06.05.2010 um 17:25 Uhr
Zitat von sergio1993:
Nun wie muss ich den Script aufbauen, da ich echt keine Ahnung habe.
Für die basics guckst du hier.

Gruß
LotPings
Bitte warten ..
Mitglied: Berrnd
06.05.2010 um 21:21 Uhr
Zitat von sergio1993:
Ich will z.B. das anstatt nur "tickettracker,rss-feeds", dass steht --> "tickettracker,rss-feeds, gx-galaxy"

Hi,

also das zum Beispiel würd ich mit einem einfachen Replace lösen:
01.
NeueVar = Replace("tickettracker,rss-feeds","tickettracker,rss-feeds","tickettracker,rss-feeds, gx-galaxy")
Gruß
Bernd

<edit>
OK, hatte mir wohl zu spät den Link vom letzten Post angesehen, stand ja da auch schon drin ;)
</edit>
Bitte warten ..
Mitglied: sergio1993
07.05.2010 um 08:13 Uhr
Hallo zusammen

Ja das wusste ich schon mit dem replace.

Nur muss ich das für eine ganze Firma machen und wenn jemand da was eingetragen hat, will ich dem nicht das einfach rauslöschen, sondern nur das nötige hinzufügen.

Ich hoffe ihr könnt mir helfen.

Gruss Sergio
Bitte warten ..
Mitglied: LotPings
07.05.2010 um 11:57 Uhr
Dann ist deine Problembeschreibung äußerst unglücklich,

das hätte dann heissen sollen

Suche in der all.js nach Zeilen mit dem Schema
pref("network.automatic-ntlm-auth.trusted-uris", "tickettracker,rss-feeds");

und ergänze das Beispielhafte "tickettracker,rss-feeds" um den Eintrag ,gx-galaxy.

Dieses vbscript tut das, allerdings ohne zu prüfen ob der Begriff schon da ist.
Den Pfad in Zeile 9 anpassen.
01.
' RegExReplace.vbs   
02.
option explicit 
03.
Dim oFS, oFile 
04.
Dim FileName, sText, sNewText, SuchMuster, ErsatzZf 
05.
 
06.
Const ForReading = 1 
07.
Const ForWriting = 2 
08.
 
09.
FileName = "D:\Test\2010-05\all.js" 
10.
 
11.
Set oFS = CreateObject("Scripting.FileSystemObject") 
12.
Set oFile = oFS.OpenTextFile(FileName, ForReading) 
13.
 
14.
Suchmuster = "(pref\(""network.automatic-ntlm-auth.trusted-uris"")(,\s)+""(\S+)""\);" 
15.
ErsatzZF = "$1, ""$3,gs-galaxy,Google"");" 
16.
 
17.
sText = oFile.ReadAll 
18.
oFile.Close 
19.
sNewText = Ersetze(sText, Suchmuster, ErsatzZf) 
20.
 
21.
Set oFile = oFS.OpenTextFile(FileName, ForWriting) 
22.
oFile.WriteLine sNewText 
23.
oFile.Close 
24.
 
25.
Function Ersetze(Text, Suchmuster, ErsatzZf) 
26.
  Dim regAusdr                                ' Variablen erstellen. 
27.
  Set regAusdr = New RegExp                   ' Erstellt einen regulären Ausdruck. 
28.
  regAusdr.Pattern = Suchmuster               ' Legt das Suchmuster fest. 
29.
  regAusdr.IgnoreCase = True                  ' Ignoriert die Groß-/Kleinschreibung. 
30.
  regAusdr.Global = True                      ' Legt globales Anwenden fest. 
31.
  Ersetze = regAusdr.Replace(Text, ErsatzZf)  ' Führt die Ersetzung durch. 
32.
End Function
Gruß
LotPings
Edit:das sollte wohl gx-galaxy heissen.
Bitte warten ..
Mitglied: sergio1993
07.05.2010 um 13:27 Uhr
Hallo LotPings

Danke!!!!!!!!

Hab noch ne letzte Frage, und zwar möchte ich nicht nur gx-galaxy hinzufügen sondern auch z.B. Google
wie muss ich dann diesen code erweitern?

Gruss
Sergio
Bitte warten ..
Mitglied: LotPings
07.05.2010 um 13:42 Uhr
Hallo Sergio,

ich erwarte ja nicht, das du aus Stand Regular Expressions verstehst (das tut niemand),
aber du solltest schon in der Lage sein, im Script die einzige Stelle zu finden wo ,gx-galaxy vorkommt und da noch dein ,Google dranzuhängen.

Gruß
Lotpings
Bitte warten ..
Mitglied: sergio1993
07.05.2010 um 13:47 Uhr
Hallo Lotpings

Das problem ist ich habs versucht und es hat sich nichts geändert wegen dem frage ich


Danke dir im voraus.
Bitte warten ..
Mitglied: LotPings
07.05.2010 um 14:21 Uhr
Hallo sergio,

ja hatte einen Fehler eingebaut der zwischen die beiden strings zusätzliches Komma Leerzeichen einbaute.

ersetze bitte Zeile 14-15 hiermit
Suchmuster = "(pref\(""network.automatic-ntlm-auth.trusted-uris"")(,\s)+""(\S+)""\);" 
ErsatzZF = "$1, ""$3,gs-galaxy,Google"");"
Das sollte den Fehler korrigieren, bau ich oben auch gleich ein.

Gruß
LotPings.
Bitte warten ..
Mitglied: sergio1993
07.05.2010 um 14:38 Uhr
HAllo LotPings

Vielen Dank hat geklappt
Bitte warten ..
Ähnliche Inhalte
Basic
VBScript erweitern für Subfolder
Frage von 132078Basic8 Kommentare

Hallo liebe Gemeinde, Ich habe mich bisher noch nie mit VBScript beschäftigt, daher verzeiht mir bitte meine wahrscheinlich relativ ...

JavaScript
JS wenn Feld leer dann Wert aus anderen Feld hollen
gelöst Frage von dax4funJavaScript3 Kommentare

Hi, Leute Ihr kenn das sicher beim ausfüllen von HTML Formularen, wenn gefragt wird wenn Lieferadresse und Rechnungsadresse unterschiedlich ...

Batch & Shell
Powershell - Werte in Variable durch Schleife erweitern bzw. ändern
gelöst Frage von ralfkauskBatch & Shell5 Kommentare

Hallo zusammen Ich habe mir ein Skript gebaut mit dem ich unser AD Abfrage und mir anhand eines Benutzernamens ...

VB for Applications
Visual Basic Wert in Tabelle eintragen und erweitern
gelöst Frage von TermimanVB for Applications4 Kommentare

Hallo liebe Leute, ich bekam damals schon einen sehr guten Tipp für meine kleine Excel Tabelle. Nun würde ich ...

Neue Wissensbeiträge
MikroTik RouterOS

Mikrotik - Lets Encrypt Zertifikate mit MetaROUTER Instanz auf dem Router erzeugen

Anleitung von colinardo vor 5 StundenMikroTik RouterOS4 Kommentare

Einleitung Folgende Anleitung ist aus der Lage heraus entstanden das ein Kunde auf seinem Mikrotik sein Hotspot Captive Portal ...

Sicherheit

Sicherheitslücke in HP-Druckern - Firmware-Updates stehen bereit

Information von BassFishFox vor 6 StundenSicherheit

Ein weiterer Grund, dass Drucker keinerlei Verbindung nach "auswaerts" haben sollen. Unter Verwendung spezieller Malware können Angreifer aus der ...

Administrator.de Feedback

Entwicklertagebuch: Die Startseite wurde überarbeitet

Information von admtech vor 8 StundenAdministrator.de Feedback9 Kommentare

Hallo Administrator User, mit dem Release 5.7 haben wir unsere Startseite überarbeitet und die Beiträge und Fragen voneinander getrennt. ...

Vmware

VMware Desktopprodukte sind verwundbar

Information von Penny.Cilin vor 13 StundenVmware

Die VMware-Anwendungen zum Umgang mit virtuellen Maschinen Fusion, Horizon Client und Workstation sowie die Plattform NSX sind verwundbar. Davon ...

Heiß diskutierte Inhalte
Visual Studio
Vb.net-Tool zum Erzeugen einer Outlook-E-Mail
Frage von ahstaxVisual Studio24 Kommentare

Hallo, ich möchte gerne ein vb.net-Tool schreiben, das am Ende eine Outlook-E-Mail erzeugt. Grundsätzlich ist mir klar, wie das ...

Windows Server
RDP macht Server schneller???
Frage von JaniDJWindows Server16 Kommentare

Hallo Community, wir betrieben seit geraumer Zeit diverse virtuelle Maschinen und Server mit Windows Server 2012. Leider haben wir ...

Windows Netzwerk
Netzwerk Neustrukturierung
Frage von IT-DreamerWindows Netzwerk16 Kommentare

Hallo verehrte Community und Admins, bei uns im Haus steht eine Neustrukturierung an. Dafür benötige ich von euch ein ...

Windows 10
Windows 10 dunkler Bildschirm nach Umfallen
Frage von AkcentWindows 1015 Kommentare

Hallo, habe hier einen Windows 10 Rechner der von einem User umgefallen wurde (Beine übers Knie, an den PC ...