Beiträge von Surfy

Hallo zusammen

Ich muss ODBC Datasoucen löschen, die einen bestimmten Treiber verwenden.

HKEY_LOCAL_MACHINE\SOFTWARE\ODBC\ODBC.INI\Driver1

HKEY_LOCAL_MACHINE\SOFTWARE\ODBC\ODBC.INI\Driver2

HKEY_LOCAL_MACHINE\SOFTWARE\ODBC\ODBC.INI\Driver(n)

Ein Treibereintrag sieht so aus:

REGEDIT4

Zitat

[HKEY_LOCAL_MACHINE\SOFTWARE\ODBC\ODBC.INI\driver2]
"Driver"="C:\\WINDOWS\\system32\\mydriver.dll"
"Server"="MyServer"
"EnableEnsure"="0"
"Dictionary"="ENTWD2"
"CacheSQLTables"="0"
"AccountPrompt"="0"
"CommitBehavior"="1"
"TxnIsolation"="2"
"FetchRows"="100"
"ReadOnly"="1"
"AccessibleTables"="1"
"FetchDouble"="0"

Alles anzeigen

DH in der Theorie müsste ich alle Datasourcen, die den Treiber

"Driver"="C:\\WINDOWS\\system32\\mydriver.dll"

enthalten löschen. Hilft mir jemand auf die Sprünge, wie sich das umsetzen lässt.

Ich hab zwar hier sogar was in die Richtung gefunden, aber es überfordert meinen Skill: ODBC-Generator

Danke euch,

Surfy

Jetzt kommt noch die ganz blauäugige Quizfrage: geht das ganze nun auch hidden?

Was bei dieser Form von Guicontrol ja schon fast nicht möglich scheint...

Danke dir, dass sieht laut Hilfe genau passend aus: ""IsEnabled, ISChecked"

Surfy

Hallo zusammen

Ich würde gerne Scriptgesteuert eine Einstellung ändern, wobei auf jedem System der Zustand anders sein kann.

Mit ControlClick kann ich zwar die Einstellung ändern, jedoch erfolgt nur ein "Change" und ich will erreichen dass überall dass häckchen nicht enabled ist.

