Obtenir le nom du fichier de la photo d'un produit

[gaudetm]

J'arrive a avoir toutes les informations que j'ai besoin ou presque sur un produit en effet je ne vois pas quel champs contient le nom du fichier pour la photo d'un produit

Est-ce que quelqu'un pourrait nous donner ces informations avec un exemple si possible

merci

[adidas]

Il faut utiliser l'interface Attachement.

Lors qu'on a le cardpos du produit, on a qu'à déclarer un interface AcoSDK.Attachment, utiliser la méthode GetFileInfo(AcoSDK.AttachType.Att_Product, CardPos), et les noms des fichiers sont disponible.

Je peux fournire du code au besoin.

Merci, Bonne journée!

[geemeetheway]

Je peux fournire du code au besoin.

Ca serait une bonne idée et très apprécié svp.

Merci
Geemee Theway

[hench]

Hey Theway,


En passant, voici le code provenant de l'aide du SDK:

Code:


'******************************************************************
'L'exemple Visual Basic suivant permet de consulter les données
'concernant le fichier joint à la fiche du produit dont le numéro
'est CARTOUCHE. L'installation de la librairie du SDK,
'l'ouverture de la société ainsi que la connexion d'un usager
'doivent être faites au préalable.
'******************************************************************

Sub ReadAttachment()


'Déclaration des interfaces
Dim AttachmentInt As New AcoSDK.Attachment
Dim ProductInt As New AcoSDK.Product

'Déclaration des variables
Dim Error As Long
Dim CardPos As Long

ProductInt.BlankKey
ProductInt.PKey_PrNumber = "CARTOUCHE"
'Recherche du produit CARTOUCHE dans l'index 1 pour
'obtenir son CardPos
Error = ProductInt.FindKey(1, False)
If Error = 0 Then

CardPos = ProductInt.Key_PrCardPos
Error = AttachmentInt.GetFileInfo
(Att_Product, CardPos)
If Error = 0 Then

'Affichage de certaines informations
MsgBox AttachmentInt.FileDateTime & Chr(13) & AttachmentInt.LongFileName & Chr(13) & AttachmentInt.OriginalLongFileName

Else

MsgBox "Erreur: " & Acomba.GetErrorMessage
(Error)

End If

Else

MsgBox "Erreur: " & Acomba.GetErrorMessage
(Error)

End If

End Sub


Bon succès !!

hench

[Contenu sponsorisé]