hallo
hab mir gestern kurz sqlite angeschaut, und dabei ein Beispiel aus der Hilfe abgeändert.
#include <SQLite.au3>
#include <SQLite.dll.au3>
#include<inet.au3>
#include<string.au3>
global $hQuery, $aRow, $sMsg
For $i= 0000001 to 1869799
$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, "è", "è")
_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
While _SQLite_FetchData($hQuery, $aRow) = $SQLITE_OK
$sMsg &= $aRow[0]
WEnd
MsgBox(0, "SQLite", "Durch Abfrage ermittelte Daten: " & @CR & @CR & $sMsg)
next
_SQLite_Close()
_SQLite_Shutdown()
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?