VBS et connexion base de donnée

[Travailleuuse06]

Bonjour,
je voudrais pouvoir connecter ma base de donnée et un fichier vbs. J'ai utilisé pour c a OBDC

Set Conn = CreateObject("ADODB.Connection")
Conn.Open "essaiodbc"

sql="select * from table_essai"
set rs=CreateObject("ADODB.Recordset")
rs.Open sql,Conn
indice=0
while not rs.eof
 requete = "SELECT ancien_img_ FROM table_essai"
 verif_ancien = rs.Open requete ,Conn
 If verif_ancien = "Ancien" Then
 MsgBox "ancien"
 Else
 req = "SELECT lien_img_ FROM table_essai"
 	
 End If

rs.movenext : wend
rs.close : set rs=nothing
conn.close : set conn=nothing

Or on dirait qu'il n'y a aucune lecture de ma base...Comment faire????

[Kikof]

Salut,

De quelle type de base de données s'agit-il ? Tu n'as pas spécifié le pilote à utiliser.
Si tu as un message d'erreur, et normalement tu as dû en avoir un, il est de bon ton de le préciser.

Par exemple pour MSAccess, on ouvre ainsi :

set conn = CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0" '<- Pilote à spécifier ici
conn.Open "C:\drv\db1.mdb" '<- spécifier le fichier ici, avec son extension
set rs = CreateObject("ADODB.Recordset")
rs.Open "SELECT * FROM table_essai", conn

Ton code par ailleurs n'a pas trop de sens :

requete = "SELECT ancien_img_ FROM table_essai"
verif_ancien = rs.Open requete ,Conn

Ici il suffit de lire avec : verif_ancien=rs("ancien_img_")

Else
req = "SELECT lien_img_ FROM table_essai"

End If

Et là je suppose que tu veux utiliser le contenu du champ lien_img_. Par exemple pour l'afficher, il faut faire : wscript.echo rs("lien_img_")