Discussion :

[M51-F]

Bonjour, j'ai déjà récupéré des infos de MichelXld sur l'interfacage de VB.net avec OpenOffice, mais j'ai quelques questions:
je souhaite mettre et récupérer une image dans une base de données, pour cela j'ai crée un champ Binaire dans une table, comment faire pour écrire et lire ce champ.
Pour du lire du texte MichelXld utilise oRequete.getString(N° de colonne), mais pour une table bynaire ?? (sous open DB il s'affiche sous l'appellation "Object")

Pour ecrire des lettre ou des chiffres avec la syntaxe SQL:
"INSERT INTO ""maTable"" (""ChampTexte"", ""ChampNum"") Values('Nouvelle ligne', 12345)"
pour ecrire une table bynaire ??

Ou peut-on trouver plus de syntaxe pour oRequete ?

Merci d'avance

[SilkyRoad]

bonsoir

Tu pourras peut être adapter cette procédure OOo qui permet d'enregistrer un champ binaire dans une base (stockage d'un fichier image).

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
    Dim TailleFichier As Long 
    Dim Fichier As String , Texte_SQL As String 
    Dim Tableau()
 
	Fichier = "C:\Documents and Settings\mimi\dossier\Image2.jpg" 
 
    oSimpleFileAccess = createUnoService( "com.sun.star.ucb.SimpleFileAccess" ) 
 
	oInputStream = oSimpleFileAccess.openFileRead( Fichier )
	TailleFichier = oInputStream.getLength()
	ReDim Tableau( 0 To TailleFichier - 1 )
	oInputStream.readBytes( Tableau() , TailleFichier )
 
    Texte_SQL = "INSERT INTO ""Table1"" (""ID"" , ""ChampImage"") VALUES (?,?) " 
 
    oBase = createUnoService("com.sun.star.sdb.DatabaseContext") 
    oData = oBase.getByName("DataBaseOOo") 
    oCn = oData.GetConnection("","") 
 
    oStatement = oCn.prepareStatement( Texte_SQL ) 
    oStatement.setInt( 1 , 30 )
    oStatement.setBytes( 2 , Tableau() , TailleFichier ) 
    oStatement.executeUpdate()
    oInputStream.closeInput() 
 
    oStatement.Close
    oData.Dispose

Ps
Peux tu m'indiquer ou tu as trouvé une documentation sur l'interfacage de VB.net avec OpenOffice, par MichelXld ... ;o)


bonne soirée
michel