HTTP 500 - Erreur interne de serveur

**VIRGINIE87** · 15/04/2008, 18h39

bonjour,
je tente de m'initier à l'asp et deja je galere
je teste l'exemple que j'ai trouvé dans un bouquin pour lire le contenu d'une base de donnée Access

iis a été installé sous xp pro j'ai testé le serveur avec l'heure et la date et tout fonctionne
au niveau de odbc j'ai cree un dsn systeme, la source de donnée sappelle Visiteurs et le chemin est c:\inetput\wwwroot\Visiteurs.mdb
lorsque je souhaite ouvrir ma page Visiteurs.asp situé dans c:\inetput\wwwroot\ j'obtient l'erreur suivante :

HTTP 500 - Erreur interne de serveur
Internet Explorer

voici mon 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
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
<% @ LANGUAGE="VBSCRIPT"%>
 
<html>
<head>
<TITLE>Lecture du contenu de la base</TITLE>
</head>
 
<body>
 
<br><br>
<p align="center"><strong><font size="5">Lecture du contenu de la base</font></strong></p>
</br></br>
 
 
 
<% 
' Ouverture d4une connexion avec la base Visiteurs
Set BaseLink = Server.CreateObject("ADODB.Connection")
BaseLink.Open "Visiteurs"
 
'Creation de l'instruction SQL
varSQL = "SELECT * FROM Pays ORDER BY nom"
 
' Creation du jeu d'enregistrements
Set BaseSet = Server.CreateObjet("ADODB.RecordSet")
BaseLink.Open VarSql, BaseLink
 
'Affichage des entrées Pays
Do.While Not BaseSet.EOF
%>
 
<P align="center"><STRONG><%=BaseSet("nom")%></STRONG></P>
<%
BaseSet.MoveNext
Loop
 
'Fermeture de la base de donnée
BaseSet.Close
BaseLink.close
Set BaseSet = Nothing
Set BaseLink = Nothing
%>
 
 
</body>
</html>

donc d'ou peux venir cette erreur?
est ce que c'est pas un probleme au niveau de ODBC
la solution ideale n'est t elle pas de se connecter sans lien vers ODBC ?

**Immobilis** · 15/04/2008, 22h18

Salut,

L'erreur vient peut-être d'ailleurs. Probablement ici:

Code :

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

Do.While Not BaseSet.EOF

Tu peux afficher les erreurs détaillées en modifiants les options de ton navigateur. Sur IE Outils > Options Internet > Avancé > Décocher "Afficher les messages http simplifiés".

A+

**VIRGINIE87** · 15/04/2008, 22h22

j' ai suivi tes conseils voila le message d'erreur obtenu :

Erreur de compilation Microsoft VBScript error '800a0404'

'While', 'Until' ou fin d'instruction attendu

/Visiteurs.asp, line 28

Do.While Not BaseSet.EOF

**Immobilis** · 15/04/2008, 22h34

Y'a pas de point entre le do et le while.

A+

**VIRGINIE87** · 15/04/2008, 22h36

si je rectifie par :

Code :

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

Do While Not BaseSet.EOF

j'obtient le message suivant :

Erreur d'exécution Microsoft VBScript error '800a01b6'

Cet objet ne gère pas cette propriété ou cette méthode: 'CreateObjet'

/Visiteurs.asp, line 24

encore une faute d'orthographe voici ma modification :

Code :

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

1
2
3
'Ouverture d'une connexion avec la base Visiteurs
Set BaseSet = Server.CreateObject("ADODB.RecordSet")
BaseLink.Open VarSql, BaseLink

ENCORE UN MESSAGE D'ERREUR

ADODB.Connection error '800a0e79'

Cette opération n'est pas autorisée si l'objet est ouvert.

/Visiteurs.ASP, line 25

**Immobilis** · 15/04/2008, 22h44

Hum, hum:

Code :

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

Server.CreateObjet

Object pas Objet. C'est de l'anglais.

A+

**VIRGINIE87** · 15/04/2008, 22h54

alors la je suis un peu coincé je ne trouve plus de faute d'orthographe

**roro06** · 16/04/2008, 09h53

Bonjour

BaseLink.Open VarSql, BaseLink

C'est :

Code :

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

BaseSet.Open VarSql, BaseLink

HTTP 500 - Erreur interne de serveur

ASP

Discussions similaires

Partager

Partager