[VB.Net 1.1] Comment écrire une dll ?

Bonsoir,

je voudrais savoir comment créer une dll en vb dotnet 2003 qui fournit des données en retour de son execution et récupérer ces données dans un programme tiers en vb6, donc comment appeler cette dll, lui passer les paramètres et récupérer les datas en retour.
Même question mais les données sont à récupérer dans un programme vb dotnet 2003, donc comment appeler cette dll, lui passer les paramètres
et récupérer les datas en retour.
Je ne peux passer pas ni par un service ou un webservice.

Si vous aviez un exemple ce code même basique pour créer cette dll et l'exploiter dans les deux langages me permettrait de m'orienter dans la bonne direction.

Je troube beaucoup d'article pour en créer en C mais rien en VB !!!:cry:

d'avance merci beaucoup.

Pour créer une DLL en .NET, il te suffit de créer un projet de type Class Library ;)

Bonsoir et merci,
c'est ce vers quoi je mettais orienté mais j'ai un problème avec VB6

Voici par exemple le code de ma classe dotnet

Code:

---

1 2 3 4 5

Public Class Class1 Public Function mafonction(ByVal montexte As String) As String mafonction = montexte End Function End Class

---

dans la page de propriété de la classe item "Génération" je coche "Inscrire pour COM Interop" comme indiqué dans la
doc pour exploiter dans VB6 (créer une TLB). J'ai essayé sans la cocher mais j'ai le même phénomène sous VB6, voir plus loin.

Dans mon projet dotnet j'ajoute dans l'explorateur de solution ma classe et dans mon code par exemple

Code:

---

1 2 3 4 5

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim retour As ClassLibrary1.Class1 retour = New ClassLibrary1.Class1 MsgBox(retour .mafonction("ça marche")) End Sub

---

tout est OK et m'affiche bien une fenêtre "ça marche".
De plus j'ai bien dans mon explorateur d'objets ma classe avec son membre "mafonction".

En revanche dans mon projet VB6, on ne peut ajouter une reference que pour mafonction.tlb, si j'essaye avec mafonction.dll
j'ai le message "Impossible d'ajouter une référence au fichier spécifié", admettons.

voici le code me mon projet VB6

Code:

---

1 2 3 4 5 6 7 8 9

Option Explicit Private Declare Function cestmafonction Lib "ClassLibrary1.dll" Alias "mafonction" (ByVal montexte As String) As String   Private Sub Form_Load() Dim retour As String retour = cestmafonction("ça marche") MsgBox retour End End Sub

---

j'ai comme erreur d'exécution la numéro 453

Citation:

---

Point d'entrée mafonction d'une DLL introuvable dans ClassLibrary1.dll.

---

Effectivement j'ai bien dans mon explorateur d'objets ma classe mais pas son membre "mafonction".
Que faire ?? problème de la classe (mais elle fonctionne sous dotnet 2003) ? faut-il y ajouter quelquechose afin
que cela tourne sous VB6 ?

Je précise que le tout est sur la même machine donc pas de manque du framework, j'ai essayé sur une autre machine sans framework
et là j'avais des messages d'erreur que j'ai résolu en mettant le framework.

En cherchant j'ai vu qu'avec le "C" il faut rajouter "void __export" et autre chose quelque part mais qu'en VB c'est inutile.

Je ne sais plus où chercher ? :oops:

D'avance merci

il faut ajouter au dessus de ta class:

Code:

---

1 2 3

<ClassInterface(ClassInterfaceType.AutoDual)> _ Public Class Prout [...]

---

enssuite tu enregistre ta dll