[Blockierte Grafik: http://blogs.technet.com/blogfiles/mikelag/WindowsLiveWriter/Theeffectsofpagedpooltokenmemoryusageand_DB47/image_thumb.png] 

Wie kann ich den zustand des Button`s abfragen? Das Ziel wäre, dass auf jedem Client das Häckchen raus genommen ist.

Danke für eure Hilfe

Wie könnte sowas mit Gui-Controls aussehen?

Run('control mlcfg32.cpl')
WinWaitActive("Mail Setup - Default Outlook Profile")
Send ("{ENTER}")
WinWaitActive("Account Settings")
send ("{TAB}{TAB}{TAB}")
Send ("{ENTER}")
;ControlClick("[CLASS:Button]", "INSTANCE:3", "&More Settings ...")
WinWaitActive("Change Account")
;ControlClick("Change Account", "","[CLASS:Button; INSTANCE:3]")
send ("{TAB}{TAB}")
Send ("{ENTER}")
WinWaitActive("Microsoft Exchange")
ControlClick("", "","[CLASS:SysTabControl32; INSTANCE:2]")

Leider stecke ich da fest, ich weiss nicht wie ich die anderen Controls ansteuern kann... Kann mir jemand unter die Arme greifen?

Surfy

Leider sind auch die Links @ officeanswer.info nicht so hilfreich wie gedacht

Anscheinend wurde das noch nie via Script umgesetzt, und mein Beitrag gehört eher in eine M$ Newsgroup

Wenn Du auf cmd.exe ein Runas machst, läuft jeder darin gestartete Prozess unter diesen Rechten...

Die Adminrechte "müssten" sich daher immer weiter durchvererben, analog zu einem Runas.

Hat jemand eine Idee wie man dies Scriptmässig umsetzen könnte?

[Blockierte Grafik: http://blogs.technet.com/blogfiles/mike…image_thumb.png]

http://office.microsoft.com/en-us/outlook-…P001232935.aspx

Zitat

Turn Cached Exchange Mode off

• On the Tools menu, clickAccount Settings.
• On the E-mail tab, click the Exchange account, and then click Change.
• Under Microsoft Exchange server, clear the Use Cached Exchange Mode check box.
• Exit and restart Office Outlook 2007.

Das ganze wird binär unter HKCU\Software\Microsoft\Windows NT\CurrentVersion\Windows Messaging Subsystem\Profiles\Default Outlook Profile gespeichert, wie es ausschaut, blöderweise auch noch mit einer dynamischen GUID...

"Irgendwas" hab ich zum Thema gefunden @ http://omniscientist.net:8081/outlookbutchers2 - und http://www.dimastr.com/redemption/rdo/rdosession.htm - für mich nur Bahnhof...

Surfy

PS: ein Link der vielleicht was zum Thema hätte, ist nicht erreichbar:

http://www.officeanswer.info/tag/account-settings

http://www.officeanswer.info/tag/office-customization-tool

http://www.officeanswer.info/tag/prf

Paytool: http://www.intelliadmin.com/index.php/outl…neratordownload

Wie liesse sich das ZeileX noch dynamisch umformen?

$config = (@ScriptDir & "\UserInfo.ini")
$titel = IniRead($config, "Configuration", "Titel", "NichtGefunden")
$zeile1 = IniRead($config, "Configuration", "Zeile1", "NichtGefunden")
$zeile2 = IniRead($config, "Configuration", "Zeile2", "NichtGefunden")
$zeile3 = IniRead($config, "Configuration", "Zeile3", "NichtGefunden")
$zeile4 = IniRead($config, "Configuration", "Zeile4", "NichtGefunden")
$zeile5 = IniRead($config, "Configuration", "Zeile5", "NichtGefunden")

Mit _filereadtoarray() bin ich wohl nicht auf gutem wege.

$config = (@ScriptDir & "\UserInfo.ini", "zeilen(x))

For $x = 0 To Ubound($config, 1)

*Kopfkratz*

Chip, dass war rein funktional die Lösung!

While 1
While 1
TrayTip($titel, @LF & $zeile1 & @LF & @LF & $zeile2 & @LF & @LF & $zeile3 & @LF & @LF & $zeile4 & @LF & @LF & $zeile5, 5, 1)
For $i = 1 To $prozesse[0][0]
Sleep(100)
If ProcessExists($prozesse[$i][0]) Then
ToolTip($titel & ", terminated process: " & $prozesse[$i][1], 550, 0)
RunWait(@ComSpec & ' /c taskkill.exe /F /IM ' & $prozesse[$i][0], @WindowsDir, @SW_HIDE)
;ProcessClose($prozesse[$i][0])
EndIf
Next
WEnd
Sleep(1000)
WEnd

Aus performance Gründen musste ich noch eine Sleep(100) einbauen - jetzt läufts wie geschmiert - ohne allzuviel CPU Load

Herzlichen Dank euch allen!

Danke euch beiden!

Die Exe wird als Prozess gestartet, und soll solange laufen, bis ich den Prozess beende.

Dabei soll laufen überprüft werden, ob einer der im inifile gelisteten Prozesse läuft, und dieser Beendet werden. Dabei soll der User Informiert werden, via Tooltip.

Daher ist die While Schleife schon passend, um das ganze in eine Endlosschlaufe zu bringen?

autoBert: Leider läuft das ganze von Dir noch nicht - es werden keine Prozesse beendet, oder diese oben im Tootip angezeigt. Irgendwie läuft die verschachtelte Schlaufe nicht rund.

XP-User: das unschöne an deiner Lösung ist, dass "ProcessClose" auch ausgeführt wird, wenn der genannte Prozess gar nicht läuft. Hier bist Du wieder nur bei einer Schlaufe.

Meine versuche mit

Opt("TrayMenuMode", 1)
$config = (@ScriptDir & "\UserInfo.ini")
$titel = IniRead($config, "Configuration", "Titel", "NichtGefunden")
$zeile1 = IniRead($config, "Configuration", "Zeile1", "NichtGefunden")
$zeile2 = IniRead($config, "Configuration", "Zeile2", "NichtGefunden")
$zeile3 = IniRead($config, "Configuration", "Zeile3", "NichtGefunden")
$zeile4 = IniRead($config, "Configuration", "Zeile4", "NichtGefunden")
$zeile5 = IniRead($config, "Configuration", "Zeile5", "NichtGefunden")
$aToClose = IniReadSection($config, "Prozesse")
;_ArrayDisplay($aToClose)

Global $iKill = 0
While 1
TrayTip($titel, @LF & $zeile1 & @LF & @LF & $zeile2 & @LF & @LF & $zeile3 & @LF & @LF & $zeile4 & @LF & @LF & $zeile5, 5, 1)
$list = ProcessList()
For $i = 1 To $list[0][0]
For $j = 1 To $aToClose
If $list[$i][0] = $aToClose[$j][0] Then ;hier ist es wichtig die beiden Laufvariablen der Schleifen nicht zu verwechseln
ToolTip($titel & ", terminated process: " & $aToClose[$j][0], 550, 0)
RunWait(@ComSpec & ' /c taskkill.exe /F /IM ' & $aToClose[$j][0], @WindowsDir, @SW_HIDE)
$iKill += 1
Sleep(5000) ;damit der Tooltipp auch mind. 5 sec sichtbar ist
EndIf
Next
Next
Sleep(1000)
WEnd

Scheitern leider kläglich

Hi Dino

Darf ich fragen, wieso Du die genannten ocx Dateien registrieren willst?

Ich kann Dir zwar nicht sagen wie man es am elegantesten löst, aber ein Weg der sicher funktioniert ist:

RunWait(@COMSPEC & " /c regsvr32 " & Chr (34) & "c:\Program Files\MyProg\msxml.dll" & Chr (34) & " /s ")
RunWait(@COMSPEC & " /c regsvr32 " & "c:\windows\system32\msxml.dll" & " /s ")

Elegant - dass können andere garantiert besser...

Surfy

Herzlichen Dank für den Tip

Bei mir setzt das verständniss leider sehr für aus, sobald die Schleifen und Arrays ins Spiel kommen..

For $i = 1 To $var[0][0]
MsgBox(4096, "", "Schlüssel: " & $var[$i][0] & @CRLF & "Wert: " & $var[$i][1])
Next

Wie wird $i zu 1 - oder woher weiss die For Schleife, wann alle Ergebnisse durchlaufen sind?

Aber weg von meinen Unzulänglichkeiten, und zurück zum Code

Eine For Schleife habe ich ja schon.

$list = ProcessList()
For $i = 1 To $list[0][0]

Allerdings ist mir nun Schleierhaft, wie ich für jedes $i einen Abgleich mit dem zweiten Array machen kann (und da jeweils jede möglichkeit durchspielen kann.

$list = ProcessList()
For $i = 1 To $list[0][0]

For $i = 1 To $geleseneintersection[0][0]

if $list[0][0]=$geleseneinersection[i][0] then killtask $list[0][0]

In leiser verzweilfung...

Surfy

Zitat von DevFly

Schonmal damit versucht? ProcessClose

Hui, hast Du meinen Beitrag überhaupt gelesen? Es geht nicht um die Methode, einen Prozess zu schliessen. Sondern darum - einen funktionierenden Script dynamischer umzusetzen.

Surfy

Hallo zusammen

Ich würde gerne noch die Prozesse die in der Case-Schleife genannt werden, dynamisch aus einem Inifile auslesen. Irgendwie bekomme ich es nicht zum laufen, der Case schleife den richtigen Syntax zu übergeben.

So wie es jetzt ist, läuft es zwar, trotzdem wäre ein dynamisches Handling via Inifile schöner. Ich hoffe jemand findet schnell zeit für mich.

$config = (@ScriptDir & "\UserInfo.ini")
$titel= IniRead($config, "Configuration", "Titel", "NichtGefunden")
$zeile1= IniRead($config, "Configuration", "Zeile1", "NichtGefunden")
$zeile2= IniRead($config, "Configuration", "Zeile2", "NichtGefunden")
$zeile3= IniRead($config, "Configuration", "Zeile3", "NichtGefunden")
$zeile4= IniRead($config, "Configuration", "Zeile4", "NichtGefunden")
$zeile5= IniRead($config, "Configuration", "Zeile5", "NichtGefunden")
Opt("TrayMenuMode",1)
Global $iKill = 0
While 1
TrayTip($titel, @LF & $zeile1 & @LF & @LF & $zeile2 & @LF & @LF & $zeile3 & @LF & @LF & $zeile4 & @LF & @LF & $zeile5, 5, 1)
$list = ProcessList()
For $i = 1 To $list[0][0]
Switch $list[$i][0]
Case "Winword.exe", "Outlook.exe", "Excel.exe", "Powerpnt.exe", "MSACCESS.EXE", "acrobat.exe", "AcroRd32.exe", "iexplore.exe", "MSPUB.EXE"
ToolTip($titel &", terminated process: " & $list[$i][0], 550, 0)
Sleep(1000)
RunWait(@ComSpec & ' /c taskkill.exe /F /IM ' & $list[$i][0], @WindowsDir, @SW_HIDE)
$iKill = $iKill + 1
Case "xy777z.exe" ; Zweite gruppe von Programmen die anders gekillt werden muss
; Anderer Kill Befehl hier einfügen
$iKill = $iKill + 1
EndSwitch
Next
Sleep(1000)
WEnd

Inhalt des Inifiles:

[Configuration] 
Titel=Adobe Migration is active 
Zeile1=Removing Adobe Standard and installing Adobe Professional 
Zeile2="Please do not start any programs until this message disappears." 
Zeile3="Please do not reboot your computer." 
Zeile4="The installation will take up to 60 minutes." 
Zeile5="Thank you very much!" 
[Prozesse] 
POWERPNT.exe=Microsoft Powerpoint 
winword.exe=Microsoft Word 
EXCEL.exe=Microsoft Excel 
Visio.EXE=Microsoft Visio 
OUTLOOK.exe=Microsoft Outlook 
iexplore.exe=Internet Explorer

Der Aufbau von [Prozesse] im Inifile ist notwendig, da ich vorgängig mit einer Messagebox die Benutzer auffordere, die Apllikationen zu schliessen ([ gelöst ] Offene Prozesse abfragen, MSGBox zum schliessen einblenden OK /Cancel - Errorlevel übergeben) -

Danke für deine erneute Hilfe!

Leider habe ich mich zu ungenau ausgedrückt :wacko:

Wir haben hier eine Software-Verteilung (Enteo Netinstall) - deren MsgBox Lösung so verbugt geworden ist, dass ich versuche einen Workarround zu basteln.

Die Softwareverteilung trennt die Pakete in einen

- Userteil (die Prozesse laufen im Syntax des eingeloggten Users)

- Maschinenteil (laufen unter dem Permission des NetinStall-Users mit lokalen Adminrechten)

Im Script eines Paketes kann ich angeben, welche EXE/Bat/MSI / Script Files - im Usercontest, und welche ausführbaren Dateien im Maschinencontext ausgeführt werden sollen.

Mein Ziel wäre jetzt - eine Exe zu bauen - die im (Maschinenteil) Usercontext des Netinstall-users (also als ein RunAs Prozess) gestartet wird - die mit dem eingeloggten User kommunizieren kann.

Dafür habe ich aus der Messagebox aus Thread 1 ein Service/Dienst gemacht - mithilfe von srvany.exe und installservice. Der Dienst ist so geflaggt, "interact with user" - dass ich durch das starten des Services erreichen kann - dass der User die MessageBox angezeigt bekommt - falls die abgefragten Prozesse offen sind.

Die Frage ist nun, wie die Main-Exe, die via runAs am laufen ist - und den Service gestartet hat - nun erfahren kann, ob

- Installiert werden kann, da keine der Prozesse laufen --> es darf installiert werden

- der User Cancel gedrückt hat, weil er gerade nicht installieren will --> es darf NICHT installiert werden

- der User die Prozesse geschlossen hat, und ok gedrückt hat --> es darf installiert werden

Wenn ich im RunAs Prozess, dh der Main.exe eine andere Exe starte mit einer Messagebox, wird diese ja dann dem RunAs User angezeigt, und nicht dem eingeloggten User. Daher der von mir gewählte weg via Dienst/Service.

Nur - wie erfährt nun die Main.exe - vie der User reagiert hat? Der Dienst beendet sich leider nicht von alleine, weil srvany das nicht checkt dass die Exe durchgelaufen ist. Andererseits könnte ich in der Messagebox.exe auch den eigenen laufenden Service beenden, falls die Antworten in Richtung "die Installation kann losgehen" deuten.

Mhh, ein neuer Ansatz - aber erstmal ruft das Wochenende!!!!

Hallo zusammen

Dank eurer Hilfe steht nun eine Abfrage, mit der ich in einem inifile die Programme übergeben kann, die der User zu schliessen hat - und er wird dazu via Messagebox aufgefordert.

Das klappt wunderbar unter Usercontext, aber die Software (MSI, Setup.exe) können nur via "Admin und run-as" im Usercontext installiert werden:

[ gelöst ] Offene Prozesse abfragen, MSGBox zum schliessen einblenden OK /Cancel - Errorlevel übergeben

Wie erreiche ich nun, dass auch die Softwareverteilung via ServiceAccount klappt - und der User die Messagebox angezeigt bekommt?

Wenn ich einen Dienst einrichte, mit srvany, type=interact - wird dem User ja die Messagebox angezeigt, wenn ich den Dienst aus einem anderen Usercontext heraus starte.

Nur: wie bekomme ich ein Feedback zurückgeliefert, ob der User alle Prozesse geschlossen hat, und die Mesagebox verschwunden ist - oder - ob der User cancel gedrückt hat?

Via Srvany verliere ich ja den Errorlevel - der ist nicht mehr abfragbar- in Context des Serviceaccounts.

Also kann ich noch einen Regkey schreiben, oder einen Wert in ein Inifile stellen - und mir eine Funktion schreiben ala "WaitUntilRegkeyExists" oder "WaitUntilINIsectionhasValue" - oder ein File erstellen.

Ich hoffe ihr habt ein paar zündende Ideen.

Ziel ist nicht eine Softwareverteilungslösung, sondern eine Lösung den User aufzufordern, laufende Programme zu schliessen, vor der Installation - dem User aber auch die Möglichkeit zu geben - die Installation via Cancel auf später zu veschieben..

Surfy

Noch eine letzte knacknuss:

Unsere Softwareverteilung installiert immer in einen Maschinenteil, und einem Userteil.

- Der Maschinenteil läuft unter einem speziellen User, welcher lokale Adminrechte besitzt.

- Der Userteil läuft unter dem jeweils eingeloggten User ab, mit den rechten des Users

ZB eine Setup.exe oder ein MSI wird unter den Maschinenteil abgearbeitet, der Userteil wird nur manchmal benötigt, um zB Files im Userprofile zu kopieren etc.

Unser Programm funktiniert nun 1a - im Usercontext. Das bekomme ich die Messagebox angezeigt, und den Errorlevel zurück.

Dh wenn ich jetzt nur noch Userbasiert, und mit Runas Scripten installieren würde, wäre die Lösung bereits fertig..

Jetzt kommt aber die Herausfoderung, dies auch im context des "Maschinenteil Users" dh aus einem anderen Usercontext heraus, mit dem User zu interagieren.

Das MesageBox Progamm als Service einrichten geht ja schnell - und das läuft auch mit srvany. Aber wie kann ich an den Errorlevel kommen?

Im Maschinenteil kann ich den Service starten, der unter Systemrechten mit "Interact with logged on User" auch die Messagebox bringt..

Nur - wie komme ich nun im Installtionscript des Maschinenteils an die notwendige info?

Ich könnte eine zweite Exe starten, im Maschinencontext, die den Service startet, und mit Processwaitclose wartet, bis meine MsGbox weg ist, und dann einen (vom MessageBox Programm) in die Registry geschriebenen Wert abfragt. Oder?

Ich hoffe ihr habt noch ein paar bessere Ideen

Herzlichen dank! Das funktioniert 1a - und ist genial!

Gibt es noch irgend einen Weg, um das X (Fenster schliessen) zu disablen? Oder reagiert das gleich wie "Cancel"?

Surfy

ahhm chip: wenn schon richtig lesen Mein Inifileansatz, den ich gepostet habe IST nooblike - im vergleich zu der Zeile von Misterspeed