Français
Forum

DIMensionierte Bereichsvariable pas DIMmensioniert

 

Thomas
Zielinski
allô gens,
je sitze justement à Dietmars Problem et beim rumspielen erzählt mir Profan cela qui Bereichsvariable test# pas dimensioniert sei, quoique je vous sans équivoque deux Zeilen drüber dimensioniere.
KompilierenMarqueSéparation
cls
var sql& = sqlinit(DSN=Firebird;UID=SYSDBA;PWD=masterkey;DBNAME=E:\Data\KURSDB.GDB;)
print sql&
Set(SQLFile, E:\Data\blobausgabe.jpg)
Declare dasbild#, bild$, groesse%, test#
bild$ = E:\Data\Drache.jpg
groesse% = FileSize(bild$)
Dim dasbild#, groesse%+2
Dim test#, groesse%+500  <-----Dimensionieren
BlockRead(bild$, dasbild#, 0, groesse%+1)
test# = INSERT INTO bilder (id, name, bild) VALUES (1, Drachen,  + dasbild# + )  <----- nicht mehr dimensioniert
sqlExec test#,1
Dispose test#
Dispose dasbild#
10 kB
Hochgeladen:11.02.2009
Downloadcounter110
Download
 
XProfan X4; Win10 x64
Der Kuchen ist eine lüge!
11.02.2009  
 



exposition Dir la fois String  et String  à.
KompilierenMarqueSéparation
declare mem#,mim#
dim mem#,200
dim mim#,200
string mim#,0=Salat
string mem#,0=MeinString+string$(mim#,0)+DeinString
print string$(mem#,0)
waitKey
>
 
11.02.2009  
 




RGH
Salut,

qui Fehlermeldung ist dans qui acte quelque chose irreführend, mais cela kleine Programme contient quelques large gröbere faute:
KompilierenMarqueSéparation
quoi soll cela bewirken? cela Ergebnis eines SQLExec-Befehles ist toujours un Text!
KompilierenMarqueSéparation
test# = INSERT INTO bilder (id, name, bild) VALUES (1, Drachen,  + dasbild# + )
>

1. Einer Bereichsvariablen peux ne...aucune String zugewiesen volonté.
2. String + Bereichvariable + String funktioniert naturellement aussi pas.
mais pourquoi gibt es ici keinen faute? ici schlägt qui automatische Typumwandlung 2 la fois trop:
1. chez String + Bereich + String wird qui Adresse qui Bereichsvariablen automatisch per Str$ dans une String umgewandelt. derrière dem = steht alors un String.
2. qui Bereichsvariable peux oui durchaus un numerischer Wert comme neue Adresse zugewiesen volonté, alors wird qui Ausdruck derrière dem = comme numerischer Ausdruck interpretiert. qui Stringt wird daher automatisch interne avec VAL dans une Wert umgewandelt et ergibt ensuite exakt 0. une Bereichsvariable avec qui ungültigen Adresse 0 gilt comme pas dimensioniert.
qui Fehlermeldung ist alors letztlich korrekt. par qui falsche Programmlogik wird test# réellement trop einer undimensionierten Bereichsvariablen.
KompilierenMarqueSéparation
sqlExec test#, 1
>

sqlExec erwartet une String comme paramètre et aucun Bereichsvariable!

Folgede Tipps:
1. cela geladene Bild mi Encode64() dans une String transformer. dasBild# -> dasBild$
2. Test# daher par Test$ ersetzen et dasBild$ insérer
3 Zum Lecture des Bildes: cela SQL-Ergebnis est un String. Diesen avec Decode64() wieder dans une Bereich transformer et comme JPG Sauver.

cela ici comme (ungetestete) Anregung: (j'ai ici ne...aucune FireBird)
KompilierenMarqueSéparation
cls
var sql& = sqlinit(DSN=Firebird;UID=SYSDBA;PWD=masterkey;DBNAME=E:\Data\KURSDB.GDB;)
print sql&
Declare dasBild#, dasBild$, bild$, groesse%, test$
bild$ = E:\Data\Drache.jpg
groesse% = FileSize(bild$)
Dim dasbild#, groesse% + 2
BlockRead(bild$, dasbild#, 0, groesse% + 1)
dasBild$ = Encode64(dasBild#, 0, sizeOf(dasBild#))
test$ = INSERT INTO bilder (id, name, bild) VALUES (1, Drachen,  + dasbild$ + )
sqlExec test$, 1
Dispose dasbild#
Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4
11.02.2009  
 




Thomas
Zielinski
je schieb cela maintenant simple la fois sur mon Grippe et cela fièvre.
je remercie euch
gruß Thomas
 
XProfan X4; Win10 x64
Der Kuchen ist eine lüge!
11.02.2009  
 




Dietmar
Horn
Thomas Zielinski
... je sitze justement à Dietmars Problem ...


qui Weg sur cela Sauver einer Dossier comme String (Encode64) dans un VARCHAR ist meiner attitude pour un Holzweg, qui pas plus verfolgt volonté braucht. dans un VARCHAR-champ passen chez IB/FB maximum 32 KB données - alors ist cet déjà de daher pas zum Sauver beliebiger Fichiers approprié, weil cet meist wesentlich größer sommes (PDF, JPG, MP3, MPEG, AVI, ...).

dans einem BLOB-champ dagegen wird pas qui Dossier selber abgelegt, mais seulement un Verweis puis, wohin oui c'est ca dans qui banque de données qui Dossier gespeichert ist. Siehe aussi [...] 

und dir alors tout autor, avec irgendeinem SQL-INSERT-Befehl (o.ä.) cette Verweis (et peut-être. weitere Angaben, comment Dateigröße, etc.?) im BLOB irgendwie unterzukriegen. et oui c'est ca à cette Stelle fehlt mir pour bisher malheureusement un Stück film.

cela Rauskrümeln qui Fichiers aus qui banque de données pourrait ensuite arriéré probablement pas plus allzu grave son, si vous seulement la fois sans Schäden dans qui DB reingeschubst worden sommes.

Doch comment allez cela Reinschubsen qui Fichiers dans qui BLOBs?

Inzwischen träume je la nuit déjà bientôt de BLOBs ... Im Traum voyons cet BLOB-Kreaturen wirklich vraie furchterregend aus ...

Salut
Dietmar
 
Multimedia für Jugendliche und junge Erwachsene - MMJ Hoyerswerda e.V.  [...] 

Windows 95 bis Windows 7
Profan² 6.6 bis XProfan X2 mit XPSE

Das große XProfan-Lehrbuch:  [...] 
14.02.2009  
 



[...] 
 
14.02.2009  
 




Dietmar
Horn
je attends eigentlich plutôt sur fachliche répondre zum BLOB-Problem (IB/FB betreffend) et moins sur bunte Klicki-Bilderchen zur peut-être. Deutung / Interpretation meiner nächtlichen BLOB-Träume ...

Salut
Dietmar
 
Multimedia für Jugendliche und junge Erwachsene - MMJ Hoyerswerda e.V.  [...] 

Windows 95 bis Windows 7
Profan² 6.6 bis XProfan X2 mit XPSE

Das große XProfan-Lehrbuch:  [...] 
14.02.2009  
 



voulais seulement montrer, den film gibts bereits. (déjà longtemps)

@Fachlich: quoi erwartest Du de mir?
 
14.02.2009  
 




Dietmar
Horn
iF

@Fachlich: quoi erwartest Du de mir?


Aktuell:

Aider, Anregungen, Unterstützung dans direction SQL avec Interbase/Firebird, u.ä. - aucunement cependant kauderwelsche Formulierungen, ou bien une recueil Google-Bilderchen pour pubertierende Kinder / Jugendliche ...

Salut
Dietmar
 
Multimedia für Jugendliche und junge Erwachsene - MMJ Hoyerswerda e.V.  [...] 

Windows 95 bis Windows 7
Profan² 6.6 bis XProfan X2 mit XPSE

Das große XProfan-Lehrbuch:  [...] 
14.02.2009  
 



Dietmar Horn

iF

@Fachlich: quoi erwartest Du de mir?


aucunement cependant kauderwelsche Formulierungen, ou bien une recueil Google-Bilderchen pour pubertierende Kinder / Jugendliche ...

Salut
Dietmar


Irgendwie la hâte Du keinerlei plan en, quoi wirklich hilft!
 
15.02.2009  
 



Dietmar, tu es sûrement pas seul avec deinem Problem. sur qui Herstellerseite gibt es une interessanten Artikel, comment on VERSCHIEDENE BLOB-ARTEN dans Firebird trop behandeln hat. entier unten aussi avec Beispielen: [...] 
peut-être bringt oui cela plus.
Gruss, Specht
 
15.02.2009  
 



répondre


Topictitle, max. 100 marque.
 

Systemprofile:

ne...aucune Systemprofil angelegt. [anlegen]

XProfan:

 Posting  Font  Smilies  ▼ 

s'il te plaît s'inscrire um une Beitrag trop verfassen.
 

Options du sujet

4.920 Views

Untitledvor 0 min.

Themeninformationen



Admins  |  AGB  |  Applications  |  Auteurs  |  Chat  |  protection des données  |  Télécharger  |  Entrance  |  Aider  |  Merchantportal  |  Empreinte  |  Mart  |  Interfaces  |  SDK  |  Services  |  Jeux  |  cherche  |  Support

un projet aller XProfaner, qui il y a!


protection des données


Wir verwenden Cookies seulement comme Session-Cookies à cause de qui technischen Notwendigkeit et chez uns gibt es aucun Cookies de Drittanbietern.

si du ici sur unsere Webseite klickst ou bien navigierst, stimmst du unserer Erfassung de Informationen dans unseren Cookies sur XProfan.Net trop.

Weitere Informationen trop unseren Cookies et en supplément, comment du qui Kontrolle par-dessus behältst, findest du dans unserer nachfolgenden Datenschutzerklärung.


d'accordDatenschutzerklärung
je voudrais keinen Cookie