PureBasic

Forums PureBasic
Nous sommes le Mer 22/Mai/2019 18:21

Heures au format UTC + 1 heure




Poster un nouveau sujet Répondre au sujet  [ 3 messages ] 
Auteur Message
 Sujet du message: sqlite dll
MessagePosté: Jeu 14/Fév/2019 12:26 
Hors ligne
Avatar de l’utilisateur

Inscription: Mer 29/Juin/2011 14:11
Messages: 1577
Localisation: Belgique
Bonjour à tous,

Je suis un peux absent du site car la je suis en plein dans le développement d'automate programmable, mais je continue à utilisé pb occasionnellement.

Personnellement quand j'utilise sqlite je passe par un module car je n'aime pas devoir sans cesse renseigné à nouveau l'id de la basse de donnée.

J'ai donc créer pour mon usage une dll style objet et la met à votre disposition.

ICI

Voici un exemple de code :

Code:
XIncludeFile "sqliteDbInclude.pbi"
Global dbName.s="dbTest.db"

; we create the table only if the database doesn't exist
Define request.s = "INSERT INTO countries (name) VALUES (?)"
If FileSize(dbName) = -1
  ; if the file of the database doesn't exist it is created
  Define myDb.db = newSqlite(dbName)
  If myDb
    myDb\update("CREATE TABLE countries (id INTEGER PRIMARY KEY AUTOINCREMENT,name TEXT NOT NULL)")
    myDb\setString(0,"Belgium")
    myDb\update(request)
    myDb\setString(0,"France")
    myDb\update(request)
    myDb\setString(0,"Spain")
    myDb\update(request)
    myDb\setString(0,"Italia")
    myDb\update(request)
    myDb\setString(0,"Germany")
    myDb\update(request)
    myDb\setString(0,"Rusia")
    myDb\update(request)
  EndIf
  myDb\close()
EndIf
; Testing of result
Define myDb.db = newSqlite(dbName)
If myDb\query("SELECT * FROM countries ORDER BY name")
  While myDb\nextRecord()
    Debug Str(myDb\getLong(0))
    Debug toString(myDb\getString(1))
  Wend
  myDb\close()
EndIf

_________________
Linux Mint / Windows 10 64 bits PB: 5.61 ; 5.62 beta


Haut
 Profil  
Répondre en citant le message  
 Sujet du message: Re: sqlite dll
MessagePosté: Jeu 14/Fév/2019 13:27 
Hors ligne
Avatar de l’utilisateur

Inscription: Sam 23/Sep/2006 18:32
Messages: 6624
Localisation: Isere
Bonjour MDW :wink:
Ca marche pas ici, surement compilé en X64 ?

_________________
ImageLe bonheur est une route...
Pas une destination

PureBasic Forum Officiel - Site PureBasic


Haut
 Profil  
Répondre en citant le message  
 Sujet du message: Re: sqlite dll
MessagePosté: Jeu 14/Fév/2019 14:49 
Hors ligne
Avatar de l’utilisateur

Inscription: Mer 29/Juin/2011 14:11
Messages: 1577
Localisation: Belgique
Salut Kwai chang caine,

Oui en effet, désolé.

_________________
Linux Mint / Windows 10 64 bits PB: 5.61 ; 5.62 beta


Haut
 Profil  
Répondre en citant le message  
Afficher les messages postés depuis:  Trier par  
Poster un nouveau sujet Répondre au sujet  [ 3 messages ] 

Heures au format UTC + 1 heure


Qui est en ligne

Utilisateurs parcourant ce forum: Aucun utilisateur enregistré et 1 invité


Vous ne pouvez pas poster de nouveaux sujets
Vous ne pouvez pas répondre aux sujets
Vous ne pouvez pas éditer vos messages
Vous ne pouvez pas supprimer vos messages

Rechercher:
Aller à:  

 


Powered by phpBB © 2008 phpBB Group | Traduction par: phpBB-fr.com
subSilver+ theme by Canver Software, sponsor Sanal Modifiye