Discussion :

[noel.bastide]

Bonjour,
J'utilise un appel de fonction dans un programme VB. Le squelette est :
InitNewItem(Integer, Short, Short, Integer) as Integer
Cette fonction retourne une valeur >= 0 pour certaines valeurs du 1er paramètre.
Tout fonctionnait bien en VB 2005 Express. Depuis que je suis passé en VB 2008, la fonction retourne toujours -1. Je suis donc bloqué là.
Je soupçonne un pb d'appel de fonction. Qu'est-ce qui a changé entre VB 2005 et 2008 ?
Merci si quelqu'un a une idée.
Cdlt
Noël

[zoaax]

Bonjour,

Une méthode fonctionnant en .NET 2.0 fonctionnera en .NET 3.5.
Montre ton code stp.

++

[noel.bastide]

Voici le code complet de la fonction. Il apporte peu de renseignements c
Je n'ai pas les sources de DBDATA32XLib, seulement l'interface dans l'explorateur d'objets.

Code :

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

1
2
3
4
5
6
7
8
9
Private Sub CesvaEnCmgToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CesvaEnCmgToolStripMenuItem.Click
        Dim camp As New DBDATA32XLib.ICampaign
        Dim item As New DBDATA32XLib.IntItem
        Dim ret As Integer
        ret = camp.NewCampaign("dBTrait1")
        ret = camp.LoadCampaign("dBTrait1")
        ret = camp.InitNewItem(263425, 0, 1, 0)
        MsgBox(ret)
End Sub

Par contre, voici le détail de l'interface de la fonction copié dans l'explorateur :
Function InitNewItem(ByVal FamilyType As Integer, ByVal NbAxeX As Short, ByVal NbDims As Short, ByVal fInterlace As Integer) As Integer
Membre de DBDATA32XLib.ICampaign.IICampaign

Merci
Cdlt
Noël