Discussion :

[zimba-tm]

Bonjour developpez, voici mon premier post

J'ai une application ASP 3.0 et je construis une dll en VB 6.0 pour faire tous les accès à ma BD (c'est un peu compliqué là, donc je vous épargne les détails )

Actuellement j'envisage de retourner un code d'erreur à chaque appel de fonction.

p.ex :

Code :

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

1
2
3
4
5
6
7
Public Function MyFunc(ByVal MyParam As String, ByRef MyResult As String) As Integer
  On Error Goto ErrHandling
  MyFunc = 0  
    '' My code here
  ErrHandling
    MyFunc = Err.Number
End Function

Le problème c'est que je dois synchroniser les N° d'erreurs entre VB est ASP et que je ne peux pas passer plus d'informations (par exemple la DSN ou un chemin vers un fichier)

Quel est la meilleur pratique ?

Cheers,
zimba

[Fulgy]

Salut. Si j'ai bien compris tu veux que tes fonctions contenues dans ton dll génère une erreur lorsqu'elles en rencontre une? Si c'est ça fait une petite recherche dans l'aide sur (Err.)Raise , sinon j'ai pas compris ce que tu attend

[Babyneedle]

J'ai fait ca longtemps avant de passer a ASP.NET.

Il faut gerer les erreurs en donnant des resultats negatifs a tes fonctions.


Par exemple, si le retour d'une fonction est un numerique, tu pourrais generer un resultat de -1 pour erreur X, -2 pour erreur Y. Moi je les mets en groupes de 100 (-100, -200) afin de pouvoir ajouter des erreurs similaires par la suite.

Pour les retour string ou objets, il faut definir des resultats soit NULL, vides ou contenant une valeur predefinie.

Ou a chaque fois que tu cree une fonction, tu retourne une collection d'objets dont le premier objet est le retour et le deuxieme est la collection d'erreurs. C'est plus complique mais ca permet aussi de generer des diagnostiques de performance.

[Nightfall]

Je suis pas d'accord avec toi Babyneedle, le err.raise me semble beaucoup mieux. Ca s'implifie le code dans la page asp puisque tu peux attraper l'erreur avec un on error goto et tu peux passer des informations dans la description de l'erreur.

[zimba-tm]

@Babyneedle: Merci, ta technique semble assez réaliste
J'ai fait qqes tests aujourd'hui pour voir si je pouvais retourner le résultat pas référence et au final ça complique pas-mal les choses. Par exemple si je veux retourner un array, je suis obligé de passer le paramètre en variant.

@Fulgy et Nightfall: Je vous rappèle que je suis en ASP3.0 et VB6.0
A ma conaissance, on ne peut pas retourner des Err.Raise de VB6.0 ActiveX DLL --> ASP

[Babyneedle]

Non,

Chaque fonction renvoie un objet collection.

Genre:

Code :

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

1
2
3
4
5
6
7
8
Set objOutils = CreateObject("MaDLL.clsOutils")
colHeure = objOutils.DonnerHeure("Maintenant")
 
If ColHeure(1).Item Is Nothing Then 'Pas d'erreur
 
Else 'Erreur
 
End If

Dans la DLL

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Public Function DonnerHeure(strOption as String) As Collection
  Dim colHeure as Collection
 
  On Error GoTo Err
 
  colHeure.Add Time()
 
  Set DonnerHeure = colHeure
  Exit Function
 
Err:
 
  colHeure.Add -1
 
End Function

Alors quelque soit la valeur ou l'objet renvoye, en l'assignant en premier dans la collection, le conteneur en prend la nature. Et s'il n'existe pas de deuxieme element dans la collection, c'est qu'il n'y a pas eu d'erreurs.

Aussi, une troisieme facon de faire qui n'est pas specifique aux DLL. Dans ta DLL, exporte la nature de l'erreur generee dans un fichier texte dans un folder specifique et des qu'une erreur est generee dans ASP, tu fais un redirect vers ce fichier pour connaitre la nature de l'erreur.

[zimba-tm]

Yes t'assures

En faite je parlais de mon idée initiale et j'avais bien compris.
Ca va sans dire que avec qqe lignes de codes c encore plus clair

Merci ! 8)

[Nightfall]

@Fulgy et Nightfall: Je vous rappèle que je suis en ASP3.0 et VB6.0
A ma conaissance, on ne peut pas retourner des Err.Raise de VB6.0 ActiveX DLL --> ASP

Mais si mais si ... Tu retournes pas quelque chose, tu crées une erreur que tu gères dans la page ASP.

Exemple :

Je fais une DLL ActiveX nommée TestAsp, qui contient une classe Test. Dans la classe, je mets :

Code :

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

1
2
3
4
5
Public Sub TestMethode()
 
Err.Raise 500, "Test", "Test de méthode"
 
End Sub

Je fais une page ASP :

Code :

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

1
2
3
4
5
6
<%
set objet = Server.CreateObject("TestAsp.Test")
objet.TestMethode
set objet = nothing
response.write "fin"
%>

J'obtiens :

Test erreur '800a01f4'
Test de méthode
/test/test.asp, ligne 3

Maintenant je modifie ma page ASP et je mets :

Code :

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

1
2
3
4
5
6
7
8
9
10
<%
set objet = Server.CreateObject("TestAsp.Test")
on error resume next
objet.TestMethode
if err.number <> 0 then
    response.write "erreur " & err.number & " : " & err.description & "<br />"
end if
set objet = nothing
response.write "fin"
%>

Et j'obtiens :

erreur 500 : Test de méthode
fin

Je viens de le tester.

[zimba-tm]

Wow merci
En effet, j'ai fait des tests, et ASP gère les objects Err.

Par contre je me demande si c'est compatible avec d'autres languages. (C# p.ex)