Page 2 of 2

Posted: Fri Dec 03, 2004 9:56 am
by Flype
thanx guys, i appreciate your diagnostic...

about our 4096 bytes limitation, one solution could be this one :
works very well !

Code: Select all

Procedure.s GetDatabaseText()
  
  If DatabaseQuery("SELECT LENGTH(text) FROM table WHERE 1;")
    If NextDatabaseRow()
      result$="" : size=Val(GetDatabaseString(0))
      For i=1 To size Step 4095
        If DatabaseQuery("SELECT SUBSTRING(text,"+Str(i)+",4095) FROM table WHERE 1;")
          If NextDatabaseRow() : result$+GetDatabaseString(0) : EndIf
        EndIf
      Next
      ProcedureReturn result$
    EndIf
  EndIf
  
EndProcedure

Posted: Tue Oct 04, 2005 1:10 pm
by Beforegod
Sadly the code works not for me.

I have stored some jpeg pictures in my database and i dont have a clue how to retrieve this from the db. Some hints for me ? ;)