Beiträge von Irrlicht

Irrlicht

Nur leider ist keine Datei mit Filmbeschreibungen drin.
Wenn keiner was derartiges findet, macht mein skript einfach ma weiter

Irrlicht

vielen fetten dank!
ohne den tipp, hätte es glaub noch tage gedauert. danke danke danke

Irrlicht

die abfrage hab ich vorerst rausgehaun. das anlegen der datenbank dauert einige stunden.
Edit die db sieht doch dann so aus?
----- a --- b ------- c
1 Titel Inhalt
2 Titel Inhalt
3 Titel Inhalt
4 Titel Inhalt
5 etc

wie wird zum beispiel 4b ausgelesen? im hilfebeispiel, wird irgendwas ausgelesen, ich weiß aber net wie man drauf kommt

Irrlicht

hallo
hab mir gestern kurz sqlite angeschaut, und dabei ein Beispiel aus der Hilfe abgeändert.

[autoit]

#include <SQLite.au3>
#include <SQLite.dll.au3>
#include<inet.au3>
#include<string.au3>
global $hQuery, $aRow, $sMsg
For $i= 0000001 to 1869799

[/autoit][autoit][/autoit][autoit]

$source=_Inetgetsource("http://www.imdb.de/title/tt"&$i& "/plotsummary")
$inhalt= _stringbetween($source, '<div id="swiki.2.1">', "</div>")
$titel= _stringbetween( $source, '<title>', "(")
If isarray($titel) then
$replace= Stringreplace($titel[0], "ä", "ä")
$replace2= stringreplace($replace, "è", "è")

[/autoit][autoit][/autoit][autoit]

_SQLite_Startup()
ConsoleWrite("_SQLite_LibVersion=" & _SQLite_LibVersion() & @CRLF)
_SQLite_Open() ; Öffne :memory: Datenbank
_SQLite_Exec(-1, "CREATE TABLE aTest (a,b,c);") ; Erzeugt Tabelle
_SQLite_Exec(-1, "INSERT INTO aTest(a,b,c) VALUES ('c','1','');") ; Fügt Daten ein
_SQLite_Exec(-1, "INSERT INTO aTest(a,b,c) VALUES ('b','1',' "&$inhalt[0]&"');") ; Fügt Daten ein
_SQLite_Exec(-1, "INSERT INTO aTest(a,b,c) VALUES ('a','1','"& $replace2 &"');") ; Fügt Daten ein
endif

[/autoit][autoit][/autoit][autoit]

While _SQLite_FetchData($hQuery, $aRow) = $SQLITE_OK
$sMsg &= $aRow[0]
WEnd

[/autoit][autoit][/autoit][autoit]

MsgBox(0, "SQLite", "Durch Abfrage ermittelte Daten: " & @CR & @CR & $sMsg)
next
_SQLite_Close()
_SQLite_Shutdown()

[/autoit][autoit][/autoit][autoit][/autoit][autoit][/autoit]

Es sollen einfach alle 1869799 titel+ beschreibung in ne sqlite-datenbank geschrieben werden. Naja, die Abfrage klappt nicht
Dann noch ne Frage:
Wie kann ich die Datenbank abspeichern, dass nicht dauernd die Daten neu geschrieben werden müssen?

Irrlicht

[ offen ] Standard Audiogerät setzen (Win XP + Win 7)
Vielleicht hilft dir das weiter !

Irrlicht

Zitat von chip

Der SuperGau ist das schmelzen der Brennstäbe und die darauß resultierende verstrahlung des Bodens und Grundwassers.

der kontakt mit dem grundwasser kann, so weit ich weiß, außerdem noch sehr gefährlich sein, da es dabei zu diversen explosionen kommen kann.
das radioaktive material wird dann regelrecht durch die luft/umgebung geschleudert.

Irrlicht

http://www.downloadatoz.com/driver/item_c-…a-for-win7.html
Was anderes als Beta hab ich net gefunden

Irrlicht

