pfeffis

Mal ganz ****...wie wär s mit VNC? Wäre zumindestens die selbe Session...

Hallo Gemeinde, ich habe bei der Sicherung via Sym Backup Exec 12.5 folgenden Fehler nach einem Update der Domäne von W2k auf W2k3: "DO_NOT_REMOVE_NtFrs_PreInstall_Directory wurde nicht gefunden, oder es war kein Zugriff möglich." Daraufhin habe ich diese Verzeichnisse von der Sicherung ausgeschlossen (wie auch von Symantec empfohlen) -->Backup jobs fail with the error "The directory or file was not found, or could not be accessed." when backing up DFS folders with replication turned on. Wenn ich dies aber mache bekomme ich eine neue "Fehlermeldung": "0xe0009419 - Zum vollständigen Schutz von Windows Server 2003 müssen Sie für das Backup die Shadow Copy-Komponenten auswählen. Endgültige Fehlerkategorie" Irgendwie auch logisch, da ich den betreffenden Ordner ja ausgeschlossen habe, wie von Symantec vorgeschlagen. Hatte jemand von euch das Problem evtl. auch schon? Falls ja, was habt ihr gemacht? Fehler ignoriert/ unterdrückt und gibt s hier einen "richtigen" Lösungsweg? Danke vorab Grüße

Hallo phoenixcp, vielen Dank erstmal. Lag wohl an einem Leerzeichen zuviel. Habe es jetzt wie folgt zum Laufen gebracht. Sub Main() Dim QPfad As String Dim ZPfad As String Dim oProcess As New ProcessStartInfo Dim Datei As String = "C:\pcname.txt" Dim stream_reader As New IO.StreamReader(Datei) Dim line As String QPfad = "I:\share" ZPfad = "\c$\Dokume~1\pfad" oProcess.FileName = "C:\robocopy.exe" While Not stream_reader.EndOfStream line = stream_reader.ReadLine() If line.Length > 0 Then oProcess.Arguments = QPfad & " \\" & line.ToString() & ZPfad & " /R:2 /MIR /Z /LOG+:C:\log.log" 'MsgBox(oProcess.Arguments.ToString) 'Debug.Print(oProcess.Arguments) Process.Start(oProcess) End If End While stream_reader.Close() End Sub Vielen Dank für s "schuppsen" ;).

@ phoenixcp, sorry, aber ich habe keinerlei Fehlermeldung. Läuft durch, nur eben ohne etwas zu kopieren. Grüße

Hallo PhoenixCP, vielen Dank, leider funktioniert das so auch nicht.

Hallo Gemeinde, ich hoffe das zählt nicht als Doppelpost!? die Anforderung etwas von a nach b zu kopieren muss nun via vb.net realisiert werden. Ich habe hier robocopy "integriert". Leider bekomme ich es nicht hin, dass er mir die pcname.txt in die "ZPfad" übernimmt. Sub Main() Dim QPfad As String Dim ZPfad As String Dim oProcess As New ProcessStartInfo Dim Datei As String = "C:\pcname.txt" Dim stream_reader As New IO.StreamReader(Datei) Dim line As String QPfad = "I:\share" ZPfad = "\c$\Dokumente und Einstellungen\..." oProcess.FileName = "C:\robocopy.exe" oProcess.Arguments = "QPfad" & """ ZPfad" & """/R:2" & """/MIR" & """/Z" & """/LOG+:C:\log.log" While Not stream_reader.EndOfStream line = stream_reader.ReadLine() If line.Length > 0 Then Process.Start(oProcess) 'MsgBox(line) End If End While stream_reader.Close() End Sub Grüße

Alles klaro, dann Lizenzen umziehen und fertig. Danke danke. Grüße

Quasi sowas in der Art for /f "Tokens=1" %%i in (pcname.txt) do ...

Liebe Gemeinde, folgende Sachlage: 1 x W2k3 Terminal und Lizenzserver 1 x W2k8 Terminal und Lizenzserver Der W2k3 Server ist seit ca. 3 Jahren im Einsatz und fungiert seit dieser Zeit auch als Lizenzserver. W2k8 Server kam vor kurzem hinzu. Der W2k8 Server verteilt aber keine Lizenzen (Versionskonflikt mit dem W2k3 Lizenzserver). Liegt das daran, dass der W2k3 Server der 1te Lizenzserver war und der W2k8 Server sich nun an diesen wendet und daher der Konflikt zustande kommt? Falls dem so ist, W2k3 Lizenzserver deinstallieren und die Lizenzen auf dem W2k8 Server neu installieren/ aktivieren? Was meint ihr? Grüße

