PureBoard https://www.purebasic.fr/german/ |
|
HTML-Hilfe: List bzw. Linked List und Database https://www.purebasic.fr/german/viewtopic.php?f=11&t=31720 |
Seite 1 von 1 |
Autor: | stab [ 10.11.2019 12:24 ] |
Betreff des Beitrags: | HTML-Hilfe: List bzw. Linked List und Database |
Es gab mal oder gibt noch ein Thema zur PB Hilfe. Anregungen, Fehlerkorrektur etc. Finde ich jetzt gerade nicht. Zur HTML-Hilfe: 1. List Ich denke, hier fehlt NewList Dabei ist mir noch aufgefallen, einmal List und einmal Linked List 2. Database Das Database-Beispiel finde ich für mich, der sich erstmalig mit den PB-Databank-Funktionen beschäftigt, nicht gerade sehr hilfreich. Eigentlich möchte ich ja die PB Vorzüge nutzen und Variablen einsetzen und nicht Zeichenketten wie diese zaubern. Code: apple = 10 sql$ = "INSERT INTO food (name, weight) VALUES ('apple', '" + Str(apple) + "')" Anschaulicher fände ich folgendes: Code: ;
; ------------------------------------------------------------ ; ; PureBasic - Database example file ; ; (c) Fantaisie Software ; ; ------------------------------------------------------------ ; UseSQLiteDatabase() #Database = 0 DatabaseFile$ = GetTemporaryDirectory()+"Database.sqlite" If CreateFile(0, DatabaseFile$) CloseFile(0) If OpenDatabase(#Database, DatabaseFile$, "", "") Result = DatabaseUpdate(#Database, "CREATE TABLE food (name CHAR(50), weight INT)") If Result = 0 Debug DatabaseError() EndIf SetDatabaseString(#Database, 0, "apple") SetDatabaseLong(#Database, 1, 10) DatabaseUpdate(0, "INSERT INTO food (name, weight) VALUES (?,?)") SetDatabaseString(#Database, 0, "pear") SetDatabaseLong(#Database, 1, 5) DatabaseUpdate(0, "INSERT INTO food (name, weight) VALUES (?,?)") SetDatabaseString(#Database, 0, "banana") SetDatabaseLong(#Database, 1, Random(8,7)) DatabaseUpdate(0, "INSERT INTO food (name, weight) VALUES (?,?)") If DatabaseQuery(#Database, "SELECT * FROM food WHERE weight > 7") While NextDatabaseRow(#Database) Debug GetDatabaseString(#Database, 0) +" = "+ Str(GetDatabaseLong(#Database, 1)) Wend FinishDatabaseQuery(#Database) EndIf CloseDatabase(#Database) Else Debug "Can't open database !" EndIf Else Debug "Can't create the database file !" EndIf |
Seite 1 von 1 | Alle Zeiten sind UTC + 1 Stunde [ Sommerzeit ] |
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group http://www.phpbb.com/ |