danke und wuie löse ich die anderen zwei probleme?
Edit: sry die anderen zwei? ich meine das andere xD
danke und wuie löse ich die anderen zwei probleme?
Edit: sry die anderen zwei? ich meine das andere xD
Hi @ all,
ich schreibe gerade an einem Browser.
er hat ein startseiten ändern funktion
und eine proxy funktion.
jetzt soll er eine Lesezeichen funktion bekommen,
ich habe auch schon angefangen, das MenuItem wird erstelt nur:
1.verschwindet es nach neustart wieder
2.weis ich nicht wie ich jedem ein neue String gebe(z.B Wer-kennt-wen.de ist $Lesezeichen01 schuelervz.net ist $Lesezeichen02 usw.) und dem den befehl gebe zu der seite zu navigieren wo im input feld angegebn wurde
also:
Wie speichere ich die MenuItems ab und wie erstelle ich neue stirngs autom. die zu der angegebne seite navigieren?
MfG Roggazzz
achso ja der Script ausschnitt:
[autoit]Case $MenuItem5_1
$Lesezeichen=InputBox("Lesezeichen Hinzufügen", "Gib unten die page an die ins Lesezeichen hinzugefügt werden soll")
$Lesezeichen01=GUiCtrlCreateMenuItem($Lesezeichen,$MenuItem5)
Hi @ all,
ich hab in der Hilfe datei und im Forum nach CMD gesucht um herauszufinden ob es möglich ist aber ich fand nichts dazu(auch bei den UDF´s nicht).
ich will in einem Edit feld z.B "net user" eingeben und die antwort der CMD in einem
zweiten edit feld aufrufen. damit man sogesagt eine in AutoIT geschrieben CMD hat.
geht das, wen ja wie und kann mir jmd ein bsp. machen?
okay aber automatisiert wird ja nichts,
damit lieg ich doch garnicht so falsch oder?
das mit dem connecten und so wusste ich eben nicht
MfG Roggazzz
ctec:
er automatisiert nichts und schickt narichten nicht unerwünsht oft,
somit ist es nicht verboten.
Und schau dir mal Pidgin usw. an die haben auch ein ICQ Clienten in sich.
und wen du denkst es wäre automatiesierung wegen:
Global $myUser = "123456"
Global $myPass = "mypass"
Global $targetUser = ""
liegst du falsh da icq selbst und die anderen ausweichmöglichkeiten zu icq das auch anbieten.
wen ich falsch liege klärt mich bitte auf.
MfG Roggazzz
erstmal danke der text wird jetzt mit in die html geschreben nur wen ich Strinreplace verwende pasiert nichts, der datei name bleibt datei.txt.html
aber wen ich über den normalen editor eine datei in ne html mache ohne html befehle/tags
geht das doch auch? liegt es vllt. daran das Fileread die txt datei n9icht lesen kann?
Click Ctrl-C to copy. (hides when lost focus)
Hi @ all,
da ich nicht immer wen ich eine .txt in eine html. umwandeln will in den editor rein muss hab ich mir ein prog geschrieben das die .txt datei auswählt und sie mit dem selben namen im selben ordner(wie die .txt) speichert. Soweit so gut, meine datei speichert (auch im selben ordner:)) nur der inhalt der .html ist dann einfach nur "0" warum?
hier der Code:
[autoit]$File=FileOpenDialog("Öffnen...","","Text Datei (*.txt)")
$Text = GUICtrlRead($File)
FileWrite($File & ".html", $Text)
achso das ich es nicht vergesse, die datei speichert dann als Name.txt.html wie kann ich das verhidnern?
MfG Roggazzz
Click Ctrl-C to copy. (hides when lost focus)
ja ich hab gra dkeine zeit dich zu adden sry mach ich sofort
mein ich das nur oder gibts keinen downloadlink ich seh den nähmlich nicht.
MfG Roggazzz
okay werd ich machen und danke für die anzeige fehler behebung
wen ihr wollt hefle ich euch ich habe ein ProzessManager(zwar nich nicht ganz fertig aber zumidnest ein großteil) Gescriptet(mit hilfe von Kogoro und Greenhorn)
und könnte vorerst den Prozess part machen( bei bedarf kann ich auch eine prozessblocken funktion einbauen).
nur der prozess name also wen ich jetzt z.B
firefox.exe eingeben inden Input dann steht in der ini:
[Restart]
=firefox.exe
und firefox kann ich mit shellexecute sonst auch starten.
wen ich die ini lösche geht alles bis ich den prozessname bestätigt habe dann schreibt der entry in die ini und dann kommt die fehlermeldung
Hi @ all,
habe mit Kogoro(Ingamers.de)
für meinen ProzessManager versucht einen
ProzessRestarter zu bauen.
aber wen wir den Code mit Run verwenden:
Func Lauf()
$MarkProcess=IniReadSection("Daten.ini","Restart")
If Not @error Then
For $i = 1 to $MarkProcess[0][0]
If Not ProcessExists($MarkProcess[$i][0]) Then
Run($MarkProcess[$i][0])
Endif
Next
EndIf
EndFunc
dann startet das Programm sich ganz oft.
nehmen wir shellexecute:
[autoit]Func Lauf()
$MarkProcess=IniReadSection("Daten.ini","Restart")
If Not @error Then
For $i = 0 to $MarkProcess[0][0]
If Not ProcessExists($MarkProcess[$i][0]) Then
ShellExecute($MarkProcess[$i][0])
If @error Then MsgBox(0,"","1")
Endif
Next
EndIf
EndFunc
gibt es folgenden fehler:
[Blockierte Grafik: http://img36.imageshack.us/img36/8219/fehlery.png] es muss an der .ini liegen
MfG Roggazzz
oh ja sry ich stell gleich die .au3 rein
Hi @ all,
Habe soeben beschlossen ich veröffentliche
meinen ProzessManager .
Er kann:
Bekannte Bugs:
Behobene Bugs:
Credits gehen dabei an:
Neue Funktionen kommen dabei immer hinzu.
MfG Roggazzz
das mit Msg Box und Process Close is mir klar aber
was soll ich bei ProzessClose eingeben bzw. was soll es schließen?
und die updatefunktion geht auch nachdem ich das eingefügt hab nicht.
hi @ all
habe wieder ne frage:
Ich habe von Greenhorn meinen Code angepasst bekommen das er alle Prozesse die
aktiv sind in einer ListView angezeigt werden.
Jetzt versuche ich wen mann auf den Button "Prozess Schließen" klickt
das der ausgewählte Prozess in der ListView sich schließt.
und wäre es möglich eine MSGBox zu öffnen die nachfrägt ob man den Prozess wirklich
schließen will vorher anzeigt?
MfG Roggazzz
P.S: Hier der Code:
[autoit]#include <WindowsConstants.au3>
#include <GUIConstantsEx.au3>
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <StaticConstants.au3>
#include <ListViewConstants.au3>
Global $aProcessList
; $aidLVItems enthält die IDs der Elemente des Listenansicht-Steuerelements.
Global $aidLVItems [1] = [0] ; erstem Element Null zuweisen
Global $drive,$dir,$fname,$ext, $lID
$hWnd = GUICreate ("RogProgs TaskManager", _
350, 460, -1, -1, _
$WS_OVERLAPPEDWINDOW, _
$WS_EX_CLIENTEDGE)
$idButton1 = GUICtrlCreateButton ("Prozess &Starten", 168, 0, 121, 25, 0)
$idButton2 = GUICtrlCreateButton ("Prozess Be&enden", 16, 416, 113, 25, 0)
$idInput1 = GUICtrlCreateInput ("Prozess Name", 24, 8, 121, 21)
$idLabel1 = GUICtrlCreateLabel ("Offene Prozesse:", 32, 32, 85, 17)
$idUhrzeit = GUICtrlCreateLabel ("Uhrzeit", 240, 424, 37, 17)
$ID_LISTVIEW = GUICtrlCreateListView ("Prozessname|PID", 0, 50, 350, 350)
[/autoit][autoit][/autoit][autoit]If (Not UpdateProcessList ($aProcessList, $ID_LISTVIEW, $aidLVItems)) Then
MsgBox (266256, "Fehler", "Es konnten keine Prozesse aufgelistet werden!")
EndIf
GUISetState (@SW_SHOW, $hWnd)
[/autoit][autoit][/autoit][autoit]While True
Switch GUIGetMsg ( )
Case $GUI_EVENT_CLOSE
Exit
Case $idButton1
ShellExecute(GuiCtrlread($idInput1))
EndSwitch
WEnd
; UpdateProcessList (ByRef $aProcesses, $idListView, $aidLVItems)
; Diese Funktion aktualisiert die Listenansicht.
; Rückgabe: True bei Erfolg, sonst False.
; [in/out]$aProcesses - Arrayvariable in der die Prozessliste gespeichert werden soll
; [in] $idListView - Identifizierer des Listenansicht-Steuerelements
; [in] $aidLVItems - Arrayvariable, welche die Elemente der Listenansicht enthält
Func UpdateProcessList (ByRef $aProcesses, $idListView, ByRef $aidLVItems)
$aProcesses = ProcessList ( )
If (Not IsArray ($aProcesses)) Then _
Return False ; Fehler
;-- Wenn weniger Elemente in der Listenansicht, als Prozesse ...
If ($aidLVItems[0] < $aProcesses[0][0]) Then
; Array vergrößern.
ReDim $aidLVItems [$aProcesses[0][0] + 1]
;- Wenn aidLVItems[0] ungleich Null ...
If ($aidLVItems[0]) Then
; Existierende Elemente in der Listenansicht aktualisieren
For $i = 1 To $aidLVItems[0]
GUICtrlSetData ($aidLVItems[$i], $aProcesses[$i][0] & "|" & $aProcesses[$i][1])
Next
; Neue Elemente in der Listenansicht erzeugen
For $i = $aidLVItems[0] + 1 To $aProcesses[0][0]
$aidLVItems[$i] = GUICtrlCreateListViewItem ($aProcesses[$i][0] & _ ; Prozessname
"|" & _
$aProcesses[$i][1], _ ; PID
$idListView)
Next
;- aidLVItems[0] gleich Null ...
Else
; Ein Element/Prozess in der Listenansicht erzeugen.
For $i = 1 To $aProcesses[0][0]
$aidLVItems[$i] = GUICtrlCreateListViewItem ($aProcesses[$i][0] & _ ; Prozessname
"|" & _
$aProcesses[$i][1], _ ; PID
$idListView)
Next
EndIf
$aidLVItems[0] = $aProcesses[0][0]
;-- Wenn mehr Elemente in der Listenansicht, als Prozesse ...
ElseIf ($aidLVItems[0] > $aProcesses[0][0]) Then
; Existierende Elemente in der Listenansicht aktualisieren
For $i = 1 To $aidLVItems[0]
If ($i <= $aProcesses[0][0]) Then
GUICtrlSetData ($aidLVItems[$i], $aProcesses[$i][0] & "|" & $aProcesses[$i][1])
Else
GUICtrlDelete ($aidLVItems[$i])
EndIf
Next
; Array verkleinern.
ReDim $aidLVItems [$aProcesses[0][0] + 1]
EndIf
Return True ; Erfolg
EndFunc
;
Hi,
kann mir wer von euch sagen wie ich NUR die Prozesse in eine ListBox einbaue hab schon ein bisschen rumprobiert finde aber nichts
MfG Roggazzz