Bonjour à tous,

après un long projet en C# qui s'est bien terminé, je passe sur un projet en VB.NET. Le souci c'est que je suis perdu en VB (beauciup moins de fonctions qu'en C#).

Je souhaite enregistrer les photos et/ou les afficher depuis une base oracle. L'affichage se fait dans un pictureBox. Voici ma requete pour insérer la photo en base:

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
28
29
30
31
32
33
34
35
 
Sub PHOTO_INSERT(ByVal VVST_BDDCB As String, ByVal VVST_CUSER As String)
 
        R9 = "INSERT"
        R9 = R9 & " INTO UCB.T_CB_Photo"
        R9 = R9 & " (T_CB_Photo.IDENTIFIANT"
        R9 = R9 & ",T_CB_Photo.NUM_DOSSIER"
        R9 = R9 & ",T_CB_Photo.NOM_PHOTO"
        R9 = R9 & ",T_CB_Photo.TYPE_MIME"
        R9 = R9 & ",T_CB_Photo.FICHIER"
        R9 = R9 & ",T_CB_Photo.DATE_CREATION)"
        R9 = R9 & " VALUES ('" & PHOTO_ID & "'"
        R9 = R9 & ",'" & PHOTO_NUM_DOSSIER & "'"
        R9 = R9 & ",'" & PHOTO_NOM_PHOTO & "'"
        R9 = R9 & ",'" & PHOTO_TYPE_MIME & "'"
        R9 = R9 & "," & PHOTO_FICHIER &
        R9 = R9 & ",'" & PHOTO_DATE_CREATION & "')"
 
        Try
            VMUG999.ADO_EXECUTE_SCALAR(VVST_BDDCB, VVST_CUSER, R9, VMUG999.VGST_LIBER)
            If VMUG999.VGST_LIBER <> "" Then
                VGST_NOERR = "I07901"
                VMUG999.VGST_LIBER = R9 & VGST_CRLFX & VGST_CRLFX & VMUG999.VGST_LIBER
                VMUG999.VGNN_ARRET = 1
                TRAIT_ERREUR_ADO(VGST_NOERR)
                End
            End If
        Catch VGNN_EXCEP As Exception
            VGST_NOERR = "I07901"
            VMUG999.VGST_LIBER = R9 & VGST_CRLFX & VGST_CRLFX & VGNN_EXCEP.ToString
            VMUG999.VGNN_ARRET = 1
            TRAIT_ERREUR_ADO(VGST_NOERR)
            End
        End Try
    End Sub
mais j'ai une erreur
Erreur 9 L'opérateur '&' n'est pas défini pour les types 'String' et 'Tableau à 1 dimension(s) de Byte'. D:\Mes Documents\Visual Studio 2010\Projects\VPCB20\VMCB103.vb 2595 14 VPCB20
pour la valeur "PHOTO_FICHIER" qui est un Byte() et T_CB_Photo.FICHIER est un BLOB. Voyez-vous pourquoi j'ai cette erreur ?