Habe es jetzt so umgesetzt. Was mir noch fehlt ist eine Variable, die sich aus einer Textdatei die Ziele "zieht". @echo off rem ab winXP Hosts robocopy "Quellpfad" "\\192.168.0.1\Zielpfad" /R:2 /MIR /Z /LOG+:C:\log.log robocopy "Quellpfad" "\\192.168.0.2\Zielpfad" /R:2 /MIR /Z /LOG+:C:\log.log robocopy "Quellpfad" "\\192.168.0.3\Zielpfad" /R:2 /MIR /Z /LOG+:C:\log.log . . . rem fuer Win2k Host net use R: \\192.168.0.100\Pfad /USER: Kennung Passwort robocopy "Quellpfad" "R:\Zielpfad /MIR /Z /LOG+:C:\log.log net use R: \\192.168.0.100\Pfad /del net use R: \\192.168.0.101\Pfad /USER: Kennung Passwort robocopy "Quellpfad" "R:\Zielpfad /MIR /Z /LOG+:C:\log.log net use R: \\192.168.0.101\Pfad /del net use R: \\192.168.0.102\Pfad /USER: Kennung Passwort robocopy "Quellpfad" "R:\Zielpfad /MIR /Z /LOG+:C:\log.log net use R: \\192.168.0.102\Pfad /del . . .

Also unter dem Pfad (arr) nutze ich doch UNC Pfade. Des weiteren dachte ich mir umgehe ich das umständliche copy ... \\172.16.14.1\... copy ... \\172.16.15.1\... copy ... . . . .

Sorry für die späte Antwort. Soll regelmäßig (1 x wöchentlich) kopiert werden. Robocopy sieht hier im Zusammenhang mit einem Script gar nicht so schlecht aus. Das Script muss ja jedesmal (23 mal insgesamt) ein Netzlaufwerk mappen und dahin die gewünschten Dateien verschieben. Irgendwie in der Art, oder!? Das Synctoy sagt mir nicht so zu :(

Hallo Gemeinde, ich weiß jetzt nicht ob ich unter Scripting richtig bin aber ich denke mal dass es in meinem Fall nur darüber zu lösen ist!? Ich habe in einer Domäne eine Netzwerkfreigabe mit vielen Ordnern und Dateien. Dieser komplette Inhalt soll auf ca. 20 Clients, die via VPN angeschlossen sind, nicht in der Domäne sind und jeweils in anderen Netzwerken "sitzen" kopiert werden. Sollte man hier in Richtung Scripting gehen (Netzlaufwerk verbinden, kopieren, Verbindung trennen, nächster client) oder sind hier Synchronisationsprogramme on Vorteil bzw. ist für o. geschilderten Fall jemanden sowas bekannt? Vielen Dank vorab für eure Tipps. Grüße

Es gibt wohl Erweiterungen für Thunderbird, nur diese sind für den Geschäftsgebrauch wohl nicht zu gebrauchen. Was meint ihr? Noch Ideen? Grüße

Hallo Gemeinde! Ich habe ca. 20 Clients ( WinXP/ Win2k Außenstellen) welche mit zwei Mailprogramen arbeiten sollen. Auf diesen Maschinen ist immer nur ein User konfiguriert, daher sollen die Mail Clients unter diesem einen Account laufen. Soweit so gut. Ein Mail Programm soll für jedermann zugänglich sein (es arbeiten mehrere Personen an diesem Arbeitsplatz) was nun nicht das Problem ist. Wie aber kann ich es realisieren, dass beim Starten des 2ten Mailprogramms (unter dem selben User Account) ein Kennwort abgefragt wird? Hintergrund ist hierbei, dass die/der Leitung/Chef der Außenstellen einen eigenen Account haben sollen, sprich hier die anderen User keinen Zugriff auf das Postfach haben sollen. Die Clients sind nicht in der Domäne und die Emails werden via POP3 vom Exchange abgerufen. Ein separater Windows User soll vermieden werden (ständiges Ab-/ und Anmelden). Vielen Dank vorab und Grüße

Hallo! Lieber spät antworten als gar nicht ;) - sorry. Also in den Eigenschaften der Internet Nachrichtenformate ist alles richtig hinterlegt - bei anderen Usern funktioniert die Weiterleitung ja (extern und intern), nur bei diesem einen User nicht. Regeln im Outlook existieren, bis auf den Abwesenheitsassistenten, keine.

