Incompréhension : problème d'un script ASP

**Rocket666** · 26/08/2006, 16h21

Bonjour,

Je demande votre aide car après pas mal de recherche je ne sais plus quoi faire et je bloque sur ce problème.

Je suis en train de faire migrer un "progiciel" (c'est à dire un site web entièrement personnalisable à l'aide d'interfaces...) d'un serveur à un autre.

J'ai déjà résolu pas mal de mes problème mais la je suis confronté à l'erreur :

error '80020009'
/site1/site/activite/fiche_bien_modif.asp, line 62

quand je veux créer une nouvelle page par l'interface (la page est bien crée mais j'arrive sur cette page d'erreur)

Je suis complétement bloqué. Je vous met le code du fichier ci-dessous :

<%
if session("langue") = 1 then
set Con = Server.CreateObject("ADODB.Connection")
con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("../clients/epa1971/outpost.mdb")
set connstring = Server.CreateObject("ADODB.Recordset")

elseif session("langue") = 2 then
set Con = Server.CreateObject("ADODB.Connection")
con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("../clients/"&session("password")&"/outpost-langue2.mdb")
set connstring = Server.CreateObject("ADODB.Recordset")

elseif session("langue") = 3 then
set Con = Server.CreateObject("ADODB.Connection")
con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("../clients/"&session("password")&"/outpost-langue3.mdb")
set connstring = Server.CreateObject("ADODB.Recordset")

elseif session("langue") = 4 then
set Con = Server.CreateObject("ADODB.Connection")
con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("../clients/"&session("password")&"/outpost-langue4.mdb")
set connstring = Server.CreateObject("ADODB.Recordset")

elseif session("langue") = 5 then
set Con = Server.CreateObject("ADODB.Connection")
con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("../clients/"&session("password")&"/outpost-langue5.mdb")
set connstring = Server.CreateObject("ADODB.Recordset")

end if

%>
<%
response.buffer=true
set rs5 = server.createobject("ADODB.Recordset")
sql5 = "select * from bouton_lien"
rs5.open sql5,con,2,3,1
%>

<%
session("id")=request("id")
id=session("id")
login_intranet=session("login_intranet")

SQL_INTRANET = "SELECT * FROM INTRANET WHERE login_intranet LIKE '" & login_intranet & "' "

sql = "select * from biens where id like '"&id&"'"

set rs = con.execute(SQL)
set rs_INTRANET = con.execute(SQL_INTRANET)

set rs1 = server.createobject("ADODB.Recordset")
sql1 = "select * from test_maj"
rs1.open sql1,con,2,3,1
set rs1 = con.execute(SQL1)

if rs("dossier")<> "non" then

if rs_INTRANET.EOF then
Response.Redirect "login_membre.htm"
else
end if

if session("dossier_intranet") <> rs("dossier") then
response.redirect"login_membre.htm"
end if
else
end if
a=rs("dossier")
%>
<html>
<head>

<%if rs5("lien_activite")="../activite/fiche_vierge.asp" then
response.redirect"fiche_vierge.asp"
end if%>
<%if rs5("lien_activite")="../activite/fiche_bien2.asp" then
response.redirect"fiche_bien2.asp"
end if%>
<%if rs5("lien_activite")="../activite/fiche_menu.asp" then
response.redirect"../gd/fiche_menu_modif.asp"
end if%>
<%if rs5("lien_activite")="../activite/fiche_menu_deroulant.asp" then
response.redirect"../gd/fiche_menu_deroulant_modif.asp"
end if%>
<% rs.close
set rs = nothing

rs1.close
set rs1 = nothing

rs5.close
set rs5 = nothing

con.close
set con=nothing
%>

et l'erreur se situe dans cette ligne :

if rs("dossier")<> "non" then

Un grand merci d'avance à ceux qui s'attarderont sur mon problème.

++

**Philoulheinz** · 27/08/2006, 10h54

Bonjour,

- As-Tu vérifié qu'il y a qqch dans rs("dossier") (ça se pourrait que rs soit vide)?
- De quel type est rs("dossier"): du texte ? un nombre ?

Phil

**Rocket666** · 27/08/2006, 12h11

Bonjour,

Merci de te pencher sur mon problème.

- J'ai vérifié qu' rs("dossier") ne soit pas vide est il ne l'est pas (il contient "vgt1924" qui correspond à un dossier du ftp).

- rs("dossier") est un champ TEXTE

**Philoulheinz** · 27/08/2006, 20h21

Je pense pas que je puisse t'aider plus alors

je n'utilise pas couramment l'asp.
Ce que je ferais : je mets en commentaire ce qui n'est pas nécessaire (les 4 lignes au dessus de la ligne 62 par ex) et je décommente au fur à mesure. Ca se peut que l'erreur se situe autre part que la ligne indiquée.

En espérant que tu puisses résoudre ton problème, tiens moi au courrant ça m'intéresse de savoir ce qui n'allait pas, merci

bonne soirée,
P

**Pymm** · 28/08/2006, 09h02

Salut,
La variable dans laquelle tu stockes ta requeteest en minuscule et quand tu l'appellestu l'écrit en majuscule est-ce une erreur de frappe ?
testes en uniformisant les noms.

**Mateache** · 28/08/2006, 09h23

Vu que tu as beaucoup de recordset as tu verifier que "rs" contienne bien le champ dossier ?

Incompréhension : problème d'un script ASP

ASP

Vue hybride

Discussions similaires

Partager

Partager