Function SQL ?

Bonjour à tous,

Je fais un formulaire qui fait appel à la fonction Comment (ci-dessous) dans un select OnChange. L'idée est d'avoir un prix unitaire et un libellé d'article en fonction d'une référence.
J'attaque une base MS-Access.
Il semble que j'ai une erreur en ligne 5 ??
Pensez-vous que ma fonction est correcte ?

Par avance merci.


1 - 0function Comment(Ref, Lib, Prix)
2 -  {
3 -  var v_ref = Ref.value;
4 -  var v_uo = Server.CreateObject("ADODB.Recordset");
5 -  v_uo.ActiveConnection = "dsn=CSR-IEX;";
6 -  v_uo.Source = "SELECT * FROM Devis_UO where UO_TAF = 'N-P-PROF4'";
7 -  v_uo.CursorType = 0;
8 -  v_uo.CursorLocation = 2;
9 -  v_uo.LockType = 3;
10 -  v_uo.Open();
11 -  Lib.value = v_uo.Fields.Item("Libelle").Value;
12 -  Prix.value = v_uo.Fields.Item("PU").Value;
13 -  }

pas tout mis...

 var sql = "SELECT * FROM Noms WHERE nom_champ_dans_base='valeur'";
 db.Open(sql,connect);

Cordialement. Bul. ~ Site ~

Merci pour tes solutions !

J'ai le message d'erreur :
Gestion de pilotes ODBC - Source de données introuvable et nom de pilote non spécifié.


Voic mon script :

function Comment(Ref, Lib, Prix)
 {
 var v_ref = Ref.value;
 
 var db =new ActiveXObject( "ADODB.Recordset" );
 var driver = "Driver={Microsoft Access Driver (D:\cetus\csriex\BasesAccess\CsrIex.mdb)};";
 var connect = driver + "DBQ=CSR-IEX" ;
 var sql = "SELECT * FROM Devis_UO WHERE UO_TAF='N-P-PROF4'";
 db.Open(sql,connect);

 Lib.value = db.Fields.Item("Libelle").Value;
 Prix.value = db.Fields.Item("PU").Value;
 }

var db =new ActiveXObject( "ADODB.Recordset" );
 var driver = "Driver={Microsoft Access Driver (D:\cetus\csriex\BasesAccess\CsrIex.mdb)};";
 var connect = driver + "DBQ=CSR-IEX" ;

ça ne correspond pas à ce qui marche chez moi et l'exemple que j'ai donné.

 var db =new ActiveXObject( "ADODB.Recordset" );
 var driver = "Driver={Microsoft Access Driver (*.mdb)};";
 var connect = driver + "DBQ=D:\cetus\csriex\BasesAccess\CsrIex.mdb" ;

et dans D:\cetus\csriex\BasesAccess\CsrIex.mdb
peut-être / ou \\ au lieu de \  (qui est le caractère d'échappement en JavaScript)
et/ou entre ' ?

Cordialement. Bul. ~ Site ~