Hallo Gemeinde, habe hier einen Exchange 2003 und Outlook 2003 im Einsatz. Habe hier einen User bei dem die Weiterleitung über den Abwesenheitsassistenten nur bedingt funktioniert, sprich intern kommende Emails werden ordnungsgemäß an den hinterlegten Empfänger weiter geleitet, externe Emails wiederum aber nicht. Bei allen anderen Usern klappt eine Weiterleitung auch bei externen Emails. Es sind bei dem betreffenden User keine zusätzlichen Regeln hinterlegt - nur die eine über den Abwesenheitsassi. Hat hier jemand vielleicht noch eine Idee?

Vielen Dank für deine Antwort. Das habe ich gefunden, mir war nur nicht klar warum man das nicht über die Oberfläche per Klick einstellen kann wenn der User bereits angelegt ist. Beim Neuanlegen des Users kann ich die Option ja schließlich aktivieren. Grüße

Der Anwender kann es in der Applikation selber ändern, sprich dies wird unterstützt. Windows Authentifizierung wird auch unterstützt. Seitens der GF ist aber gewünscht dies per SQL Authentifizierung umzusetzen. Nur komme ich nicht an der oben genannten Problematik vorbei :(

Hallo Gemeinde! Habe hier einen SQL 2005 Server im Einsatz. Auf diesem sind ca. 200 User angelegt - ohne Kennwort :(. Dieser Umstand soll sich nun ändern indem der User bei der Anmeldung am Warenwirtschaftssystem ein Kennwort vergeben muss. Diese Option nennt sich im SQL Server ja "Benutzer muss bei der nächsten Anmeldung das Passwort ändern". Leider ist diese Option bei bestehenden Usern ausgegraut. Bei Neuerstellung eines Users kann ich diese Option aber nutzen. Hat hier jemand eine Idee? Serverrollen stehen bei den USern auf public. PS: Die Anmeldung soll via SQL Server Authentifizierung erfolgen. Vielen Dank vorab.

Nochmal danke Cybquest. Habe zwar noch reichlich Fehler hier, werde mich aber mal weiter durchquälen. Grüße

Tausend Dank Cybquest. Wie immer super Hilfe von dir -schleim ;) Habe den Code jetzt wie folgt angepasst. Die sr.movefirst Geschichte ist mir nicht so ganz klar. Sub Main() Dim datei As String Dim datei2 As String Const pfad = "\\edi\import\" Dim kopfgefunden As Boolean If My.Application.CommandLineArgs.Count = 3 Then 'datei = My.Application.CommandLineArgs.Item(0) datei = My.Application.CommandLineArgs.Item(0) datei2 = My.Application.CommandLineArgs.Item(1) kopfgefunden = False Try ' Create an instance of StreamReader to read from a file. Using sr As StreamReader = New StreamReader(datei) Dim line As String Dim sr2 = New StreamWriter(datei2, False) Do line = sr.ReadLine() If Left(line, 6) = "KOPSLS" Then If cntHead = 0 Then strHead = line arrHead = Split(line, ";") strDate(cntHead) = arrHead(2) cntHead = cntHead + 1 End If Loop Until sr.EndOfStream strHead = Replace(strHead, strDate(0) & ";", strDate(1) & ";" & strDate(cntHead - 1)) ' Read and display the lines from the file until the end ' of the file is reached. Do line = sr.ReadLine() If Left(line, 6) <> "KOPSLS" Then sr2.writeline(line) Else If kopfgefunden = False Then kopfgefunden = True sr2.writeline(strHead) End If 'If kopfgefunden = False Then ' kopfgefunden = True ' sr2.writeline(line) 'End If End If Loop Until sr.EndOfStream sr.Close() sr2.close() End Using 'File.Delete(pfad & datei) Catch E As Exception ' Let the user know what went wrong. Console.WriteLine("The file could not be read:") Console.WriteLine(E.Message) End Try Else Console.WriteLine("Bitte geben sie den Dateinamen der Salesreportdatei an !") End If End Sub

Hallo! Vielen Dank für deine Anregungen. Es soll so aussehen KOPSLS;0000087;20090520;20090518;;9999999999995;9999999999991;EUR; Somit entfällt in der 1. Kopfzeile das Übertragungsdatum und wird mit der letzten Kopfzeile (Datum) ersetzt. Als weiteres Datum kommt das aus der 2. Kopfzeile dahinter. Somit entfäält auch ein ";" aus der 1. Kopfzeile. Das war s dann eigentlich auch schon ;) Hoffe man kann verstehen was ich will ?

Bin hierzu leider noch immer nicht wirklich weiter gekommen, daher nochmal ein "Auffrischungskommentar" ;). Vielleicht hat ja doch noch jemand eine Idee? Grüße

Ein Testlauf via VM wird natürlich vorab realisiert. So mal eben die Produktivumgebung "lahmlegen" ist nicht in meinem Sinne ;).