Aide pour passer jscript -> vbscript

kenichii Messages postés 8 Date d'inscription mercredi 17 juin 2009 Statut Membre Dernière intervention 30 mars 2010 - 19 juin 2009 à 11:16
kenichii Messages postés 8 Date d'inscription mercredi 17 juin 2009 Statut Membre Dernière intervention 30 mars 2010 - 19 juin 2009 à 14:04
Bonjour,
J'ai un soucis il me faut passer cette ecriture qui est en jscript en vbscript.
Etant un debutant encor dans les 2 s'il etait possible que quelqu'un puisse m'aider

var oDb = Context.GetDB;
if (null == oDb)
{
Context.SetResult( 1, "  Problem creating the PRO DB object");
}
else
{
var oRs = new ActiveXObject("ADODB.Recordset");
var sSql = "SELECT * from Device WHERE sDisplayName LIKE 'C%'";
oRs = oDb.Execute(sSql);
while ( !oRs.EOF )
{
var sDisplay;
sDisplay = "" + oRs("sDisplayName")
oRs.Movenext
Context.NotifyProgress(sDisplay);
}  
Context.SetResult( 0, "   Ok");
}

Merci
Cordialement

1 réponse

kenichii Messages postés 8 Date d'inscription mercredi 17 juin 2009 Statut Membre Dernière intervention 30 mars 2010
19 juin 2009 à 14:04
Ou si vous avez une source pour m'aider à fair cette traduction.
Merci
0
Rejoignez-nous