DominoArea.org [Archive]

Bonjour

J'ai une dll (L59EADRE.DLL)qui me ramene des données sous forme de tableau

Voici un exemple de code vb pour lire ces données

Option Explicit
Private AdrAll as L59EADRE

Private Sub test(numalloc As String)
Dim coderetour As Integer

Dim RETOUR As String

Set AdrAll = New L59EADRE
AdrAll.setIdentAppel ("userXXX")
AdrAll.setCodeOrga ("XXX")
AdrAll.setClematricule numalloc
AdrAll.setClecodemonnaie ("E")
coderetour = AdrAll.appel


RETOUR = RETOUR & vbCrLf & AdrAll.getNumvoieadrdos(0)
RETOUR = RETOUR & vbCrLf & AdrAll.getLiblig3adr(0)
RETOUR = RETOUR & vbCrLf & AdrAll.getLiblig2adr(0)
RETOUR = RETOUR & vbCrLf & AdrAll.getNomvoieadrdos(0)
RETOUR = RETOUR & vbCrLf & AdrAll.getNomcomadrdos(0)
RETOUR = RETOUR & vbCrLf & AdrAll.getCodeposadrdos(0)
RETOUR = RETOUR & vbCrLf & AdrAll.getLiblig5adr(0)
RETOUR = RETOUR & vbCrLf & AdrAll.getTypevoieadrdos(0)
RETOUR = RETOUR & vbCrLf & AdrAll.getNumcompttadr(0)
RETOUR = RETOUR & vbCrLf & AdrAll.getLiblig7adr(0)

MsgBox RETOUR

Exit Sub
Err:
MsgBox "dll test:" & Err.Description
End Sub


Je souhaiterais savoir si il est possible de faire quelque chose de similaire en ls

Cdlt

Frantz

Oui c'est de l'appel à une dll, la classe permet de simplifier l'utilisation

peux tu m'en dire un peu plus stp ?

Ben en supposant que la classe existe et fonctionne, le code vb étant compris par ls, je cherche la problématique.....