Pbm de pilotes ODBC pour une base access avec ASP sous XP
Pbm de pilotes ODBC pour une base access avec ASP sous XP - Programmation
Marsh Posté le 04-01-2002 à 13:59:43
Déjà rajoute Option Explicit au début de la page et déclare clairement tes variables au début du script comme suit :
Option Explicit
Dim objASPError, blnErrorWritten, strServername, strServerIP, strRemoteIP
Dim strMethod, lngPos, datNow, strQueryString, strURL
De plus la déclaration @language="VBScript" est inutile car par défaut c'est le langage employé.
Essaie comme ça déjà car sinon ta syntaxe semble correcte.
Sujets relatifs:
- ASP et CSS : Attribution dynamique de feuille de style
- [ visual Basic ] problème de base de BDD.
- Access - builder c++
- PHP ou ASP ?
- ASP
- [vb] intérroger une base sql
- hébergeurs et ASP / PHP / ColdFusion
- [ASP et SQL] Probléme pour récupérer la valeur de la fonction sql MAX
- [tcl] Connection avec un eggdrop a une base SqL
Marsh Posté le 04-01-2002 à 11:08:10
Voila mon pbm:
je veux accéder à une base Access avec ASP
j'utilise XP et le serveur IIS
j'ai bien déclaré ma base sur l'ODBC
Voici mon code :
<%@ LANGUAGE="VBSCRIPT" %>
<HTML>
<!--------------- Created By EasyASP --------------->
<!----------- Copyright 2000 Eric Banker ----------->
<HEAD>
<title>Lecture du contenu de la base</title>
</HEAD>
<body bgcolor="#FFFFFF" text="#000000" link="#804040" vlink="#008080" alink="#004080">
<!---------------- Insert Text Here ---------------->
<BR><BR>
<p align="center"><B><font size="5">Lecture du contenu de la base</font></B></p>
<BR><BR>
<%
'ouverture d'une connection avec la base visiteurs
set baselink = server.createobject("ADODB.connection" )
baselink.open "visiteurs", "", ""
'Instructions SQL
varSQL = "select * from pays order by nom"
'Création d'un jeu d'enregistrements
set baseset = server.createobject("ADODB.recordset" )
baseset.open varSQL, baselink
'affichage des entrées pays
do while not baseset.EOF
%>
<p align="center"><B><% =baseset("nom" ) %></B><p>
<%
baseset.movenext
loop
'fermeture de la base de données
baseset.close
baselink.close
set baseset = nothing
set baselink = nothing
%>
</BODY>
</HTML>
Voici la réponse :
Lecture du contenu de la base
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
--------------------------------------------------------------------------^
Microsoft OLE DB Provider for ODBC Drivers error '80004005'
[Microsoft][Gestionnaire de pilotes ODBC] Source de données introuvable et nom de pilote non spécifié
/test01.asp, line 17
Je pense que cela vient de XP car sous win98 et win2000 cela fonctionne.
Quelqu'un a t-il une idée ?
Merci
---------------
L'important n'est pas ce que l'on dit mais ce que l'on fait.