Mein Downloadlimit is leider nach einem Download fällig, so kann man leider nicht gescheit testen =(

Irrlicht

Kenn den Service zwar nicht, aber wenn du's mit Autoit lösen willst, wärs gut, wenn du mal ne Beispieldatei(/link) angeben könntest...

Irrlicht

oder so

[autoit]

#include<misc.au3>
while 1
If _ispressed(04) then Msgbox(0, "Mausrad", "Das Mausrad wurde gedrückt")
wend

[/autoit]

Irrlicht

Mit Stringregexp kann man das lösen.
Ist allerdings bissel schwer
Das Programm Regex Buddy und diverse Tutorials können weiterhelfen

Irrlicht

Zitat von AgentProxon

Wonach muss ich in der Auto IT info suche
ID oder was

Je nachdem, die ControlBefehle kannst du mit folgenden Parametern ausführen:

[autoit]

ControlSend ( "title", "text", controlID, "string" [, flag] )

[/autoit]

String ist der Text, den du senden willst.

[autoit]

ControlSetText ( "title", "text", controlID, "new text" [, flag] )

[/autoit][autoit]

ControlCommand ( "title", "text", controlID, "command" [, "option"] )

[/autoit]

Commands zu finden in der deutschen Hilfe: HIER
Außerdem:

[autoit]

ControlClick ( "title", "text", controlID [, button [, clicks [, x [, y ]]]] )

[/autoit]

uvm.

Irrlicht

[autoit]

Func _PWdelete()
IniDelete(@ScriptDir & "\passwords.ini", GUICtrlRead($PW_CH))
MsgBox(0, "", GUICtrlRead($PW_CH))
$sectionnames = IniReadSectionNames(@ScriptDir & "\passwords.ini")
_ArrayDisplay($sectionnames)
GUICtrlSetData($PW_CH, "")
For $i = 1 To $sectionnames[0]
$sectionpairs= Inireadsection(@scriptdir&"\passwords.ini", $sectionnames[$i])
for $i= 1 to $sectionpairs[0]
GUICtrlSetData($KAT_CH, $sectionpairs[$i][1], 0)
next
Next
EndFunc ;==>_PWdelete

[/autoit]

So sollte es funktionieren, habs aber noch nicht getestet
Gruß, Billie

Irrlicht

Benutz die Funktion AutoIt Info!
Verwende das gefundene Zeugs dann mit controlclick und controlsend

Irrlicht

[autoit]

#NoTrayIcon

[/autoit][autoit][/autoit][autoit]

#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <GUIListBox.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include<array.au3>

[/autoit][autoit][/autoit][autoit][/autoit][autoit]

$PM_GUI = GUICreate("Passwort Manager", 545, 493, 192, 124)

[/autoit][autoit][/autoit][autoit]

;----Kategorien & Passwort auslesen----;
$Group1 = GUICtrlCreateGroup("Passwort Auswahl", 8, 8, 529, 161)
$PW = GUICtrlCreateLabel("Passwort:", 16, 112, 50, 17)
$PW_OUT = GUICtrlCreateLabel("", 80, 112, 4, 4)
If not fileexists(@scriptdir&"\passwords.ini") then
$KAT = GUICtrlCreateCombo("Kategorie", 72, 32, 185, 25, $cbs_dropdownlist)
$KAT_CH = GUICtrlCreateCombo("Kategorie ", 304, 352, 201, 25)
else
$sectionnames= Inireadsectionnames(@scriptdir&"\passwords.ini")
$KAT = GUICtrlCreateCombo("", 72, 32, 185, 25, $cbs_dropdownlist)
$KAT_CH = GUICtrlCreateCombo(" ", 304, 352, 201, 25)
$KAT_CHO = GUICtrlCreateCombo("", 24, 200, 217, 25)
_arraydisplay($sectionnames)

[/autoit][autoit][/autoit][autoit]

for $i= 1 to $sectionnames[0]
guictrlsetdata($KAT, $sectionnames[$i], 0)
guictrlsetdata($kat_ch, $sectionnames[$i], 0)
guictrlsetdata($kat_cho, $sectionnames[$i],0)
next
endif

[/autoit][autoit][/autoit][autoit]

$LOG = GUICtrlCreateLabel("Login:", 16, 72, 33, 17)
$LOG_OUT = GUICtrlCreateLabel("", 80, 72, 4, 4)
$PW_LIST = GUICtrlCreateList("", 264, 24, 265, 123)
GUICtrlCreateGroup("", -99, -99, 1, 1)

[/autoit][autoit][/autoit][autoit]

;----Passwort hinzufügen----;
$Group2 = GUICtrlCreateGroup("Passwort hinzufügen", 8, 176, 249, 177)
$LOGIN = GUICtrlCreateInput("", 80, 240, 161, 21)
$PASSWORD = GUICtrlCreateInput("", 80, 272, 161, 21)
$PW_ADD = GUICtrlCreateButton("Hinzufügen", 64, 304, 121, 33, $WS_GROUP)
$LOGIN_LAB = GUICtrlCreateLabel("Login:", 16, 242, 33, 17)
$PASSWORD_LAB = GUICtrlCreateLabel("Passwort:", 16, 274, 50, 17)

[/autoit][autoit][/autoit][autoit]

GUICtrlCreateGroup("", -99, -99, 1, 1)

[/autoit][autoit][/autoit][autoit]

;----Kategorie hinzufügen----;
$KAT_ADDEN = GUICtrlCreateGroup("Kategorie hinzufügen", 272, 176, 265, 113)
$KAT_NAME = GUICtrlCreateInput("", 288, 200, 233, 21)
$KAT_ADD = GUICtrlCreateButton("Hinzufügen", 344, 240, 121, 33, $WS_GROUP)
GUICtrlCreateGroup("", -99, -99, 1, 1)

[/autoit][autoit][/autoit][autoit]

;----Passwort löschen----;
$PASSWORD_DELETE = GUICtrlCreateGroup("Passwort löschen", 8, 368, 249, 113)
$PW_CH = GUICtrlCreateCombo("Passwort auswählen", 32, 392, 201, 25)
$PW_DEL = GUICtrlCreateButton("Löschen", 64, 432, 121, 33, $WS_GROUP)
GUICtrlCreateGroup("", -99, -99, 1, 1)

[/autoit][autoit][/autoit][autoit]

;----Kategorie löschen----;
$KAT_DELETE = GUICtrlCreateGroup("Kategorie löschen", 272, 296, 265, 113)

[/autoit][autoit][/autoit][autoit]

$KAT_DEL = GUICtrlCreateButton("Löschen", 344, 373, 121, 33, $WS_GROUP)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)

