Jump to content

basti19885

Members
  • Gesamte Inhalte

    41
  • Registriert seit

  • Letzter Besuch

Profile Fields

  • Member Title
    Newbie

Fortschritt von basti19885

Enthusiast

Enthusiast (6/14)

  • Erste Antwort
  • Engagiert
  • Erster eigener Beitrag
  • Eine Woche dabei
  • Einen Monat dabei

Neueste Abzeichen

10

Reputation in der Community

  1. Hallo ich würde gern einen Windows7 Laptop in meine Samba3-domaine einbinden. Dabei gibt es nur einen User den den Lapi sowohl im Lan als auch außerhalb des LAN's nutzt und da möglchst mit dem selben Benutzerprofil. Mein versuch das ganze wie unter http://www.tomshardware.co.uk/forum/215434-46-associating-domain-account-local-user-profile beschrieben zu lösen brachte folgenden Fehler: Die Anmeldung des Dienstes "Gruppenrichtlinienclient" ist fehlgeschlagen. Zugriff verweigert "cached credentials" scheinen mir nach diesem Artikel (http://o-o-s.de/2007-10-16/windows-anmeldung-mit-cached-credentials) eher ungeignet.
  2. @Sunny61 Die Fehler tauchen in "C:\Program Files\Microsoft SQL Server\MSSQL10_50.MSSQLSERVER\MSSQL\Log\ERRORLOG" auf. Was das SP1 angeht muss ich ersteinmal klären, ob die Software mittlerweile auch für das SP1 freigegeben ist. Streiten kann man sich darüber, was die Logs angeht. Es läuft ein datenbankserver, der mehrere Datenbanken hat. und ich kann mich mit verschiedenen user anmelden unter anderem 'sa'.
  3. Nun darüber kann man streiten aber egal. Also auf den SQL Server greifen zu: Elo Professional (Document Management) Sage Office Line Sage Personal Die Serverversion ist: Microsoft SQL Server 2008 R2 (RTM) - 10.50.1600.1 (X64) Apr 2 2010 15:48:46 Copyright © Microsoft Corporation Standard Edition (64-bit) on Windows NT 6.1 <X64> (Build 7600: ) Alle SQL Dienste laufen als "Lokales System", außer: SQL Server Hilfsdienst für AD -> Netzwerkdienst SQL Server Browser -> Netzwerkdienst SQL Server (MSSQLSERVER) -> Netzwerkdienst
  4. Ich hab keine ahnung, wo das her kommt. Der Fehler kommt etwa aller 15-20 sekunden. und der "SQL Server Agent" Dienst ist auch gestartet. Was für infos suchst du konkret? (sorry mit win* kenn ich mich nicht so gut aus) EDIT: auch der hier beschriebene Ansatz bleibt ohne erfolg: wenn man wenigsten wüsste auf welche er zugreifen möchte?Aber wen wundert das schon? (win* halt)
  5. Hall ich erhalte seit einiger Zeit gehäuft den fehler: 2012-06-05 11:40:44.93 Login failed for user 'NT-AUTORITÄT\SYSTEM'. Ursache: Fehler beim Öffnen der explizit angegebenen Datenbank. [CLIENT: <local machine>] 2012-06-05 11:41:49.94 Fehler: 18456, Schweregrad: 14, Status: 38. Eine andere Standartdatenbank für den Benutzer auszuwählen klappt leider nicht. (siehe Understanding "login failed" (Error 18456) error messages in SQL Server 2005 - SQL Protocols - Site Home - MSDN Blogs Die Standartdatenbank für 'NT-AUTORITÄT\SYSTEM' ist "master". Danke für eure hilfe.
  6. So nun nimmt das ganze Langsam gestallt an und ich suche nach Hardware. Auf den ersten Blick tendiere ich zu LANCOM. Folgendes hab ich mal in die engere Auswahl genommen: Cisco WRVS4400N (wohl eher SOHO?) Linksys RV082 LANCOM 1611+ VPN LANCOM 1721+ VPN Die Angabe der gleichzeitigen "IPSec" Verbindungen irritiert mich ein wenig. wie ist das zu verstehen? Wie funtioniert das mit der Astaro Red? Brauch ich da auf der einen "Seite" ne Astaro und auf der anderen eine Astaro Red?
  7. 'Example: DelAllUsersRegKey.vbs "Software\Microsoft\Windows\CurrentVersion\Internet Settings\EnableHttp1_1" Option Explicit Dim oShell, sCommand, oUserRegDic, oSubFolder, sKey, oReg, sSubKey, aRegKeys(), iKeys, aDesktopKeys, oFSO, oExec, oStdOut, sLine, iErrorLevel, dtmConvertedDate Dim args, strComputer, objWMIService, colOperatingSystems, objOperatingSystem, sKeyName, sData, sType, OSVer, sMyFolder, iErrorLevel2 args = WScript.Arguments.Count If args < 1 then WScript.Echo "usage:" & vbCrlf & "DelAllUsersRegKey.vbs " &Chr(34) & "KeyName" & Chr(34) WScript.Quit end If sKeyName = WScript.Arguments.Item(0) sData = "0000000" sType = "REG_DWORD" ' get OS Version ' OS > XP = Other Path Set dtmConvertedDate = CreateObject("WbemScripting.SWbemDateTime") strComputer = "." Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") Set colOperatingSystems = objWMIService.ExecQuery ("Select * from Win32_OperatingSystem") For Each objOperatingSystem in colOperatingSystems OSVer = Left(objOperatingSystem.Version,1) Next if (OSVer < 6) Then ' OS is XP or lower sMyFolder = "\All " Else sMyFolder = "\Public" End If iKeys = 0 Set oShell = CreateObject("Wscript.Shell") sCommand = "%comspec% /c " & oShell.ExpandEnvironmentStrings("%WINDIR%") & "\System32\Reg.exe " oShell.RegWrite "HKCU\" & sKeyName,sData,sType Set oUserRegDic = CreateObject("Scripting.Dictionary") Set oFSO = CreateObject("Scripting.FileSystemObject") For Each oSubFolder In oFSO.GetFolder(Left(oShell.SpecialFolders(0),InStr(oShell.SpecialFolders(0),sMyFolder)-1)).Subfolders 'Look into the users special folder and get a list of all subfolders (existing users) On Error Resume Next '"disable" error handeling oUserRegDic.Add oSubFolder,oSubFolder.Name On Error GoTo 0 ' "enable" error handeling Next For Each sKey In oUserRegDic.Keys 'Slam all user regdata into HKU for editing later oShell.Run sCommand & "LOAD " & Chr(34) & "HKU\" & oUserRegDic.Item(sKey) & Chr(34) & " " & chr(34) & sKey & "\NTUser.dat" & Chr(34),0,True Next Set oExec = oShell.Exec("reg query HKU") Do While oExec.Status = 0 'holds the script until comand has finished. WScript.Sleep 100 Loop Set oStdOut = oExec.StdOut Do Until oStdOut.AtEndOfStream 'Populates aRegKeys with all sub keys in HKU sLine = Trim(oStdOut.ReadLine) If Len(sLine) > 1 Then 'Thows out empty line Select Case sLine Case "! REG.EXE VERSION 3.0" 'do nothing / remove uneeded data Case "HKEY_USERS" 'do nothing / remove uneeded data Case Else If Not oStdOut.AtEndOfStream then 'prevents extra array element ReDim Preserve aRegKeys(iKeys + 1) end if aRegKeys(iKeys) = sLine iKeys = iKeys + 1 End Select End If Loop For Each sSubkey In aRegKeys Set oExec = oShell.Exec("reg query " & Chr(34) & sSubkey & "\Control Panel\Desktop" & Chr(34)) Do While oExec.Status = 0 'holds the script until comand has finished. WScript.Sleep 100 Loop iErrorLevel = oExec.ExitCode On Error Resume Next oShell.RegRead sSubkey & "\" & sKeyName iErrorLevel2 = Err Err.clear If iErrorLevel = 0 and iErrorLevel2 = 0 then' if the reg query is sucsessful the key belongs to a user oShell.RegDelete sSubkey & "\" & sKeyName 'do the reg edit End if Next For Each sKey In oUserRegDic.Keys 'Clean up user regdata entered earlier oShell.Run sCommand & "UNLOAD " & Chr(34) & "HKU\" & oUserRegDic.Item(sKey) & Chr(34),0,True Next WScript.Quit
  8. Danke für den Tip. Es lag an der geänderten Ordner Struktur ab Vista(?). Anbei dir Überarbeitete Version, vielleicht kann das ja jemand gebrauchen. 'Example: SetAllUsersRegKey "Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\1\1A00" "0000000" "REG_DWORD" 'Example > Win Vista .. : SetAllUsersRegKey "Software\Microsoft\Windows\CurrentVersion\Internet Settings\EnableHttp1_1" "0000001" "REG_DWORD" Option Explicit Dim oShell, sCommand, oUserRegDic, oSubFolder, sKey, oReg, sSubKey, aRegKeys(), iKeys, aDesktopKeys, oFSO, oExec, oStdOut, sLine, iErrorLevel, dtmConvertedDate Dim args, strComputer, objWMIService, colOperatingSystems, objOperatingSystem, sKeyName, sData, sType, OSVer, sMyFolder args = WScript.Arguments.Count If args < 2 then WScript.Echo "usage:" & vbCrlf & "SetAllUsersRegKey.vbs " &Chr(34) & "KeyName" & Chr(34) & " " & Chr(34) &"Value" & Chr(34) & " " & Chr(34) & "Type" & Chr(34) WScript.Quit end If ' get OS Version ' OS > XP = Other Path Set dtmConvertedDate = CreateObject("WbemScripting.SWbemDateTime") strComputer = "." Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") Set colOperatingSystems = objWMIService.ExecQuery ("Select * from Win32_OperatingSystem") For Each objOperatingSystem in colOperatingSystems OSVer = Left(objOperatingSystem.Version,1) Next if (OSVer < 6) Then ' OS is XP or lower sMyFolder = "\All " Else sMyFolder = "\Public" End If sKeyName = WScript.Arguments.Item(0) 'RegKey to Edit sData = WScript.Arguments.Item(1) 'New Value sType = WScript.Arguments.Item(2) 'Value Type iKeys = 0 Set oShell = CreateObject("Wscript.Shell") sCommand = "%comspec% /c " & oShell.ExpandEnvironmentStrings("%WINDIR%") & "\System32\Reg.exe " oShell.RegWrite "HKCU\" & sKeyName,sData,sType Set oUserRegDic = CreateObject("Scripting.Dictionary") Set oFSO = CreateObject("Scripting.FileSystemObject") For Each oSubFolder In oFSO.GetFolder(Left(oShell.SpecialFolders(0),InStr(oShell.SpecialFolders(0),sMyFolder)-1)).Subfolders 'Look into the users special folder and get a list of all subfolders (existing users) On Error Resume Next '"disable" error handeling oUserRegDic.Add oSubFolder,oSubFolder.Name On Error GoTo 0 ' "enable" error handeling Next For Each sKey In oUserRegDic.Keys 'Slam all user regdata into HKU for editing later oShell.Run sCommand & "LOAD " & Chr(34) & "HKU\" & oUserRegDic.Item(sKey) & Chr(34) & " " & chr(34) & sKey & "\NTUser.dat" & Chr(34),0,True Next Set oExec = oShell.Exec("reg query HKU") Do While oExec.Status = 0 'holds the script until comand has finished. WScript.Sleep 100 Loop Set oStdOut = oExec.StdOut Do Until oStdOut.AtEndOfStream 'Populates aRegKeys with all sub keys in HKU sLine = Trim(oStdOut.ReadLine) If Len(sLine) > 1 Then 'Thows out empty line Select Case sLine Case "! REG.EXE VERSION 3.0" 'do nothing / remove uneeded data Case "HKEY_USERS" 'do nothing / remove uneeded data Case Else If Not oStdOut.AtEndOfStream then 'prevents extra array element ReDim Preserve aRegKeys(iKeys + 1) end if aRegKeys(iKeys) = sLine iKeys = iKeys + 1 End Select End If Loop For Each sSubkey In aRegKeys Set oExec = oShell.Exec("reg query " & Chr(34) & sSubkey & "\Control Panel\Desktop" & Chr(34)) Do While oExec.Status = 0 'holds the script until comand has finished. WScript.Sleep 100 Loop iErrorLevel = oExec.ExitCode If iErrorLevel = 0 then' if the reg query is sucsessful the key belongs to a user oShell.RegWrite sSubkey & "\" & sKeyName,sData,sType 'do the reg edit End if Next For Each sKey In oUserRegDic.Keys 'Clean up user regdata entered earlier oShell.Run sCommand & "UNLOAD " & Chr(34) & "HKU\" & oUserRegDic.Item(sKey) & Chr(34),0,True Next WScript.Quit
  9. Hallo ich hab hier ein script gefunden, mit dem man die Registry "HKU" durchlaufen kann. Unter Xp geht das auch alles ohne Probleme. Unter win7 (x64) fliegt der bei Zeile 26 Zeichen 1 mit folgender Meldung raus: Ungültiger Prozeduraufruf oder ungültiges Argument: 'Left' Ich hab nicht also viel Plan von VBS, wär ganz nett wenn da mal jemand drüber guggen könnte. Danke! SetAllUsersRegKey.vbs 'Example: SetAllUsersRegKey "Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\1\1A00" "0000000" "REG_DWORD" Dim oShell, sCommand, oUserRegDic, oSubFolder, sKey, oReg, sSubKey, aRegKeys(), iKeys, aDesktopKeys, oFSO, oExec, oStdOut, sLine, iErrorLevel Dim sKeyName,sData,sType args = WScript.Arguments.Count If args < 2 then WScript.Echo "usage:" & vbCrlf & "SetAllUsersRegKey.vbs " &Chr(34) & "KeyName" & Chr(34) & " " & Chr(34) &"Value" & Chr(34) & " " & Chr(34) & "Type" & Chr(34) WScript.Quit end If sKeyName = WScript.Arguments.Item(0) sData = WScript.Arguments.Item(1) sType = WScript.Arguments.Item(2) iKeys = 0 Set oShell = CreateObject("Wscript.Shell") sCommand = "%comspec% /c " & oShell.ExpandEnvironmentStrings("%WINDIR%") & "\System32\Reg.exe " oShell.RegWrite "HKCU\" & sKeyName,sData,sType Set oUserRegDic = CreateObject("Scripting.Dictionary") Set oFSO = CreateObject("Scripting.FileSystemObject") For Each oSubFolder In oFSO.GetFolder(Left(oShell.SpecialFolders(0),InStr(oShell.SpecialFolders(0),"\All ")-1)).Subfolders 'Look into the users special folder and get a list of all subfolders (existing users) On Error Resume Next '"disable" error handeling oUserRegDic.Add oSubFolder,oSubFolder.Name On Error GoTo 0 ' "enable" error handeling Next For Each sKey In oUserRegDic.Keys 'Slam all user regdata into HKU for editing later oShell.Run sCommand & "LOAD " & Chr(34) & "HKU\" & oUserRegDic.Item(sKey) & Chr(34) & " " & chr(34) & sKey & "\NTUser.dat" & Chr(34),0,True Next Set oExec = oShell.Exec("reg query HKU") Do While oExec.Status = 0 'holds the script until comand has finished. WScript.Sleep 100 Loop Set oStdOut = oExec.StdOut Do Until oStdOut.AtEndOfStream 'Populates aRegKeys with all sub keys in HKU sLine = Trim(oStdOut.ReadLine) If Len(sLine) > 1 Then 'Thows out empty line Select Case sLine Case "! REG.EXE VERSION 3.0" 'do nothing / remove uneeded data Case "HKEY_USERS" 'do nothing / remove uneeded data Case Else If Not oStdOut.AtEndOfStream then 'prevents extra array element ReDim Preserve aRegKeys(iKeys + 1) end if aRegKeys(iKeys) = sLine iKeys = iKeys + 1 End Select End If Loop For Each sSubkey In aRegKeys Set oExec = oShell.Exec("reg query " & Chr(34) & sSubkey & "\Control Panel\Desktop" & Chr(34)) Do While oExec.Status = 0 'holds the script until comand has finished. WScript.Sleep 100 Loop iErrorLevel = oExec.ExitCode If iErrorLevel = 0 then' if the reg query is sucsessful the key belongs to a user oShell.RegWrite sSubkey & "\" & sKeyName,sData,sType 'do the reg edit End if Next For Each sKey In oUserRegDic.Keys 'Clean up user regdata entered earlier oShell.Run sCommand & "UNLOAD " & Chr(34) & "HKU\" & oUserRegDic.Item(sKey) & Chr(34),0,True Next
  10. Danke! Das mit dem indirektem Zugriff war uns so nicht Bewusst und Bekannt.
  11. Hallo, Ich habe eine Application, die auf einen SQL Server zugreift. Soweit sogut. Laut Aussage des Systemhauses braucht jeder Nutzer der diese nutzt eine CAL für den SQL-Server. Ich bin mit meinem Kollegen allerdings der Meinung, dass nur eine CAL für den SQL-Server benötigt wird. Da ja nur die Application an sich (als einzelner User) auf die Datenbank zugreift und nicht der einzelne Benutzer der Application.
  12. Das Thema kann als gelöst betrachtet werden. Eine Herstellerspezifische "unattend.xml" unter ../sources/$oem*/$$/panther/unattend war die Ursache.
  13. @hf48 In erster line handelt es sich um ein win7x64 deploy doch was willst du mir mit dem letzen post eigentlich sagen? Hättest du ferner die XML datei mal genauer betrachtet wär dir sicher aufgefallen das "o:\install\winvista\vistasrc\install.wim" ein Komentar ist.
  14. @hf48: Es behauptet ja auch keiner, dass es an Linux liegt. Der Fehler ist in der tat in der "unattend_2go.xml" zu suchen nur wo? Wo und was das "o:\install\winvista\vistasrc\install.wim" istr ne gute frage, ich hab das nach einem Howto im Opsi-Handbuch durchgeführt, und nur die entsprechenden stellen geändert, aber das hab ich da ganz sicher nicht rein geschrieben. Danke erstmal!
  15. Hallo, ich versuch mich schon seit paar Tagen an einer unattended Installation für Windows 7. Realisiert wird das ganze mit OPSI. Leider komm ich allerdings bei der Abfrage von Benutzernamen und Rechernamen nicht weiter. siehe hier. Vielleicht hat ja hier jemand eine idee?
×
×
  • Neu erstellen...