BLOB in SQLite3

[Karl]

Sqlite3 kann BLOB. Wie kann ich mit PureBasic eine Datei in eine Tabelle schmieren (ohne String)?

K.

[Kaeru Gaman]

... was isn ein BLOB bei Datenbanken?

ich kenn nur Blob als 3D-Gebilde...

[Kiffi]

Sqlite3 kann BLOB.

die SQLite3-Lib in den PBOSL auch

@Kaeru: Binary Large OBject

Grüße ... Kiffi

[Karl]

Ja, gut - nachdem wir das geklärt haben, formuliere ich die Frage mal um:

Wie bewege ich eine Datei in eine BLOB-Tabelle, ohne dass ich die Datei vorher in einen String einlesen muss?

Vielleicht hat jemand hierzu eine Idee.

Karl

[ts-soft]

Hab das zu PBOSL gehörende Beispiel mal geschrumpft. Hier werden 3 Bilder geblobt
PS: Datenbank sollte bereits geöffnet sein, siehe Orginal Examples in PBOSL "blob_test.pb"

Code: Alles auswählen

Procedure WriteBlob()
  
  For lCounter = 0 To 2

    FF = ReadFile(#PB_Any, "demodata\image" + Str(lCounter) + ".jpg")
    
    If FF
      
      FileLen = Lof(FF)
      MemBuffer = AllocateMemory(FileLen)
      ReadData(FF,MemBuffer, FileLen)
      CloseFile(FF)

      Statement = SQLite3_Prepare(dbHandler, "insert into tblBlob (fldKey, fldBlob) values (?, ?);")
      
      If Statement
        
        Key$=Str(lCounter)

        SQLite3_Bind_Text(Statement, 1, @Key$)
        SQLite3_Bind_Blob(Statement, 2, MemBuffer, FileLen)
        SQLite3_Step(Statement)
        SQLite3_Finalize(Statement)
        
      EndIf  
      
      FreeMemory(MemBuffer)
      
    EndIf
    
  Next lCounter
  
EndProcedure  

[Karl]

Ah danke,

ich hatte nur 3.94 hier.


Gruß Karl