hehe auch das kannte ich noch nicht
Beiträge von Ram3000
-
-
wow cool danke !
ich werde mir das mal ansehen und mal etwas damit rumspielen, ich muss es ja noch weiterverarbeiten...
ja das dauert wirklich etwas länger, aber es ist besser als alles andere was ich geschafft hatte.
ich werde das hoffentlich nicht öfters machen müssen und das ist dann auch mein nächster schrift:
ich möchte dann ja die liste genauso speichern und als kleinere Liste mit "ID | NAME".
Also 2 knöpfe zum speichern als zB .txt und das ding ist fast fertig
die daten werden leider so angelegt bzw sind vom original so schlimm...mich nerven diese daten auch...
DANKE!
-
Hallo, nein das ist nicht für ein Bot.
Ich möchte die Liste mit dem Programm erstellen um zu prüfen ob Daten fehlen und sie dann für ein GM-Tool exportieren.
Für das GM-Tool brauche ich dann nur die ID und den Namen (ID|NAME).
Könntest Du mir evtl helfen, ich komme echt nicht weiter und ich bin auch noch nicht so fit in AutoIt...
Das mit den Dateianhängen wusste ich nicht...sorry.
-
Hallo Leute und Profis
Ich versuche schon seit längerem ein kleines Tool zu schreiben, wo ich Daten aus 3 Dateien einlesen und zuordnen möchte.Leider bin ich wohl zu blöd dazu und ich schaffe es einfach nicht.....voll das Brett vor dem Kopf.
Ich würde mich echt freuen, wenn mir einer dabei helfen könnte.
Vielen dank !
Hier sind auch noch die entsprechenden Dateien die man benötigt:
Hier mal ein Screen, wie das zusammenhängt:
Code
Alles anzeigen#include <GUIListView.au3> Opt("GUIOnEventMode", 1) $hGUI=GUICreate("Item-Lister", 900, 800) $hList = GUICtrlCreateListView("Item Code|DEFINE|Item Name|Item Text", 20, 20, 860, 650) _GUICtrlListView_SetColumn($hList, 0, 'ITEM-ID', 60, 0) _GUICtrlListView_SetColumn($hList, 1, 'Itenname', 240, 0) _GUICtrlListView_SetColumn($hList, 2, 'Itenbeschreibung', 356, 0) _GUICtrlListView_SetColumn($hList, 3, 'Define', 180, 0) GUISetOnEvent(-3, "close") GUISetState() $button01 = GUICtrlCreateButton ("OPTIONS", 20, 680, 200, 50) $button02 = GUICtrlCreateButton ("LOAD V16", 230, 680, 200, 50) $button03 = GUICtrlCreateButton ("LOAD V19", 470, 680, 200, 50) $button04 = GUICtrlCreateButton ("Export the List (ID | NAME)", 680, 680, 200, 50) $itemnames = propitemget_itemname("propItem.txt.txt") $itemverweise = propitemget_itemverweis("propItem.txt.txt") $define = propitemget_itemdefine("propItem.txt", $itemverweise) $itemcode = propitemget_itemcode("defineItem.h",$itemverweise) If IsArray($itemnames) Then For $x = 0 To UBound($itemnames) - 1 getcode() if $x < 10 Then GUICtrlCreateListViewItem($itemcode &"|"& $itemnames[$x] &"|"& $itemverweise[$x] &"|"& $define[$x], $hList) Else EndIf Next Else EndIf While GUIGetMsg() <> -3 WEnd Func propitemget_itemname($propitempath) Return StringRegExp(FileRead($propitempath), "IDS_PROPITEM_TXT_\w*\s([\w ()äÄöÖüÜ.]*)", 3) EndFunc ;==>propitemget_itemname Func propitemget_itemverweis($propitempath) Return StringRegExp(FileRead($propitempath), "(IDS_PROPITEM_TXT_\w*)\s[\w ()äÄöÖüÜ.]*", 3) EndFunc Func propitemget_itemdefine($propitempath, $itemverweis) Return StringRegExp(FileRead($propitempath), "(II_[\w_]*)\s" & $itemverweis, 3) EndFunc Func propitemget_itemcode($propitempath, $define) ;Return StringRegExp(FileRead($propitempath), "(II_[\w_]*)\s" & $itemcode, 3) EndFunc Func getcode() $codeid=propitemget_itemcode("defineItem.h", $define) $definecode=propitemget_itemdefine("propItem.txt", $codeid) $itemcode=$definecode EndFunc Func test() $ids=_GUICtrlListView_GetItemTextArray(GUICtrlGetHandle($hList), ControlListView("Test", "", "", "GetSelected")) $define=propitemget_itemdefine("propItem.txt", $ids[3]) $Z=$define[0] EndFunc Func close() Exit EndFunc ;==>close
-
ich habe mir das mal alles etwas angeguckt und habe es versucht.
Den String übergebe ich innerhalb meines Hauptprogramms, der ist jetzt nur zum testen da so drin.
Das Programm läuft und erledigt das was es soll.
Könnte sich das einer bitte Angucken, ob ich das so richtig gemacht habe?
Danle.
C
Alles anzeigen#include <_sql.au3> #include <array.au3> _SQL_RegisterErrorHandler();register the error handler to prevent hard crash on COM error $oADODB = _SQL_Startup() If $oADODB = $SQL_ERROR then Msgbox(0 + 16 +262144,"Error",_SQL_GetErrMsg()) If _sql_Connect(-1,"COMPUTER-PC\SQLEXPRESS","","","") = $SQL_ERROR then Msgbox(0 + 16 +262144,"Error",_SQL_GetErrMsg()) _SQL_Close() Exit EndIf _SQLupdate() ;=== SQL UPDATE ============================= Func _SQLupdate() $UpdateQuery = "UPDATE [ACCOUNT_TBL_DETAIL] set m_chLoginAuthority ='Z' where account ='test'"; $oADODB = _SQL_Startup() If _SQL_Connect(-1,"COMPUTER-PC\SQLEXPRESS","ACCOUNT_DBF","","") = $SQL_ERROR then Msgbox(0 + 16 +262144,"Error",_SQL_GetErrMsg()) ;If _SQL_Execute(-1,"UPDATE [ACCOUNT_TBL_DETAIL] set m_chLoginAuthority ='Z' where account ='test' and serverindex='01'") = $SQL_ERROR then Msgbox(0 + 16 +262144,"Error",_SQL_GetErrMsg()) If _SQL_Execute(-1,$UpdateQuery) = $SQL_ERROR then Msgbox(0 + 16 +262144,"Error",_SQL_GetErrMsg());UPDATE SQL QUERY-STRING Msgbox($MB_ICONINFORMATION ,"Info","Update OK") _SQL_Close() EndFunc ;=== SQL UPDATE =============================
-
Hallo Leute,
ich habe leider keine Erfahrung mit AutoIt und SQL.
Jetzt habe ich ein kleines Programm geschrieben und möchte die dort erstellten SQL Querys in die Datenbank schreiben.
In dem Programm habe ich ein paar kleine Tools, wo ich zB einem User bestimmte Rechte geben kann, man gibt den Usernamen und die Rechte ein und bekommt das dann als Query ausgegeben. Dann kann man zZ es über das SQL Server 2014 Management Studio als neuen Query ausführen.
Ich möchte aber das das ganze nun über das Tool gemacht wird, das ist dann doch etwas einfacher.
Wenn mir einer dabei helfen könnte, würde ich mich echt freuen, denn ich komme echt nicht weiter...obwohl ich schon viel hier gelesen habe
Ich möchte gerne wissen, wie ich zum SQL Server verbinden kann und wie ich dann meine Querys dann in die Datenbank schreiben kann.
Vielen dank schon einmal
-
Hallo Leute,
ich brauche wirklich mal etwas Hilfe von Euch.
Ich bin ein Neueinsteiger in Auto-It und versuche mich grade.Mein Problem:
Ich möchte eine txt Datei einlesen und verarbeiten
Die Textdatei sieht so aus:(ID,Kategorie,Soundfile1,Titel,Soundfile2,Zusatztext,Schalter(An/Aus))
0001;Musik;Sound10.mp3;Die Blechtrommel;Sound11.mp3;Text;1
0002;Kultur;Sound20.mp3;Das Haus;Sound21.mp3;Text;0
0003;Kampf;Sound30.mp3;Der Ritter;Sound31.mp3;Text;1
0004;Weltall;Sound40.mp3;Die Sonne;Sound41.mp3;Text;0
0005;Technik;Sound50.mp3;Der Motor;Sound51.mp3;Text;0Ich möchte die Textdatei in eine Liste einlesen und einen Eintrag bearbeiten können.
Ich möchte auch einen neuen Eintrag hinzufügen können.
Das ganze muss man natürlich alles speichern können.Ich habe mir hier schon einiges angeguckt, aber leider nichts gefunden womit ich arbeiten könnte.
Ich würde mich freuen, wenn mir hier einer helfen könnte.
Mein kleiner Anfang ist hier zu sehen, so würde ich es gerne machen:
C
Alles anzeigen#include <GUIConstants.au3> #include <File.au3> Global $file = "daten2.txt" Global $zeilen = _FileCountLines($file) Global $dump Global $file_string[$zeilen] #NoTrayIcon $Form1 = GUICreate("Auflistung", 800, 600) $ListView1 = GUICtrlCreateListView("ID|Kategorie|Sound1|Titel|Sound2|Text|Schalter", 20, 240, 760, 340) GUICtrlSendMsg(-1, 0x101E, 0, 50) GUICtrlSendMsg(-1, 0x101E, 1, 70) GUICtrlSendMsg(-1, 0x101E, 2, 70) GUICtrlSendMsg(-1, 0x101E, 3,180) GUICtrlSendMsg(-1, 0x101E, 4, 70) GUICtrlSendMsg(-1, 0x101E, 5,180) GUICtrlSendMsg(-1, 0x101E, 6, 60) For $i = 1 To $zeilen $file_string[$i - 1] = FileReadLine($file, $i) $dump = StringReplace($file_string[$i - 1], ";", "|") GUICtrlCreateListViewItem($dump, $ListView1) Next GUISetState(@SW_SHOW) While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit EndSwitch WEnd
-
Das könnte auch noch funktionieren:
[autoit]$fT = ((Sin($fPos + $aCT[$i][2]) + 1) * 0.5) ^ 3
[/autoit]Hey, super danke ! Das wars was ich gerne machen wollte
-
Das wird etwas schwierig.
[autoit]
Du kannst mal$fT *= (Cos($fPos + $aCT[$i][2]) + 1) * 0.5
[/autoit]in der Funktion _Calc dazuschreiben
hey, ja das bringt etwas, aber dann fliegen die einzelnen würfel nicht mehr soweit auseinander.
oder habe ich etwas falsch gemacht?
ich dachte man kann nach text fertigstellung einfach irgendwo einen sleep einbauen... -
Hey, das sind echt coole Sachen !
Danke.Ich habe mal eine Frage wie kann ich bei dem ColorText Saver den Text 5-10 sek stehen lassen wenn er fertig ist?
Evtl etwas bewegen lassen und dann wieder auseinander fliegen lassen... -
So langsam wird es was
m47: Super vielen danke...das gucke ich mir mal an !
UliK: Danke Dir auch...
Aber mal eine Frage dazu:
Wird denn auch dabei geprüft ob ein Programm abgestürzt/eingefroren (Keine Rückmeldung) ist oder nur ob ein Programm existiert oder nicht?
Ich möchte ja beides abfragen können, also ob ein Programm existiert und/oder ob es abgestürzt/eingefroren (Keine Rückmeldung) ist.Und wie kann ich ganz bewusst ein Testprogramm dazu bringen, das es abgestürzt/einfriert (Keine Rückmeldung) ?
Mit Suspend geht das nicht so, da ja nur der Prozess pausiert, weil im Taskmanager zeigt er es als laufend an... -
Danke Euch erstmal...
Ich bin schon etwas weiter gekommen und der Code sieht sicherlich ganz schön übel aus aber es läuft soweit...
Aber die Prozessüberwachung ist *würg*, da komme ich einfach nicht so weiter...Ich wollte gerne eine Schleife haben, die bestimmte Programme/Prozesse überwacht
und wenn mal ein Programme/Prozess eingefroren bzw beendet worden sein sollte,
dann sollte das neu gestartet werden...ganz von alleinUliK: wäre nett wenn Du die Source noch hättest...
-
Hi, erstmal danke für die Schnipsel
Das ist etwas viel, aber ich werde mal sehen was ich damit anfangen kann...
Also danke. -
Hallo Leute,
ich bin neu im Bereich AutoIt und möchte gerne ein kleines Programm schreiben.Meine Idee ist es einen Programmstarter zu schreiben, der aus einer .ini Datei die Programmenamen, den Programmpfad und einen Timer ausliest.
Die Programmnamen sollen im Button angezeigt werden.
Die Programmpfade dienen zu starten der Programme.
Der Timer soll dazu sein, um die Programme nach einer bestimmten Zeit nacheinander zu starten.Die einzelnen Programmbuttons sollen jeweils anzeigen (in grün) ob das Programm gestartet wurde.
Ich würde es gerne so machen, das wenn ein Programm abgestürtzt oder Eingefroren ist, das alle Programme automatisch gekillt werden und neu gestartet werden.Start= Alle Programme sollen gestartet werden.
Re-Start= Alle Programme sollen gekillt werden und neu gestartet werden.
Stop= Alle Programme sollen gekillt werden.Im Filemenu ist ein Config-Button, wo man dann alle Sachen einstellen sollte und das in der .ini gespeichert können sollte.
Leider bin ich nicht der Profiprogrammierer und fange ja grade erst an.
Ich würde mich echt freuen, wenn mir einer dabei behilflich ist.
Vielen dank schon einmal.Als Anhang mal das was ich bis jetzt geschafft habe, ist nicht wirklich viel...
C
Alles anzeigen#include <GuiConstants.au3> #include <ColorConstants.au3> If Not IsDeclared('WS_CLIPSIBLINGS') Then Global $WS_CLIPSIBLINGS = 0x04000000 GuiCreate("Programmstarter V1 [RAM3000]",350,350) $Filemenu = GuiCtrlCreateMenu ("File") $Config = GuiCtrlCreateMenuitem ("Config",$Filemenu) $Exititem = GuiCtrlCreateMenuitem ("Exit",$Filemenu) $mypic = "ball.jpg" GUICtrlCreatePic ($mypic, 15, 0, 315, 110) $Button1 = GuiCtrlCreateButton("START", 15, 290, 100, 25) $Button2 = GuiCtrlCreateButton("RE-START", 125, 290, 100, 25) $Button3 = GuiCtrlCreateButton("STOP", 235, 290, 100, 25) $Button5 = GuiCtrlCreateButton("Programm 01", 15, 120, 320, 25) $Button6 = GuiCtrlCreateButton("Programm 02", 15, 150, 320, 25) $Button7 = GuiCtrlCreateButton("Programm 03", 15, 180, 320, 25) $Button8 = GuiCtrlCreateButton("Programm 04", 15, 210, 320, 25) $i = 4 $timer=30 GuiSetState() While 1 $msg = GuiGetMsg() Select Case $msg = $GUI_EVENT_CLOSE ExitLoop Case $MSG = $Button1 ; Start Start() Case $MSG = $Button2 ; Re-Start ReStart() Case $MSG = $Button3 ; Stop Stop() Case $MSG = $Button5 Case $MSG = $Button6 Case $MSG = $Button7 Case $MSG = $Button8 Case $MSG = $Config Msgbox(0,"Konfigurator","Hier soll alles konfiguriert werden!") Case $MSG = $Exititem ExitLoop Case Else ;;; EndSelect WEnd Exit Func Start() Local $iPID = Run("help1.exe", "", @SW_MINIMIZE) Sleep($timer) Local $iPID = Run("help2.exe", "", @SW_MINIMIZE) Sleep($timer) Local $iPID = Run("help3.exe", "", @SW_MINIMIZE) Sleep($timer) Local $iPID = Run("help4.exe", "", @SW_MINIMIZE) Sleep($timer) EndFunc Func ReStart() ProcessClose("help1.exe") ProcessClose("help2.exe") ProcessClose("help3.exe") ProcessClose("help4.exe") Local $iPID = Run("help1.exe", "", @SW_MINIMIZE) Sleep($timer) Local $iPID = Run("help2.exe", "", @SW_MINIMIZE) Sleep($timer) Local $iPID = Run("help3.exe", "", @SW_MINIMIZE) Sleep($timer) Local $iPID = Run("help4.exe", "", @SW_MINIMIZE) Sleep($timer) EndFunc Func Stop() ProcessClose("help1.exe") ProcessClose("help2.exe") ProcessClose("help3.exe") ProcessClose("help4.exe") EndFunc
-
@all:
Danke für die Hilfe. Ich werde mir die Beispiele mal angucken.@Osacar:
Danke das sieht sehr gut aus, so wie ich es mir gewünscht habe!
Nun muss ich nur mal versuchen das ganze in mein Script zu bauen....
Die Textdatei soll ja verschlüsselt weitergegeben werden und beim laden entschlüsselt werden -
Hallo,
ich möchte gerne bei meiner Speicher-Funktion eine Verschlüssel-Funktion nutzen.Also so das die eigentliche Textdatei verschlüsselt gespeichert wird, natürlich
muss die Textdatei dann beim einladen (Programmstart) wieder entschlüsselt werden.
Ich würde es gerne so machen, das man einen Schlüssel für die Verschlüsselung angeben kann.Ablauf:
>Programmstart - Textdatei wird geladen - Textdatei entschlüsseln
>>>Datenausgabe der Textdatei
>>>evtl werden neue Daten eingegeben
>Programm wird beendet - Textdatei verschlüsseln - Textdatei wird gespeichertIch hoffe das ist so möglich und mir kann da einer helfen?!
Danke. -
Ja super!!!
Ich habe die 2 Zeilen für die Scrollbars wieder entfernt und das Update eingefügt....Nun werden die Scrollsbars auch wieder richtig angezeigt,
bei großen Listen ist der Bar nun auch wieder kleinerALLES LÄUFT SUPER !
Danke für die tolle Hilfe !*BugFix sollte er auf jedenfall machen/einfügen !
-
juhu, ich glaube ich habe es hinbekommen.
[autoit]
Kann sich das mal einer angucken, ob das soweit ok ist?!
[/autoit][autoit][/autoit][autoit]
#include <GuiListView.au3>
#include "include/OwnLVSelection[1.2].au3"
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>#include <GuiScrollBars.au3>
[/autoit][autoit][/autoit][autoit]
#include <ScrollBarConstants.au3>Local $cLV1
[/autoit][autoit][/autoit][autoit]$gui = GUICreate('selected item', 430, 300, -1, -1 )
[/autoit][autoit][/autoit][autoit]
$cLV1 = GuiCtrlCreateListView('Number|Article', 10, 10, 400, 235)
_GUICtrlListView_SetColumnWidth ($cLV1, 0, 100)
_GUICtrlListView_SetColumnWidth ($cLV1, 1, 260)
$hLV1 = GUICtrlGetHandle($cLV1)For $i = 1 To 30
[/autoit][autoit][/autoit][autoit]
$index = _GUICtrlListView_AddItem($hLV1, '1234-' & $i)
_GUICtrlListView_AddSubItem($hLV1, $index, 'Itemname-' & $i & '-2', 1)
Next
_GuiCtrlListview_OwnSelectionAdd($hLV1)
_GuiCtrlListview_OwnSelectionSetColor($hLV1, 0x112541, 0xBDFAFF)_GUIScrollBars_Init($hLV1)
[/autoit][autoit][/autoit][autoit]
_GUIScrollBars_ShowScrollBar($hLV1, $SB_HORZ, False)GUISetState()
[/autoit][autoit][/autoit][autoit]Do
[/autoit]
Until GUIGetMsg() = -1 -
hi, danke schon mal für die Hilfe.
Ich habe das nun schon mal soweit hinbekommen, das die selektierte Zeile eine andere HG-Farbe bekommt
und auch behält bis zum nächsten klick auf ein neues Item.Aber leider ist der Scrollbar weg?!
[autoit]
Wie kann ich den wieder einschalen?
[/autoit][autoit][/autoit][autoit]
#include <GuiListView.au3>
#include "include/OwnLVSelection[1.2].au3"$gui = GUICreate('selected item', 430, 300)
[/autoit][autoit][/autoit][autoit]
$cLV1 = GuiCtrlCreateListView('Number|Article', 10, 10, 400, 235 )
_GUICtrlListView_SetColumnWidth ($cLV1, 0, 100)
_GUICtrlListView_SetColumnWidth ($cLV1, 1, 300)
$hLV1 = GUICtrlGetHandle($cLV1)For $i = 1 To 30
[/autoit][autoit][/autoit][autoit]
$index = _GUICtrlListView_AddItem($hLV1, '1234-' & $i)
_GUICtrlListView_AddSubItem($hLV1, $index, 'Itemname-' & $i & '-2', 1)
Next
_GuiCtrlListview_OwnSelectionAdd($hLV1)
_GuiCtrlListview_OwnSelectionSetColor($hLV1, 0x112541, 0xBDFAFF)GUISetState()
[/autoit][autoit][/autoit][autoit]Do
[/autoit]
Until GUIGetMsg() = -1 -
Danke, das sieht doch super aus!
uff...ich habe es mal versucht bekomme das aber nicht so richtig zum laufen.
Könntest Du mir da etwas helfen bzw zeigen wie und wo ich was machen muss?
Wie gesagt ich bin noch recht neu im Bereich AutoIt....
Danke!