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