Hallo JanausSm,
schau dir mal diesen Thread ab hier bis zum Ende an, könnte dich vielleicht auf die Lösung bringen. Übrigens wenn du schon ein Skript einstellst, was sehr lobenswert ist, sollte es auch laufen, das zeigt mir und anderen nämlich, das du es noch nicht einmal getestet hast. Falls das der gesuchte Fehler ist einfach die entsprechenden Includes einfügen,
mfg (Auto)Bert
Hallo Oscar ,
kannst du einen Link posten, der bei dir funktioniert, würde den Spoiler-Reader gerne bei mir zum laufen bringen. Aber wie gesagt ich denke es hängt mit PCTools zusammen, es müsste mich zumindest beim aller ersten Versuch des Spoilerreaders eine Internetverbindung aufzubauen bei mir nachfragen, ob ich dies global oder nur für diese Sitzung zulassen möchte, könnte auch meine sehr schmale Bandbreite sein Mobil mit EDGE und im Hintergrund läuft ein Download von Windows 7. Wenn dieser fertg ist, möchte ich mal ausführlicher testen,
mfg (Auto)Bert
Hallo subzero007,
Alina hat dir ja schon die Stichwörter zum aufrufen gegeben, eine Gui erstellen ist auch nicht schwer, denke das schaffst du alleine mit Stichwörtern wie ListView (um alle Benutzer aufzunehmen) GuiCtrlRead, aber wie man mit einer Listview umgeht, gibts genügend Beispiele im Forum. Mit ReagRead und Verkettung von Strings kennst du dich ja spätestens seit heute morgen aus, wenn du weist wie du an die Usernamen kommst (ich hab's schon wieder ver[gessen] [legt] Also kein unlösbares Problem, aber immer dran denken Rom wurde auch nicht an einem Tag erbaut.
Alina, man hat der ein Tempo drauf, und mir wolltest du schon das Gaspedal kürzen (zufällig in Shoutbox gelesen), kann dich aber beruhigen, hab real noch nie 300 erreicht
Edit1: Alina zurück'Shout'en funktioniert bei mir ganz selten, also wunder dich nicht wenn ich mich dort selten zu Wort melde
Edit2: subzero007 hier noch ein Link auf ein allgemeines Listview-Beispiel. Lesen und schreiben in Txt IST Darin enthalten,
mfg (Auto)Bert
Hallo Hundi,
ich könnte mir vorstellen, dass der Server eine gewisse Zeit verstreichen lässt, bis er wieder eine Anfrage von dir zulässt. Gibt _FtpPut den keinen @error zurück, damit du mehr Infos über den Fehler bekommst,
mfg (Auto)Bert
Hallo funkey,
z.B hier, https://autoit.de/index.php?page…93802#post93802, der Permlink landet ja in der Zwischenablage, sonst hätte ich ihn ja nicht hier einfügen können. Denke eher es hat etwas mit PCTools zu tun, obwohl dieses hat mir auch keinerlei Fragen gestellt ob ich bestimmte Aktionen deines Skriptes zulassen möchte 
,
mfg (Auto)Bert
Hallo Ragefire,
du könntest ja versuchen, den Server deiner Firma anzupingen, so weist du schon mal ob du in der Firma bist. Wenn du nicht dort bist switched du auf einfach auf Zuhause. Falls du dort nicht bist must du über eine @error Abfrage eine MsgBox ausgeben "Ja, wo bin ich den eigentlich" 
mfg (Auto)Bert
Hallo und danke für eure Antworten,
hatte den Thread schon vergessen
Schnuffel, das war ja der Auslöser zu diesem Thread, bin auf einmal mit unbekannten Fenstern überschwemmt worden
@progandy, danke für das Skript (von mir ProcessLister getauft)
Xenobiologist , die Idee ist gut, ich würde allerdings die Dateien zu VirusTotal.com einschicken, hat nur ein Problem da ich mit Web'N'Walk und auch nur mit EDGE (üblicherweise 16KB/s down und 2KB/s up) ins Internet gehe, könnte das austesten so eines Skriptes Tage dauern
Im Zusammenhang mit meiner mageren Leitung, muss ich hier auch einmal dieses Board loben, trotz der mageren Leitung hab ich einen sehr flotten Seitenaufbau und das obwohl ich meinen IE-Cache regelmäßig cleane,
mfg (Auto)Bert
Hallo sam ghost,
ich habe auch noch nicht verstanden was du erreichen wilst,
@ScriptDir liefert mir alles: \\servername.schlagmichtot.net\erster_ordner\zweiter_ordner\freigabe_share\noch_ein_ordner\und_noch_einer\hier_liegt_
suchst du vielleicht nur das:
_Net_Share_ConnectionEnum
--------------------------------------------------------------------------------Listet alle zu einer freigegebenen Ressource gemachten Verbindungen auf
#Include <NetShare.au3>
_Net_Share_ConnectionEnum($sServer, $sQualifier)
Parameter
$sServer String, der den DNS- oder NetBIOS-Namen des Remote Servers angibt, auf dem die Funktion ausgeführt werden soll. Wenn dieser Parameter leer bleibt, wird der lokale Computer verwendet.
$sQualifier Gibt den interessierenden Freigabe- oder Computernamen an. Ist es ein Freigabename, werden alle zu dieser Freigabe gemachten Verbindungen aufgelistet. Ist es ein Computername, listet die Funktion alle von diesem Computer zu dem angegebenen Server gemachten Verbindungen auf.
mfg (Auto)Bert
Hallo @ChaosKeks,
danke für das Lob, aber (siehe auch #3) von riki wär es mir liebe, da er ja ganz genau wissen muss, was er den wollte (siehe hierzu auch http://www.youtube.com/watch?v=9eHd2hFRTkw),
mfg (Auto)Bert
Hallo BugFix,
schön dass du so schnell korrigiert hast. Weil ich mir nicht sicher war hab ich nach Klartext eingabe gefragt (warscheins wär subzero007 allein dadurch schon auf die Lösung gekommen), sorry aber meine letzte Schulungen im Netzwerkbereich sind schon über 6 Jahre her,
Alina, mach dir nichts draus. Mich wundert es allerdings wie ich mit gefühlten 2 KB/s Upload und 4 KB/s Download, (der Rest der insges. 16 KB/s down geht im Moment für Windows 7 Download drauf), dich überholen konnte,
mfg (Auto)Bert
Hallo subzero007,
Schreib mal im Klartext wie du es in RegEdit oder ähnlichen Tools eingeben würdest, ich glaube dass es
[autoit]$var = RegRead("\\" & GUICtrlRead($cnameinput) &",\HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\winlogon", "Defaultusername")
[/autoit]heissen müsste, bin mir aber nicht sicher deshalb bitte mal die Klartext (Handeingabe Regedit),
mfg (Auto)Bert
Hallo jimewlad,
wenn du unter Platzhalter * und ? meinst, nein benötigt man auch nicht, dann lässt man bei * alles danach bei der Angabe des substrings weg, bei ? müsste man evtl mehrere StringInStr-Prüfungen nacheinander durchführen. Wenn du ein Beispiel machst, in dem angibst was du hast und wie das Ergebnis sein soll z.B.: String = xyzblaundbla --> Ergebnis soll yzblaund sein, findet sich sicher eine Lösung,
mfg (Auto)Bert
Hallo Bubelbub,
Hallo Bubelbub,
wenn du Included Files verwendest, musst du dich an denjenigen wenden, der es erstellt hat. In den Standard Included ist der Fehler jedenfalls nicht,
damit hab ich dir nur mit geteilt, dass hier
#include <file.au3>
#include <array.au3>
#include <String.au3>
#include <GuiConstantsEX.au3>
#include <Staticconstants.au3>
der Fehler nicht liegt.
oder bemühst Tante Google erzählst ihr was du vorhast, vielleicht erzählt sie dir ja was,
das heisst in einer sehr freundlichen Umschreibung, dass ich nicht bereit bin dir bei deinem BOT zu helfen, kann mir aber durchaus vorstellen, dass es andere Foren gibt, wo man so etwas tut, du musst nur danach googlen,
lies bevor du es hier weiter mit BOT Fragen versuchst noch die Forenregeln durch, wenn du dich daran halten willst bist du hier herzlich willkommen,
mfg (Auto)Bert
Hallo h0scHberT,
ein Listview dürfte zwar am einfachsten sein, wenn du jedoch größeren Wert auf die Darstellungsmöglichkeiten legst, solltest du mit dem Gedanken spielen eigene Eingabeguis zu entwerfen und diese dann in einem 2-dimensionalen Array darzustellen Anzahl der Terminmöglichkeiten pro Tag mal Arbeitswoche oder gar in einem 3 dimensionalen wenn alle Mitarbeiter gleichzeitig neben oder untereinander angezeigt werden sollen. Ein Listview-Steuerelement ist im Prinzip schon ein 2-dimensionales Array, wenn dir einfache Ansichten genügen solltest du das relativ schnell lösen können, du beschäftigst dich ja schon länger mit AutoIT. Interesanter wäre es zu wissen ob die Struktur der Datenbank schon steht,
mfg (Auto)Bert
Hallo riki,
hier die (vorläufig) abschliesende Version von meiner Interpretation des Begriffes TreeView Transparent. Das TreeView-Steuerelement hat keinen schwarzen Hintergrund, das Bild ist immer zu sehen, also Thema gelöst?
ScreenShot:
Source-Zip:Edit1: in Anhang verschoben
Okay, so ist besser, ich habe den Falschen Style genommen, ich habe es mit $SW_CHILD probiert
dieses Ergebnis würde ich gerne sehen, da in der vorhergehenden die Beschriftung im TreeView-Steuerelement nicht zu lesen war, genauso wie bei @ChaosKeks der nur dafür gesorgt hat, dass WM_Move weggelassen werden kann.
@riki, wenn sich schon 3 Leute für dich ins Zeug legen (mit 2 stark unterschiedlichen Interpretationen des Wortes Transparent), könntest du wenigestens einmal Bescheid geben, ob du es selber gelöst hast oder auf welcher Version du weitermachen möchtest,
mfg (Auto)Bert
Hallo ChaosKeks,
in deinem Beitrag von 23:11 ist mir folgendes aufgefallen
Example1:
Func Example1()
$MainGui= GUICreate("Macromat", 147, 123,-1,-1, $WS_POPUP)
$but=GUICtrlCreateButton("MsgBox",1,1)
GuiCtrlSetOnEvent(-1,"msgFunc")
Example2:
Func Example2()
$MainGui= GUICreate("Macromat", 147, 123,-1,-1, $WS_POPUP)
Local $Col = PixelGetColor(55,200)
$but=GUICtrlCreateButton("MsgBox",1,1)
GuiSetBkColor(0x000000)
funktioniert bei mir zwar trotzdem nicht (graues Bild), aber vielleicht meint es die AutoIT-Fee ja diesmal gut mit dir,
Edit: Ich habe hier in dein Example2 Teile von Progandy's Post eingesetzt. Obwohl ich ausser dem fehlenden Aufruf für msgFunc keinen Unterschied sehen (finden) kann, klappt es auch damit bei mir in beiden Examples:
#include <GUIConstants.au3>
#include <WindowsConstants.au3>
#include <winapi.au3>
Example1()
Example2()
Func Example1()
$MainGui= GUICreate("Macromat", 147, 123,-1,-1, $WS_POPUP)
$but=GUICtrlCreateButton("MsgBox",1,1)
GuiCtrlSetOnEvent(-1,"msgFunc")
GUISetBkColor(0x000000)
GuiCtrlCreateLabel("Color defined!",40,40)
GuiCtrlSetColor(-1,0xABCDEF)
GuiCtrlCreateLabel("Ohne Rand",44,82)
GuiCtrlSetColor(-1,0xABCDEF)
$BodyGui= GUICreate("BodyGui", 147, 123,-3, -3, $WS_POPUP, BitOR($WS_EX_CONTROLPARENT, $WS_EX_MDICHILD,$WS_EX_LAYERED), $MainGui)
$Ex_Button = GUICtrlCreateButton("Exit", 22, 55, 100, 25)
Local $Col = 0xdb7093
GUISetBkColor($Col)
_WinAPI_SetLayeredWindowAttributes($BodyGui,$Col,255,0x01)
GUISetState(@SW_SHOW, $MainGui)
GUISetState(@SW_SHOW, $BodyGui)
While 1
$msg = GuiGetMsg()
If $msg = $Ex_Button Then
GuiDelete($MainGui)
ExitLoop
ElseIf $msg = $but Then
msgFunc()
EndIf
sleep(10)
WEnd
EndFunc
Func Example2()
$MainGui= GUICreate("Macromat", 147, 123,-1,-1, $WS_POPUP) ;<------------------------- von hier
GUICtrlCreatePic(RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\AutoIt v3\AutoIt", "InstallDir") & "\Examples\GUI\logo4.gif",0,0,147,123,0)
GUISetBkColor(0x000000)
$but=GUICtrlCreateButton("MsgBox",1,1) ;<-----Zusatz
$BodyGui= GUICreate("BodyGui", 147, 123,-3, -3, $WS_POPUP, BitOR($WS_EX_CONTROLPARENT, $WS_EX_MDICHILD,$WS_EX_LAYERED), $MainGui)
$Ex_Button = GUICtrlCreateButton("Exit", 22, 55, 100, 25)
GuiCtrlSetOnEvent(-1, "Terminate")
Local $Col = 0xdb7093
GUISetBkColor($Col)
_WinAPI_SetLayeredWindowAttributes($BodyGui,$Col,255,0x01)
GUISetState(@SW_SHOW, $MainGui)
GUISetState(@SW_SHOW, $BodyGui) ;<--------------------------bis hier fast alles aus Progandy Post
While 1 ;<--------------------------------- ab hier alles aus deinem Post
$msg = GuiGetMsg()
If $msg = $Ex_Button Then
GuiDelete($MainGui)
ExitLoop
ElseIf $msg = $but Then
msgFunc()
EndIf
sleep(10)
WEnd
EndFunc
Func _WinAPI_SetLayeredWindowAttributes($hwnd, $i_transcolor, $Transparency = 255, $dwFlages = 0x03, $isColorRef = False)
; progandy
If $dwFlages = Default Or $dwFlages = "" Or $dwFlages < 0 Then $dwFlages = 0x03
If Not $isColorRef Then
$i_transcolor = Hex(String($i_transcolor), 6)
$i_transcolor = Execute('0x00' & StringMid($i_transcolor, 5, 2) & StringMid($i_transcolor, 3, 2) & StringMid($i_transcolor, 1, 2))
EndIf
Local $Ret = DllCall("user32.dll", "int", "SetLayeredWindowAttributes", "hwnd", $hwnd, "long", $i_transcolor, "byte", $Transparency, "long", $dwFlages)
Select
Case @error
Return SetError(@error, 0, 0)
Case $Ret[0] = 0
Return SetError(4, _WinAPI_GetLastError(), 0)
Case Else
Return 1
EndSelect
EndFunc ;==>_WinAPI_SetLayeredWindowAttributes
Func msgFunc()
MsgBox(0,"","")
EndFunc
Func Terminate()
Exit
EndFunc
Wird wohl Zeit, dass ich wieder eimal den Augebarzt aufsuche (oder besser: vernünftigen Monitor kaufe)
mfg (Auto)Bert
Hallo ChaosKeks,
hast du das Beispiel aus meinem Post genommen, oder deines angepasst?
mfg (Auto)Bert
Hallo ChaosKeks,
ich hab mal Progandys Beispiel genommen und MsgFunc von dir eingebaut, da klappt das durchklicken wunderbar (hatte ich auch noch nicht gesehen)
#include <GUIConstants.au3>
#include <WindowsConstants.au3>
#include <winapi.au3>
Opt("GuiOnEventMode",1)
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]$MainGui= GUICreate("Macromat", 147, 123,-1,-1, $WS_POPUP)
GUICtrlCreatePic(RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\AutoIt v3\AutoIt", "InstallDir") & "\Examples\GUI\logo4.gif",0,0,147,123,0)
$but=GUICtrlCreateButton("MsgBox",1,1)
GuiCtrlSetOnEvent(-1, "MsgFunc")
GUISetBkColor(0x000000)
$BodyGui= GUICreate("BodyGui", 147, 123,-3, -3, $WS_POPUP, BitOR($WS_EX_CONTROLPARENT, $WS_EX_MDICHILD,$WS_EX_LAYERED), $MainGui)
$Ex_Button = GUICtrlCreateButton("Exit", 22, 55, 100, 25)
GuiCtrlSetOnEvent(-1, "Terminate")
Local $Col = 0xdb7093
GUISetBkColor($Col)
_WinAPI_SetLayeredWindowAttributes($BodyGui,$Col,255,0x01)
GUISetState(@SW_SHOW, $MainGui)
GUISetState(@SW_SHOW, $BodyGui)
While 1
sleep(100)
WEnd
Func _WinAPI_SetLayeredWindowAttributes($hwnd, $i_transcolor, $Transparency = 255, $dwFlages = 0x03, $isColorRef = False)
; progandy
If $dwFlages = Default Or $dwFlages = "" Or $dwFlages < 0 Then $dwFlages = 0x03
If Not $isColorRef Then
$i_transcolor = Hex(String($i_transcolor), 6)
$i_transcolor = Execute('0x00' & StringMid($i_transcolor, 5, 2) & StringMid($i_transcolor, 3, 2) & StringMid($i_transcolor, 1, 2))
EndIf
Local $Ret = DllCall("user32.dll", "int", "SetLayeredWindowAttributes", "hwnd", $hwnd, "long", $i_transcolor, "byte", $Transparency, "long", $dwFlages)
Select
Case @error
Return SetError(@error, 0, 0)
Case $Ret[0] = 0
Return SetError(4, _WinAPI_GetLastError(), 0)
Case Else
Return 1
EndSelect
EndFunc ;==>_WinAPI_SetLayeredWindowAttributes
Func Terminate()
Exit
EndFunc
Func msgFunc()
MsgBox(0,"","")
EndFunc
Damit könnte man sicher auch das TreeView-Problem von Samstag und gestern lösen,
mfg (Auto)Bert
Hallo xXTobi93Xx,
mir sind folgende Fehler aufgefallen:
(in der Reihenfolge gelistet was mich am meisten stört)
Wenn man einen Text geschrieben hat und eine andere Datei öffnen will, solltest du eine Abfrage hin machen, ob man den erstellten Text vorher speichern will (Ja|Nein|abbrechen).
Das Skript ist leider sehr schwer zu lesen, da du alles linksbündig geschrieben hast.
Sieh alles nur als Anregung und Verbesserungsvorschläge an,
mfg (Auto)Bert
Hallo funkey,
bei mir klappt's leider auch nicht. Ich benutze den IE7 Version 7.0.5730:13, allerdings nutze ich hier auch Tabs, damit funktioniert es defintiv nicht, auch wenn ich nur einen Tab offen habe, wenn ich Shift-Einfg drücke kommt aber auch nur der Link. Alles mit offenem Spoiler und geschlossen Spoiler getestet, nutze weiter die alte Version,
mfg (Auto)Bert
