Bonjour à tous,

Me revoilà avec mes histoires de liens....

Alors voilà my problem...

J'ai une belle premiere page asp qui se présente comme suit :

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
16
17
18
19
20
21
22
23
24
25
26
27
28
29
 
 
<%@ LANGUAGE="VBScript" %>
 
<!--#include file="../code/fonctions.asp"-->
 
<html>
 
<head>
 
<title></title>
 
</head>
 
<body>
 
<ul>
 
<%
 
Call ListFolderContents(mes_arguments)
 
%>
 
</ul>
 
</body>
 
</html>
Comme vous pouvez vous apercevoir j'inclus en en-tête une bibliothèque de fonctions qui contient la fonction ListFolderContents appelée plus bas.

Voici résumé, les grandes lignes de la bibliothèque de fonctions :

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
16
17
18
19
20
 
 
<%
 
Sub ListFolderContents(mes_arguments)
 
'Je fais parcours classique de répertoire passé en paramètre dans "mes_arguments"
'Pour chacun des fichiers trouvés dans ce répertoire, je crée un lien pour pouvoir les ouvrir. Comme suit :
 
Response.Write("<li><a href=""" & url_fichier & """ target=""_blank"" onClick=""<%Call IncrementCounter()%>""> " & chaine & "</a></li>" & vbCrLf)
 
end Sub
 
Sub IncrementCounter()
 
'Ici je réalise l'incrémentation dans la base access pour compter les clics
 
end sub
 
%>
Comme on peut s'en apercevoir, je voudrai pouvoir appeler IncrementCounter dans l'instruction onClick de chaque lien pour incrémenter un compteur de click se trouvant dans une base access

Mais comme le lien est créé avec un Response.Write dans ListFolderContents qui est, elle-même, appelée dans ma première page ASP, je pense que je me mélange les pinceaux et j'ai systématiquement une erreur quand je clic sur les liens. Mon appel de fonction ne marche pas !

En gros, comment est-ce possible d'appeler une sub VBScript de ma bibliothèque depuis un lien généré dynamiquement sur une page asp via une autre sub de la bibliothèque ?

Merci d'avance pour votre aide !

A