[/autoit][autoit][/autoit][autoit]

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $PW_ADD
_PWadd()
Case $KAT_ADD
_KATadd()
Case $KAT_del
_katdelete()
case $kat
$keysvalues = IniReadSection(@ScriptDir & "\passwords.ini", GUICtrlRead($KAT))
_arraydisplay($keysvalues)
For $i = 1 To $keysvalues[0][0]
GUICtrlSetData($PW_LIST, $keysvalues[$i][0] & ":" & $keysvalues[$i][1])
Next
case $pw_del
_pwdelete()

[/autoit][autoit][/autoit][autoit]

EndSwitch
WEnd

[/autoit][autoit][/autoit][autoit]

Func _PWadd()
$readpw = GUICtrlRead($PASSWORD)
$readlog = GUICtrlRead($LOGIN)
$readkat = GUICtrlRead($KAT_CHO)
IniWrite(@ScriptDir & "\passwords.ini", $readkat, $readlog, $readpw)
EndFunc ;==>_PWadd

[/autoit][autoit][/autoit][autoit]

Func _KATadd()
If guictrlread($kat_name)<> "" then
IniWrite(@ScriptDir & "\passwords.ini", guictrlread($kat_name) , "", "")
$sectionnames= Inireadsectionnames(@scriptdir&"\passwords.ini")

[/autoit][autoit][/autoit][autoit]

