fichiers INCLUDE + Base de Données + dynamique + pb de Mise A Jour
fichiers INCLUDE + Base de Données + dynamique + pb de Mise A Jour - ASP - Programmation
Sujets relatifs:
- Formulaire qui efface les données quand je valide et revient :(
- optimisation verifier si un ma variable est deja dans la base
- Accéder à une Base de données externe
- [SQL] [Résolu] "Mélange" de données
- Automatiser le téléchargement de fichiers de signatures
- Réalier une Base de donnée [Artiste original / Artiste Sample ]
- [CSS] Probleme de mise en page
- ocilogon - attaquer une base oracle avec php
- Modification de type de données dans une table
Marsh Posté le 15-07-2004 à 09:12:07
Voici ce qui marche (sans les fichiers inclusions donc):
<%@ Language=VBScript %>
<%'Response.Buffer=false%>(grace a ca,en utilisant response.flush a l'endroi voulu dans le code, c'est sensé vider le contenu de la"mémoire"(buffer) du serveur en destination du client.C'est à dire actualiser les données qui sont encore présente sur le serveur qui n'ont pas été encore envoyés au client.
<%Option Explicit%> (pour éviter les dupplication de variables, permet d'éviter qq conneries)
<!--#include file ="./adovbs.inc" -->(fichier MS qui comprend ttes les ctes du style adopenKeyset etc..)
<!--#include file ="./identiferr.asp" -->(fichiers qui se lance si une erreur survient;utilise la procédure handle("j'ecris ce que je veux ici" ); il se lance avec l'objet asperror (Err.Number,Err.Description entre autre)
<%'HACK:
dim objRecordset,sqlnom
%>
<%'HACK: incorporer directement la requete sql ici%>
<%'recherche du nom du rayon connaissant session("ra_id" )
sqlnom="select ra_nom "_
&" from rayon "_
&" where ra_id=" & session("ra_id" ) & " "
%>
<%
on error resume next
objRecordset.Open sqlnom, objConnect
HandleError("objRecordset.Open sqlnom dans B_famille, objConnect" )
'on error resume next
'Session("ra_nom" )=empty
Session("ra_nom" )=objRecordset("ra_nom" )
'Response.Write (objRecordset("ra_nom" ))
'Response.Write("ra_nom= " & Session("ra_nom" ))
'HandleError("Session(ra_nom)=objRecordset(ra_nom)" )
%>
<%objRecordset.Close%>
<%'Response.Flush%>
<%'call affRayonChoisi ()%>(pas utilisé ici; en fait cette procedure fait la meme chose que la ligne en dessous)
<h2>Rayon :<%=Session("ra_nom" )%> -</h2>
</td>
OK voila si vous avez compris comment ca marche voici ce qui marche pas:
<%@ Language=VBScript %>
<%'Response.Buffer=false%>
<%Option Explicit%>
<!--#include file ="./adovbs.inc"
<!--#include file ="./identiferr.asp"
<!--#include file ="./ODBC.asp" -->(fichier qui contient toutes les requetes sqlnotament la fameuse sqlnom; je vous donne en délail sont contenu à la fin)
<%
on error resume next
objRecordset.Open sqlnom, objConnect
HandleError("objRecordset.Open sqlnom dans B_famille, objConnect" )
'on error resume next
'Session("ra_nom" )=empty
Session("ra_nom" )=objRecordset("ra_nom" )
'Response.Write (objRecordset("ra_nom" ))
'Response.Write("ra_nom= " & Session("ra_nom" ))
'HandleError("Session(ra_nom)=objRecordset(ra_nom)" )
%>
<%objRecordset.Close%>
<%'Response.Flush%>
<%'call affRayonChoisi ()%>(pas utilisé ici; en fait cette procedure fait la meme chose que la ligne en dessous)
<h2>Rayon :<%=Session("ra_nom" )%> -</h2>
</td>
et enfin voici le contenu de <!--#include file ="./ODBC.asp" -->:
<%Response.Buffer=true%>
<HTML>
<HEAD>
<title>toutes les requetes ASP</title>
</HEAD>
<%
dim sqlnom
%>
<%'recherche du nom du rayon connaissant session("ra_id" )
sqlnom="select ra_nom "_
&" from rayon "_
&" where ra_id=" & session("ra_id" ) & " "
%>
</HTML>