Problème d'accès à une BD via ASP

**beegees** · 08/06/2005, 12h19

Bonjour le forum,

On me demande de visualiser les données d'une table access sur le net.

Etant donné que je suis super débutant, j'ai acheté quelques livres dont "Access 2002 Cookbook".

J'ai suivi pas à pas pour installer le serveur web, j'ai fais le test avec la date et l'heure ainsi que le test de se connecter à une base de donnée et de s'y déconnecter, tout cela fonctionne.

Mais j'ai rédiger (avec Dreamweaver MX) ce code

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
 
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
Dim cnn
dim rst
 
'Ouverture d'une connexion
set cnn = Server.CreateObject("ADODB.Connection")
cnn.open "DSN=PharmacieTest"
set rst = "Server.CreateObject("ADODB.Recordset")
rst.open "Select * FROM [Grade];", cnn
 
While Not rst.EOF
response.Write rst("MoyPonderee2002(P5)")
 
rst.movenext
WEND
 
Rst.close
set rst = nothing
cnn.close
set cnn = Nothing
%>

et il me donne ce message d'erreur :

Erreur de compilation Microsoft VBScript error '800a0401'

Fin d'instruction attendue

/iisHelp/common/500-100.asp, line 11

Dim objASPError, blnErrorWritten, strServername, strServerIP, strRemoteIP Dim strMethod, lngPos, datNow, strQueryString, strURL
--------------------------------------------------------------------------^
Erreur de compilation Microsoft VBScript error '800a0401'

Fin d'instruction attendue

/Basedeteste/TMP3kh8ohrg6o.asp, line 9

set rst = "Server.CreateObject("ADODB.Recordset")
--------------------------------^

Quelq'un aurait-il une idée pour me sortir de ce pétrain.

Merci d'avance.
Bg's