for $i=1 to $sectionnames[0]
guictrlsetdata($kat_ch, $sectionnames[$i],0)
guictrlsetdata($KAT_CHo, $sectionnames[$i],0)
guictrlsetdata($kat, $sectionnames[$i],0)
next

[/autoit][autoit][/autoit][autoit]

endif
EndFunc ;==>_KATadd

[/autoit][autoit][/autoit][autoit]

Func _PWdelete()

[/autoit][autoit][/autoit][autoit]

EndFunc

[/autoit][autoit][/autoit][autoit]

Func _KATdelete()

[/autoit][autoit][/autoit][autoit]

inidelete(@scriptdir&"\passwords.ini", guictrlread($kat_ch))
Msgbox(0, "", guictrlread($kat_ch))
$sectionnames= Inireadsectionnames(@scriptdir&"\passwords.ini")
_arraydisplay($sectionnames)
guictrlsetdata($kat, "")
guictrlsetdata($kat_cho, "")
guictrlsetdata($kat_ch, "")
for $i=1 to $sectionnames[0]
guictrlsetdata($kat_ch, $sectionnames[$i],0)
guictrlsetdata($KAT_CHO, $sectionnames[$i],0)
guictrlsetdata($kat, $sectionnames[$i],0)
next
EndFunc

[/autoit]

Leute es geht nicht darum, das Rad neu zu erfinden. Wenn man was selber nachskriptet, kann man sein eigenes Erfolgserlebnis haben
Jetzt funktioniert alles.
Du musst noch die Funktion um Passwörter zu löschen, einbauen.
Die Combobox muss mit allen Passwörter in der Ini, mit allen Passwörtern aus allen Kategorien gefüllt werden.
Da kannst du zum einen Inireadsectionnames, zum anderen Inireadsection verwenden.
Die beiden kombinierst du mit 2 For..next schleifen. Um Passwörter zu löschen, verwendest du Inidelete(..).. Die Combobox muss dann natürlich aktualisiert werden...
Gruß, Billie

Irrlicht

Hat was, wenn ich mich nicht irre, mit

[autoit]

_BASS_ChannelGetLength()

[/autoit]

zu tun.

Irrlicht

Zeig mal dein aktuelles Skript

Irrlicht

hast du passwörter schon hinzugefügt?^^

Irrlicht

Zitat von DaisukeHideki

Jedoch fällt mir kein Weg ein, Ini Read zu verwenden, um alle Kategorien in der Combobox "$KAT" und die Passwörter bzw. Logins in der Listbox "$PW_LIST" anzuzeigen.

[autoit]

case $kat
$keysvalues= Inireadsection(@scriptdir&"\passwords.ini", guictrlread($kat))

for $i= 1 to _arraymaxindex($keysvalues)
guictrlsetdata($pw_list, $keysvalues[$i][0] &":"& $keysvalues[$i][1])
next

[/autoit]

Irrlicht

[autoit]

