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 Suche nach exakt einem Wort in einem String

Mitglied: TheUntouchable

TheUntouchable (Level 1) - Jetzt verbinden

10.12.2013, aktualisiert 14:22 Uhr, 1518 Aufrufe, 2 Kommentare, 1 Danke

Hallo liebe Leute,

auf die Schnelle habe ich jetzt leider nichts gefunden im Forum, bitte nicht steinigen wenn doch eine Antwort zu meiner Frage schon vorhanden ist

Ich benutze ein VBS Skript, um aus einer Textdatei Druckerzuweisungen auszulesen und diese beim Logon dem User zuzuweisen.

Ausschnitt aus der druckerconfig.txt (strMyPrintFile):
01.
TEST	Drucker251	Server1.domäne.de	cd
02.
TEST01	Drucker134	Server1.domäne.de	c
Username (strName), Druckername, Druckserver, Standarddrucker (cd/c)

Wie ihr seht, kann es sein, das es User gibt, die am Anfang die gleichen Buchstaben haben. Mit dem folgenden Skript gibt das jetzt Probleme:
01.
Set objFS = CreateObject("Scripting.FileSystemObject")
02.
	strPattern = ucase(strName)
03.
	Set objFile2 = objFS.OpenTextFile(strMyPrintFile)
04.
	Do while not objFile2.AtEndOfStream
05.
		strLine = ucase(objFile2.ReadLine)
06.
		If InStr(strLine,strPattern)=1 Then
07.
			strsplit=Split (strline, vbTab)
08.
			 For i = 0 to UBound(strsplit)
09.
			 Next      
10.
			strPrinterSet = strsplit(1)
11.
			strServerFQDN = strsplit(2)
12.
			strDefault = strsplit(3)
13.
			strsplit2 = Split (strServerFQDN, ".")
14.
			strServer = strsplit2(0)
15.
			if strServer <> "ALTERSERVER" Then
16.
				strUNC1 = "\\" & strServer & "\" & strPrinterSet
17.
				strPrinterListB = strPrinterListB & strUNC1 & vbCrLf
18.
				If strDefault = "CD"  Then
19.
						strDefaultPrinter = strUNC1
20.
				End If
21.
				If intWithText=1 Then
22.
					objFile1.Write "         " & strUNC1 & " (" & strDefault & ")" & vbCrLF
23.
				End If
24.
			End If
25.
		End If  
26.
	Loop
Das Skript verbindet beim Benutzer "test" auch alle Drucker vom Benutzer "test01". Ich habe schon ziemlich lange gesucht, aber ich finde keine Methode für vbs, bei der wirklich nur nach dem Gesuchten String im anderen String gesucht wird.. Kann mir da wer helfen? Danke!
Mitglied: TheUntouchable
10.12.2013 um 15:07 Uhr
Okey, ich hab mein Problem mitterweile selber gelöst Da die einzelnen Werte in der druckerconfig.txt durch ein Tab getrennt sind, habe ich einfach im Skript danach suchen lassen:

01.
strPattern = ucase(strName)& "	"
In den Anführungszeichen ist ein Tab ;)

Anschließend funktioniert das Ganze 1a Danke an mich selber :P
Bitte warten ..
Mitglied: bastla
LÖSUNG 10.12.2013, aktualisiert um 22:56 Uhr
Hallo TheUntouchable!

Noch besser lesbar wäre das mit
strPattern = UCase(strName) & vbTab
Grüße
bastla
Bitte warten ..
Ähnliche Inhalte
Microsoft Office
Excel Such- und Vergleichsfunktion
gelöst Frage von oesi1989Microsoft Office15 Kommentare

Hallo zusammen, ich habe 2 Tabellen mit Name, Vorname und Arbeitgeber. 1. Tabelle Name Vorname Geb-Datum Arbeitgeber Straße Ort ...

Batch & Shell

Textdatei (.txt) Wort für Wort auslesen per batch (Spaltenweise)

Frage von pdiddoBatch & Shell1 Kommentar

Hi, ich habe eine Textdatei (.txt). Diese hat mehrere Zeilen. Ich möchte diese gerne Spalte für Spalte auslesen, sodass ...

Exchange Server

Such-Index nach Neuerstellung defekt

Frage von CoverianExchange Server

Guten Morgen zusammen, wir haben hier aktuell ein Problem das mir schlaflose Nächte bereitet. Es handelt sich um einen ...

Batch & Shell

Wort in Textdatei suchen

gelöst Frage von Nick.BBatch & Shell4 Kommentare

Ich wollte ein einzelnes Wort aus einer Textdatei suchen und als Variable speichern. Allerdings ist das Wort nicht das ...

Neue Wissensbeiträge
Internet

EU Urheberrechtsreform: Eingriff in die Internetkultur

Information von Frank vor 1 StundeInternet

Liebe Besucherin, lieber Besucher, warum erscheint das obere Banner in allen Beiträgen? Aus Protest gegen Teile der geplanten EU-Urheberrechtsreform ...

Windows Server
Windows Backup - FilterManager Event 3
Tipp von NixVerstehen vor 22 StundenWindows Server

Hallo zusammen, ich bin kein gelernter ITler und auch beruflich nicht in dem Feld tätig. Wir setzen in unserem ...

Windows 10

Windows 10 - Programme laufen schneller, wenn Sie mit Administratorrechten ausgeführt werden

Erfahrungsbericht von 1Werner1 vor 2 TagenWindows 1013 Kommentare

Moin, das wollte ich erst nicht glauben, aber es ist so. Wenn Ihr ein Programm mit Administratorrechten unter Windows ...

Sicherheits-Tools
Putty hat heftige Bugs korrigiert!
Information von Lochkartenstanzer vor 3 TagenSicherheits-Tools8 Kommentare

Moin, Wie man aus herauslesen kann, sind in den Versionen vor 0.71 gravierende Bugs, die es angeraten erscheinen lassen, ...

Heiß diskutierte Inhalte
Hardware
Telefonanlagen - Welche gibt es
Frage von Xaero1982Hardware38 Kommentare

Nabend Zusammen, ich suche eine neue TK Anlage und mein Auftraggeber will jetzt was völlig neues - State of ...

Server-Hardware
Kompatibilität Tray für HP Proliant DL385 G10 vs. G8, G9
Frage von chris123Server-Hardware19 Kommentare

Hallo, weiß einer der hier anwesenden, ob die Trays für 2,5 " HDDs zwischen einem DL 385 G10 und ...

Outlook & Mail
Office 365 mit Email-Profil installieren
gelöst Frage von 139221Outlook & Mail18 Kommentare

Hallo, kurz zu meiner Person: Vor ungefahr 10 Jahren habe ich eine Umschuldung zum Fachinformatiker für Systemintegration gemacht aber ...

LAN, WAN, Wireless
Intel(R) PRO Wireless 3945ABG
gelöst Frage von Leon509LAN, WAN, Wireless15 Kommentare

Hallo, habe ein Laptop Fujitsu (Intel, 4GB, 2GHz, Windos10, Intel(R) PRO/Wireless 3945ABG ) ein O2 DSL Anschluss Home50. Leider ...