-
Gesamte Inhalte
376 -
Registriert seit
-
Letzter Besuch
Beiträge erstellt von thumb
-
-
So geht´s :
SELECT SUBSTRING(SProjectName, CHARINDEX('\', SProjectName, CHARINDEX('\', SProjectName, 1) + 1) + 1, CHARINDEX('\', SProjectName, CHARINDEX('\',
SProjectName, CHARINDEX('\', SProjectName, 1) + 1) + 1) - CHARINDEX('\', SProjectName, CHARINDEX('\', SProjectName, 1) + 1) - 1) AS Master,
SUBSTRING(SProjectName, CHARINDEX('_', SProjectName, 1) + 1, CHARINDEX('_', SProjectName, CHARINDEX('_', SProjectName, 1) + 1)
- CHARINDEX('_', SProjectName, 1) - 1) AS Hersteller, SUBSTRING(SProjectName, CHARINDEX('_', SProjectName, CHARINDEX('_', SProjectName, 1)
+ 1) + 1, CHARINDEX('_', SProjectName, CHARINDEX('_', SProjectName, CHARINDEX('_', SProjectName, 1) + 1) + 1) - CHARINDEX('_', SProjectName,
CHARINDEX('_', SProjectName, 1) + 1) - 1) AS Software, SUBSTRING(SProjectName, CHARINDEX('_', SProjectName, CHARINDEX('_', SProjectName,
CHARINDEX('_', SProjectName, 1) + 1) + 1) + 1, CHARINDEX('_', SProjectName, CHARINDEX('_', SProjectName, CHARINDEX('_', SProjectName,
CHARINDEX('_', SProjectName, 1) + 1) + 1) + 1) - CHARINDEX('_', SProjectName, CHARINDEX('_', SProjectName, CHARINDEX('_', SProjectName, 1) + 1)
+ 1) - 1) AS Version, iVersion
FROM dbo.Software
-
Hey Jungs und Mädels hat keiner eine Idee ?
-
Hat keiner einen Tip ???
-
Tach auch,
dann halt per CMD :
Du musst die Variable SP ( habe ich auf 2195, das ist die Buildnumber für w2k, SP3 ) anpassen und unter :install den Aufruf zur SP Installation einfügen ( ich habe da zum Test ein ECHO drin ), unter :installed musst Du natürlich ECHO ebenfalls enfernen ( war auch nur zum Test ).
Das W2k SP kannst Du mit folgenden Argumenten ( auch ) silent installieren :
http://support.microsoft.com/?kbid=262839
Gruß
THUMB
:: Fragt das W2k SP Level ab und installiert SP, wenn nötig
:: Build Number 2195 stellt W2k SP3 dar
::SP3 wird abgefragt
set SP=2195
@ echo off
::Version wird ermittelt und in temp. Datei geschrieben
ver > %temp%\ver.log
::String in Log Datei enthalten ?
find "%SP%" %temp%\ver.log
::Wurde der String gefunden ?
if %errorlevel% == 1 goto install
if %errorlevel% == 0 goto installed
::SP wird installiert
:install
echo "SP3 Installation"
pause
exit
::SP ist bereist installiert, Exit
:installed
echo "SP3 ist bereist installiert"
pause
exit
-
Bitteschööön :
dir = InputBox("Welcher Ordner soll angelegt werden ?" ,"Order angeben")
if dir = "" then
wscript.quit
end if
set fso = WScript.CreateObject("scripting.filesystemobject")
if (not fso.folderexists(dir)) then
set fo = fso.createfolder(dir)
Set fo = fso.createfolder(Dir & "\Fotos")
Set fo = fso.createfolder(Dir & "\Dokus")
end if
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.run ("cmd.exe /c %0\..\test.bat")
Es werden also unter dem Ordner, der per Dialog angegeben wird die Ordner "Fotos" und "Dokus" angelegt und anschliessend die Batch "test.bat", welche sich im gleichen Verzeichnis wie das VB-Script befindet, gestartet.
Gruß
THUMB
PS : Ich empfehle das Buch "Inside Windows Script Host" von Günter Born
-
Tach auch,
kann mir jemand einen Tipp geben, wie ich per VBS Word Tabellen ansprechen kann. Es muss ´ne Tabelle sein, Felder, bestimmte Zeilen etc. kann ich, nur mit der Tabelle krieg ich´s nicht hin. Felder kann ich benamen und dann ansprechen, wie geht das mit ´ner Tabelle ?
Die Tabelle ist dynamisch.
Vielen Dank + Grüße
THUMB
-
Tach auch,
hier das VB-Script :
dir = InputBox("Welcher Ordner soll angelegt werden ?" ,"Order angeben")
if dir = "" then
wscript.quit
end if
set fso = wscript.createobject("scripting.filesystemobject")
if (not fso.folderexists(dir)) then
set fo = fso.createfolder(dir)
end if
Den Code kopieren, als *.vbs abspeichern, fertig.
Im Dialog ist der Pfad anzugegen, existiert der Ordner unter diesem Pfad nicht, wird er angelegt.
Gruß
THUMB
-
Tach Jörg78,
klar, das "<" ist ein Umleitungszeichen, "<j.txt" leitet also den Inhalt der Datei "j.txt" als Input für CACLS um. Das "%0\..\" steht für das aktuelle Verzeichnis, also das in welchem die aufgerufene Batch liegt. Das Umleitungszeichen ">" leitet die Standardausgabe eines Programmes z.B. in eine Datei um.
cacls D:\Verzeichnis /T /C /G Domäne\Dom„nen-Admins:F <%0\..\j.txt >> %0\..\log.txt
Das Rückgabewert von CACLS, also das was Du als Meldung erhälst, wenn Du den CACLS Befehl statt aus einer Batch auf der CommandLine ausführst, wird durch ">> %0\..\log.txt" in die Datei log.txt protokolliert und zwar wird das zu Protokollierende an den Inhalt der Datei angehängt. Verwendest Du statt ">>" nur ">" wird die Datei jedesmal überschrieben, also nichts angehängt.
Alles klar, oder noch Fragen ?
Gruß
THUMB
-
Tach auch,
das geht so :
<%0\..\j.txt nach dem CACLS Befehl, die Datei j.txt muss sich im gleichen Verzeichnis wie die Batch befinden und muss folgendes enthalten :
j
Also das Zeichen "j" und eine CR ( Return ).
Hier nochmal der Aufruf von CACLS :
cacls D:\Verzeichnis /T /C /G Domäne\Dom„nen-Admins:F <%0\..\j.txt >> %0\..\log.txt
Gruß THUMB
-
Tach auch,
probier´s mal mit CACLS, das kann mit Umlauten umgehen.
Gruß
THUMB
-
Tach auch,
die Shares findest Du hier :
[HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\LanmanServer\Shares\Security]
[HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\LanmanServer\Shares]
Gruß
THUMB
-
Sorry, CACLS kann sehr wohl anzeigen welche ACL gesetzt ist :
C:\>cacls C:\1
C:\1 xxxxx_DE\Adm:(OI)(IO)F
xxxxx_DE\Admi:(CI)F
NT-AUTORIT─T\SYSTEM:(OI)(IO)F
NT-AUTORIT─T\SYSTEM:(CI)F
ERSTELLER-BESITZER:(OI)(IO)F
ERSTELLER-BESITZER:(CI)F
Jeder:(OI)(IO)C
Jeder:(CI)C
VORDEFINIERT\Administratoren:(OI)(IO)F
VORDEFINIERT\Administratoren:(CI)F
-
Hallo,
das Script läuft unter NT und W2k, unter XP habe ich es noch nicht ausprobiert.
Ihr dürft die Zeilen "Beginn Script" und "Ende Script" nicht mitkopieren, nur die Zeilen dazwischen.
Bei mir kann ich keinen Fehler festellen.
Probiert es bitte nochmal und meldet euch.
Viele Grüße
THUMB
-
Hallo zusammen,
ich möchte Strings in SQL manipulieren, und zwar derart.
Aus dem String :
db:ApplikationsDB\Applikationen\SI\App_Actuate_ActuatePlugIn_5.00_TS
Sollen die Strings werden:
SI
App_Actuate_ActuatePlugIn_5.00_TS
Actuate
Bin um jede Hilfe dankbar.
Gruß
THUMB
-
Tach auch,
entweder mit RUNAS ( System-Tool, W2k ), oder mit RUNAS Professional von :
http://www.shareware.de/software/Programm_RunAsP_7025.htm
Gruß THUMB
-
Tach auch,
versuchs damit, ´n nettes Tool zur Umlautkonvertierung in Textdateien :
http://www.martinvogel.de/prog/bumwa.html
In Deinem Falle müsste der Aufruf wie folgt aussehen :
bumwa.exe B: c:\ä.txt
"B:" ist der Konvertierungstyp ( WIN -> DOS )
"c:\ä.txt" ist die Datei die die Ä´s enthält, die konvertiert werden sollen.
Viele Grüße
THUMB
-
Tach auch,
na ein wenig genauer musst Du schon sagen was net geht, sonst kann ich Dir nicht helfen.
Mach mal folgendes:
Kopiere die Zeichen zwischen "Beginn Script" und "Ende Script" in eine Textdatei und benenne diese in Test.vbs um.
Starte die Datei test.vbs, Du solltest nun ein kleines Fenster mit den Infos zum BS, u.a. eben das SP-Level erhalten.
Geht das bei Dir ?
Gruß
THUMB
-
Tach auch,
das Script fragt u.a. das SP-Level ab.
Du musst lediglich noch ´ne Abfrage einbauen, die bei nicht SPX die Installation vom Netzlaufwerk startet.
Gruß
THUMB
Beginn Script
Option Explicit
Const xMajorVer = 1
Const xMinorVer = 2
Const xBuild = 3
Const xPlatform = 4
Const xTxt = 5
Const VER_PLATFORM_WIN32s = 0
Const VER_PLATFORM_WIN32_WINDOWS = 1
Const VER_PLATFORM_WIN32_NT = 2
Dim objAdr, Text, Title, OSName
Title = "System Information"
Text = "Windows Properties" & vbCRLF
' Get a reference to the WSHExtend control
Set objAdr = WScript.CreateObject("WSHSystem.WinSys")
objAdr.WSHOsSysInfo ' Get Windows-OS-Info
Text = Text + "Platform "
' Estimate OS-Platform
Select Case objAdr.OsSysInfoValue(xPlatform)
Case VER_PLATFORM_WIN32_WINDOWS
If objAdr.OsSysInfoValue(xMajorVer) = 4 _
And objAdr.OsSysInfoValue(xMinorVer) = 0 Then
Text = Text & "Windows 95"
Else
Text = Text & "Windows 98"
End If
Case VER_PLATFORM_WIN32_NT
If objAdr.OsSysInfoValue(xMajorVer) = 5 _
And objAdr.OsSysInfoValue(xMinorVer) = 0 Then
Text = Text & "Windows 2000"
Else
Text = Text & "Windows NT 4.x"
End If
Case Else
Text = Text & "---"
End Select
Text = Text & vbCRLF
' Extract other Operating System Properties
Text = Text & "Version " & objAdr.OsSysInfoValue(xMajorVer)
Text = Text & "." & objAdr.OsSysInfoValue(xMinorVer) & vbCRLF
Text = Text & "Build " & (objAdr.OsSysInfoValue(xBuild) AND &HFFF)
Text = Text & " " & objAdr.OsSysInfoValue(xTxt) & vbCRLF
MsgBox Text, vbOkOnly + vbInformation, Title
WScript.Quit()
' End
Ende Script
-
Tach auch,
Bitte beachten: Die angegeben Schalter sind teilweise abhängig von der Programm- und Betriebssystem-Version sowie den installierten Service-Packs und der Installations-Art.
MPLAYER.EXE
MPLAY32.EXE
MPLAYER2.EXE
/Open <Datei>
Startet den Player und öffnet <Datei>
/Play <Datei>
Startet den Player und spielt <Datei> ab
/Close
Schließt das Player-Fenster nach dem Abspielen automatisch. Funktioniert nur in Verbindung mit /Play
/AVI /MID /WAV
Beschränkt die Wiedergabe auf den angegebenen Dateityp (nur in Verbindung mit OLE)
/Fullscreen
Startet die Wiedergabe im Vollbildmodus (nur MPLAYER2.EXE)
/New
Startet eine neue Instanz des Players (nur MPLAYER2.EXE)
WMPLAYER.EXE
/Device:{DVD|AudioCD}
Startet Widergabe auf dem angegebenen Gerät
/Playlist <Playliste>
Startet mit Playlist
/Task NowPlaying
Startet den angegebenen Task
/Task MediaGuide
/Task CDAudio
/Task MediaLibrary
/Task RadioTuner
/Task SkinViewer
/Task PortableDevice
Gruß
THUMb
-
Tach auch,
zu der Pipe ( das "|" Zeichen ):
Bsp:
ECHO J| del A:*.*
Das "|" bewirkt, dass der Output von der linken Seite als Eingabe
fuer die rechte Seite uebernommen wird. DOS produziert dazu zwar auch eine Zwischendatei (im temporaeren Verzeichnis %TEMP%), aber man braucht sich um deren Namen und um das anschliessende Loeschen nicht zu kuemmern.
Solche "PIPES" sind eigentlich dafuer gedacht, ganze Text-Dateien
zu verarbeiten. Das Programm SORT z.B. macht wie MORE auch
nur Sinn, wenn es mit Umleitungen benutzt wird. Beide Programme erwarten (standardmaessig) den Input von der Tastatur und senden den Output auf den Bildschirm.
Gruß THUMB
-
Tach auch,
dies hatten wir in unserem Netz auch und nachdem die Switches resetet wurden, war der Effekt verschwunden. Ich kann mir das nur so erklären dass abrechende LAN Verbindungen das Rücksetzen des Flags "Datei ist von anderem User geöffnet" nicht durchgeführt werden konnte.
Gruß
THUMB
-
Tach auch,
RegKey HKEY_CURRENT_USER\Printers sichern und per Login zuweisen.
Hab das mal bei einer Migration gemacht, damit alles User nach der Mig. Ihre Standarddrucker wieder erhalten, die Treiber müssen natürlich auf den Rechner vorhanden sein.
Gruß
THUMB
-
Tach auch,
jo der W2k Rechner gewinnt halt immer die Wahl ( election ).
Näheres findest Du hier, müsste Dir helfen :
http://www.digital-labs.de/kb/faq/faq-nt4/networking/browser.htm
Gruß
THUMB
-
Tach auch,
gleiches Problem hatte ich auch, dies half :
http://support.microsoft.com/?kbid=315346
Viel Glück und Gruß
THUMB
Benutzerrechte über Batchdatei ändern?
in Windows Forum — Allgemein
Geschrieben
Hi,
wenn Du NetInstall verwendest, muss in der Paketroutine die Deinstalltion, resp. dessen Ausführung lediglich als "User per Service" geflaggt sein. NetInstall führt den Befehl dann im Kontext eines NetInstall Kontos aus, welches in der lokalen Admingruppe des Clients sein muss.
Das ist der Sinn eins solchen tools; Installtionen / Deinstalltionen für User auszuführen, die keine lokalen Adminrechte besitzen.
Natürlich kannst Du das auch mit RUNAS tun, dies führt aber dein NetInstall ad absurdum.
Gruß
THUMB