Discussion :

[Morane]

Je débute en VBScript. Jusqu'à présent, j'utilisais avec succès le contrôle ActiveX TDC (Tabula Data Control) avec le script JavaScript suivant (il lit les données dans un fichier texte .csv) :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
<SCRIPT LANGUAGE="Javascript">
  function debut()
    {source.recordset.MoveFirst();}
  function precedant()
    {source.recordset.MovePrevious();
      if (source.recordset.BOF)
        source.recordset.MoveFirst();}
  function suivant()
    {source.recordset.MoveNext();
      if(source.recordset.EOF)
        source.recordset.MoveLast();}
  function fin()
    {source.recordset.MoveLast();}
</SCRIPT>

Je voudrais maintenant l'utiliser aussi avec VBScript. J'ai essayé la traduction suivante :

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
<SCRIPT LANGUAGE="VBscript">
  Function first()
     source.recordset.MoveFirst()
  End Function
  Function previous()
     source.recordset.MovePrevious()
     If source.recordset.BOF Then
        source.recordset.MoveFirst()
     end If
  End Function
  Function next()
     source.recordset.MoveNext()
     If source.recordset.EOF Then
        source.recordset.MoveLast()
     End If
  End Function
  Function last()
    source.recordset.MoveLast()
  End Function
</SCRIPT>

mais les boutons ne répondent pas. La définition des fonctions n'est donc pas correcte. Quelqu'un pourrait-il m'aider ?

[Flamby38]

pourquoi ne pas executer pas à pas pour voir ou ca ne marche pas?
Personnelement je trouve ca bizarre d'avoir du vbscript dans une page web, javascript semble plus standard.

[Morane]

Bonjour Flamby38, et merci. J'ai essayé de modifier pas à pas, mais sans succès, probablement parce que je débute. Quant à VBScript, j'essaie de m'y mettre, car mon but est un usage strictement local et sous Windows de données. VBScript me permettrait en plus d'écrire (chose impossible avec Javascript) dans un fichier texte sans passer par PHP et un serveur local. Je reste persuadé que si le script Javascript ci-dessus marche, un script VBScript analogue devrait a fortiori marcher.

[Morane]

J'ai résolu le problème. Amitiés.