#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <GUIListBox.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include<array.au3>
$PM_GUI = GUICreate("Passwort Manager", 545, 450, 192, 124)
$Group1 = GUICtrlCreateGroup("Passwort Auswahl", 8, 8, 529, 161)
$PW = GUICtrlCreateLabel("Passwort:", 16, 112, 50, 17)
$PW_OUT = GUICtrlCreateLabel("", 80, 112, 172, 20)
If not fileexists(@scriptdir&"\data.ini") then
$KAT = GUICtrlCreateCombo("Kategorie", 72, 32, 185, 25, $cbs_dropdownlist)
$KAT_CH = GUICtrlCreateCombo("Kategorie ", 304, 352, 201, 25)
else
$sectionnames= Inireadsectionnames(@scriptdir&"\data.ini")
$KAT = GUICtrlCreateCombo("", 72, 32, 185, 25, $cbs_dropdownlist)
$KAT_CH = GUICtrlCreateCombo(" ", 304, 352, 201, 25)
for $i= 1 to _arraymaxindex($sectionnames)
guictrlsetdata($KAT, $sectionnames[$i], 1)
guictrlsetdata($kat_ch, $sectionnames[$i], 1)
next
endif
$LOG = GUICtrlCreateLabel("Login:", 16, 72, 33, 17)
$LOG_OUT = GUICtrlCreateLabel("", 80, 72, 172, 20)
$PW_LIST = GUICtrlCreateList("", 264, 24, 265, 123)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group2 = GUICtrlCreateGroup("Passwort hinzufügen", 8, 176, 249, 137)
$LOGIN = GUICtrlCreateInput("", 80, 200, 161, 21)
$PASSWORD = GUICtrlCreateInput("", 80, 232, 161, 21)
$PW_ADD = GUICtrlCreateButton("Hinzufügen", 64, 264, 121, 33, $WS_GROUP)
$LOGIN_LAB = GUICtrlCreateLabel("Login:", 16, 202, 33, 17)
$PASSWORD_LAB = GUICtrlCreateLabel("Passwort:", 16, 234, 50, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group3 = GUICtrlCreateGroup("Kategorie hinzufügen", 272, 176, 265, 137)
$KAT_NAME = GUICtrlCreateInput("", 288, 200, 233, 21)
$KAT_ADD = GUICtrlCreateButton("Hinzufügen", 344, 264, 121, 33, $WS_GROUP)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group4 = GUICtrlCreateGroup("Passwort löschen", 8, 328, 249, 113)
$PW_CH = GUICtrlCreateCombo("Passwort auswählen", 32, 352, 201, 25)
$PW_DEL = GUICtrlCreateButton("Löschen", 64, 392, 121, 33, $WS_GROUP)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group5 = GUICtrlCreateGroup("Kategorie löschen", 272, 328, 265, 113)
$KAT_DEL = GUICtrlCreateButton("Löschen", 344, 392, 121, 33, $WS_GROUP)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
case $kat_del
Inidelete(@scriptdir&"\data.ini", guictrlread($kat_ch))
$sectionnames= Inireadsectionnames(@scriptdir&"\data.ini")
guictrlsetdata($kat, "")
guictrlsetdata($kat_ch, "")
for $i= 1 to _arraymaxindex($sectionnames)
guictrlsetdata($KAT, $sectionnames[$i], 1)
guictrlsetdata($kat_ch, $sectionnames[$i], 1)
next
case $KAT_add
If guictrlread($kat_name)<> "" then
Iniwrite(@scriptdir&"\data.ini", guictrlread($kat_name), "", "")
$sectionnames= Inireadsectionnames(@scriptdir&"\data.ini")
guictrlsetdata($kat, "")
guictrlsetdata($kat_ch, "")
for $i= 1 to _arraymaxindex($sectionnames)
guictrlsetdata($KAT, $sectionnames[$i] ,1)
guictrlsetdata($kat_ch, $sectionnames[$i], 1)
next
endif
case $kat
$keysvalues= Inireadsection(@scriptdir&"\data.ini", guictrlread($kat))
_arraydisplay($keysvalues)
for $i= 1 to _arraymaxindex($keysvalues)
guictrlsetdata($pw_list, $keysvalues[$i][0] &":"& $keysvalues[$i][1])
next
EndSwitch
WEnd

[/autoit]

Das wird dir sicherlich weiterhelfen. Aber wie wird entschieden, in welche Kategorie das neue Passwort kommt?
Das is mir bei deinem Skript bissel unklar

Beiträge von Irrlicht

SQLite: Verbesserung ?

SQLite: Verbesserung ?

SQLite: Verbesserung ?

SQLite: Verbesserung ?

Sound-Gerät ändern

Japan - Atomare Katastrophe

Treibersuche

Dateien von x7.to downloaden !

Dateien von x7.to downloaden !

Feststellen ob das Mausrad bewegt wurde

String nach bestimmter Eingabe auslesen

Externes Programm ausfüllen

Passwort Manager | Einige Probleme.

Externes Programm ausfüllen

Passwort Manager | Einige Probleme.

Musikplayer - Paar Problemchen

Passwort Manager | Einige Probleme.

Passwort Manager | Einige Probleme.

Passwort Manager | Einige Probleme.

Passwort Manager | Einige Probleme.