super endlich klapt es ![]()
bin so glücklich ein riesen grosses danke schön ![]()
super endlich klapt es ![]()
bin so glücklich ein riesen grosses danke schön ![]()
ja weiss ich habe auch andere buttons mit ähnlichen verzeichniss aufruf
bloss jetzt will ich den Paramater im pfad mitten drin angeben
ich glau be es liegt ein syntax fehler vor
von mir kommt ja was habe aber bei errorlevel 0 immer einen fehler und kann nicht in label schreiben bei den anderen geht ???
kann mir jemand bei dem syntax fehler helfen?
danke
Case $Verbinden
$ping=Ping(GUICtrlRead($cnameinput))
If $ping=0 then
GuiCtrlSetData ($STATUS, "Host is online")
If @error=1 Then
GUICtrlSetData($STATUS, "Host is offline")
ElseIf @error=2 Then
GUICtrlSetData($STATUS, "Host is unreachable")
ElseIf @error=3 Then
GUICtrlSetData($STATUS, "Bad destination")
ElseIf @error=4 Then
GUICtrlSetData($STATUS, "Other errors")
EndIf
Else
immer noch falsch finde den fehler nicht
case $Notes
Run(@ComSpec & " /c " & "explorer.exe \\server\share\" & GUICtrlRead($input2) & "\Notes\Data\" , @SW_HIDE)
ich werde alle batchs umschreiben der letzte satz hat mich überzeugt ![]()
danke
delprof /i /p /c:\\%1 %1=hostname
remote eine bestimmtes profil löschen ohne einzeln zu bestätigen mit ja oder nein oder alle löschen zu müssen.
delprof ist ein bestandteil aus dem reskit
und die parameter für hostname und zu löschendes profil des user über eine gui mitgeben
ist das möglich?
würde gerne auch bei errorlevel 0 den label änder kann jemand helfen
danke
Select
Case $Verbinden
$ping=Ping(GUICtrlRead($cnameinput))
If $ping=0 then
If @error=1 Then
GUICtrlSetData($STATUS, "Host is offline")
ElseIf @error=2 Then
GUICtrlSetData($STATUS, "Host is unreachable")
ElseIf @error=3 Then
GUICtrlSetData($STATUS, "Bad destination")
ElseIf @error=4 Then
GUICtrlSetData($STATUS, "Other errors")
EndIf
Else
GUICtrlSetData($STATUS, "Online - Roundtrips: " & $ping)
$var=RegRead("\\" & GUICtrlRead($cnameinput) & "\HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\winlogon", "Defaultusername")
GUICtrlSetData($input2, $var)
EndIf
EndSelect
was ist an meiner syntax falsch ?
case $Notes
Run(@ComSpec & " /c " & "explorer.exe \\server\share\" & GUICtrlRead($input2) & "Lotus\Notes\Data\" , @SW_HIDE)
Funktioniert soweit aber bei errorlevel 0 würde ich gerne auch den label ändern
mit online leider ohne erfolg eine idee wie ich das machen sollte?
das geht schon mit delprof das ohne ps exec man entweder alles löschen oder bei jeden einzeln mit ja oder nein bestätigen ich wollte eben das einzelne bestätigen automatisieren eine Idee?
so sieht der aufruf in der batch aus der löscht und fragt einzeln ab idee?
ist eventuell delprof doch eine gute lösung ??
sollte man nur über gui angesprochen werden können also die parameter über gui übergeben
2 parameter
Host und user oder?
habe es jetzt selbst hinbekommen aber danke noch danke für di unterstützung stehe aber vor einem neuen problem
wenn ich den Ping mache und ich kein null level habe dann würde ich ein "goto" nutzen leider gibt es nicht also errolevel mitgeben label umbennen dann exit
wie mache ich das mit autoit
Case $Verbinden
;Vorherrige abfrage mit Ping online ist = 0
If Ping(GUICtrlRead($cnameinput))=0 then
GUICtrlSetData($STATUS, "Host is Online")
If @error=1 Then
GUICtrlSetData($STATUS, "Host is offline")
ElseIf @error=2 Then
GUICtrlSetData($STATUS, "Host is unreachable")
ElseIf @error=3 Then
GUICtrlSetData($STATUS, "Bad destination")
ElseIf @error=4 Then
GUICtrlSetData($STATUS, "Other errors")
EndIf
EndIf
$var = RegRead("\\" & GUICtrlRead($cnameinput) & "\HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\winlogon", "Defaultusername")
GUICtrlSetData($input2, $var)
EndSwitch
WEnd
hey,
gute idee soll remote ausgeführt werden ohne das jemand angemeldet ist
und wie stelle ich den label wert ein wenn der rechner Online ist also errorlevel 0 ist
If Ping(GUICtrlRead($cnameinput))=0 then
If @error=1 Then
GUICtrlSetData($STATUS, "Host is offline")
ElseIf @error=2 Then
GUICtrlSetData($STATUS, "Host is unreachable")
ElseIf @error=3 Then
GUICtrlSetData($STATUS, "Bad destination")
ElseIf @error=4 Then
GUICtrlSetData($STATUS, "Other errors")
EndIf
EndIf
hast recht aber ist ja nicht nur ein verzeichnis ist ja auch in registry was noch viel übrig bleibt SID usw.
standes du schonmal vor so einem problem?
hey wo ist bei mir der syntax fehler würde mich auch freuen wenn du mir erklärst was ich falsch gemacht habe
danke
If Ping( & GUICtrlRead($cnameinput), = 0 then
GUICtrlSetData($Label1, "FEHLER")
EndIf
Hallo,
wollte gerne eine batch dir ich gerne nutze in autoit einbauen mit der funtion das man den einzelnen Userprofil löscht nicht alle profiles die auf dem rechner sind
Delprof hat die eigenschaft alle profiles zu löschen oder einzeln zu fragen ich wollte gerne als parameter den PC namen mitgeben und den user dessen profil gelöscht werden soll
vielleicht hat jemand lust mit zu machen oder mir einen tip geben wie ich anfangen könnte wollte es von einer gui aus steuern also die Pramaeter übergeben falls jemand kein delprof hat steht im anhang zur verfügung
Falls dir frage auftretten sollte ja ich habe auf dem remote rechner die rechte
Danke
habe noch ein kleines Problem dann glabe ich das ich ohne weiteres etwas alleine machen kann"glaube ich "
zeile 93 - 103 ich mache ein Ping test soweit so gut würde aber gerne den label namen änder $status
Online oder Offline und die Farbe rot oder Grün ist das machbar ?
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <GuiIPAddress.au3>
#include <GUIListBox.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=d:\eyup\entwicklung\09-05-09.kxf
$Form1 = GUICreate("Helper", 884, 523, 204, 127)
GUISetIcon("D:\005.ico")
GUICtrlCreateTab(16, 48, 820, 432)
GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)
$Tabsheet1 = GUICtrlCreateTabItem("Remote")
$Verbinden = GUICtrlCreateButton("Verbinden", 736, 104, 97, 33, 0)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$STATUS = GUICtrlCreateButton("STATUS", 736, 72, 97, 33, 0)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlSetBkColor(-1, 0x00FF00)
$VNC = GUICtrlCreateButton("VNC", 736, 136, 99, 25, 0)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$RemoteAssitance = GUICtrlCreateButton("RemoteAssitance", 736, 160, 99, 25, 0)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$RDP = GUICtrlCreateButton("RDP", 736, 184, 97, 25, 0)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$C = GUICtrlCreateButton("C", 736, 208, 99, 25, 0)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button1 = GUICtrlCreateButton("Button1", 736, 232, 99, 25, 0)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$cnameinput = GUICtrlCreateInput("", 24, 98, 121, 22)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$macinput = GUICtrlCreateInput("", 184, -78, 129, 22)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Computername = GUICtrlCreateLabel("Computername", 184, -166, 96, 20)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
$IP = GUICtrlCreateLabel("IP", 184, -54, 12, 18)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$MAC = GUICtrlCreateLabel("MAC", 184, -94, 27, 18)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$userinput = GUICtrlCreateInput("", 184, -117, 121, 22)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Username = GUICtrlCreateLabel("Username", 184, -133, 53, 18)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$IPAddress1 = _GUICtrlIpAddress_Create($Form1, 184, -37, 122, 21)
_GUICtrlIpAddress_Set($IPAddress1, "0.0.0.0")
$Input1 = GUICtrlCreateInput("", 26, 175, 129,22 )
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Label1 = GUICtrlCreateLabel("Computername", 26, 79, 96, 20)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
$Label3 = GUICtrlCreateLabel("MAC", 26, 159, 27, 18)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Input2 = GUICtrlCreateInput("", 26, 136, 121, 22)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Label4 = GUICtrlCreateLabel("Username", 26, 120, 53, 18)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$RCMD = GUICtrlCreateButton("RCMD", 736, 256, 99, 25, 0)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$RemoteReg = GUICtrlCreateButton("RemoteReg", 736, 280, 99, 25, 0)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Admin = GUICtrlCreateTabItem("Admin")
$Rollout = GUICtrlCreateTabItem("Rollout")
$OnlineCheck = GUICtrlCreateTabItem("OnlineCheck")
$List1 = GUICtrlCreateList("", 32, 128, 121, 305)
$ListeLaden = GUICtrlCreateButton("ListeLaden", 32, 448, 123, 25, 0)
$Computerliste = GUICtrlCreateLabel("Computerliste", 32, 104, 67, 17)
$List2 = GUICtrlCreateList("", 168, 128, 121, 305)
$ExportOnline = GUICtrlCreateButton("ExportOnline", 168, 448, 123, 25, 0)
$Online = GUICtrlCreateLabel("Online", 168, 104, 34, 17)
$List3 = GUICtrlCreateList("", 304, 128, 121, 305)
$ExportOffline = GUICtrlCreateButton("ExportOffline", 304, 448, 123, 25, 0)
$Offline = GUICtrlCreateLabel("Offline", 304, 104, 34, 17)
$Check = GUICtrlCreateButton("Check", 32, 80, 123, 25, 0)
GUICtrlCreateTabItem("")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $VNC
Run(@ComSpec & " /c " & 'vnc\vncstart.bat ' & GUICtrlRead($cnameinput), "", @SW_HIDE)
case $c
Run(@ComSpec & " /c " & 'explorer\rmc.bat ' & GUICtrlRead($cnameinput), "", @SW_HIDE)
case $RemoteAssitance
Run(@ComSpec & " /c " & 'vnc\remass.bat ' & GUICtrlRead($cnameinput), "", @SW_HIDE)
case $RemoteReg
Run(@ComSpec & " /c " & 'remote\remoteregxp.exe ' & GUICtrlRead($cnameinput), "", @SW_HIDE)
case $ListeLaden
FileOpenDialog("Öffnen", "C:\", "Text Dateien (*.txt)| Excel (*.csv)| Text Dateien(*.txt)")
Case $Verbinden
;Vorherrige abfrage mit Ping online ist = 0
$var = Ping("" & GUICtrlRead($cnameinput) & "",250)
If $var Then ; also possible: If @error = 0 Then ...
Msgbox(0,"Status"," " & GUICtrlRead($cnameinput) & " ist Online " )
Else
Msgbox(0,"Status"," " & GUICtrlRead($cnameinput) & " ist Offline " )
EndIf
$var = RegRead("\\" & GUICtrlRead($cnameinput) & "\HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\winlogon", "Defaultusername")
GUICtrlSetData($input2, $var)
EndSwitch
WEnd
Danke für die schnelle antwort.
1 zu VNC da habe ich eine Lösung als batch mir zusammen gebaut wo ich hintenrum den vnc Server installiere und wenn ich mich trenne wieder denn Server deinstallieren funktionier mit host oder IP
2. Den verbinden Button soll mir wenn alles fertig ist sämtliche Daten ausliefern auch die MAC´s das brauche ich auch für den Support wenn ich mal eine Verbindung auf dem Switch suche geht leider nicht mit dem Hostname
kannst du mir dabei helfen?
die MAC in eine Inputbox zu schreiben?
also als Ergebnis nur die MAC´s nicht den Transportnamen würde mich über jede Unterstützung freuen will ja auch bei lernen brauche nur eine start Hilfe
00-1A-6B-D0-98-77
00-13-E8-B8-59-37
42-AE-90-C8-57-F6
00-50-56-C0-00-01
00-50-56-C0-00-08
Physikal. Adresse Transportname
=================== ==========================================================
00-1A-6B-D0-98-77 \Device\Tcpip_{4F7590E5-03B4-4CE4-8257-872B2CE23952}
00-13-E8-B8-59-37 Medien ausgeworfen
42-AE-90-C8-57-F6 \Device\Tcpip_{29131384-23C8-4B9B-A7CE-BBCB9F3A190D}
00-50-56-C0-00-01 \Device\Tcpip_{C94789A4-37BE-4EA5-BBD1-DC64B7164536}
00-50-56-C0-00-08 \Device\Tcpip_{CE9777B6-BBF7-434F-AA78-49D7FAFF5268}