Rafraichissement page ASP [Résolu]

fgerard · 31/08/2006, 11h49

Dans la meme page ASP, :

j'affiche un tableau contenant des donnees d'une table de BD.
J'ai fait un formulaire pour ajouter des lignes à cette meme table.

Quand on clique sur "envoyer" on revient sur la meme page et j'aimerais qu'apparaissent les nouvelles donnees.
Mais on ne les voit pas alors qu'elles sont bien dans la BD.
Je suis obligee de faire "rafraichir" pour voir la nouvelle ligne.
Comment puis-je faire pour que les nouvelles données soient visibles tout de suite ?

pc75 · 31/08/2006, 13h00

Bonjour,

Un peu de code nous aiderait à voir ton problème, mais là !

Pymm · 31/08/2006, 13h02

Oui et je dirais surtout la partie ou tu affiches les données.

Mateache · 31/08/2006, 13h03

en javascript :

Code :

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

document.location.reload();

tu le met apres le traiement vers la base de données

Immobilis · 31/08/2006, 13h45

Salut,

Si la page se soumet sur elle mm il faut faire des procédures.
La séquence serait
1- entrée dans la page
2- mise à jour des données si besoin
3- interrogation de la base pour afficher les données.

A+

fgerard · 31/08/2006, 13h47

Voilà mon code total :

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
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
<html>
 
<head>
<meta http-equiv="Content-Language" content="fr">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<title>livredor2</title>
</head>
 
<body>
 
&nbsp;
<%
' Création de l'objet permettant la connexion
Set Conn = Server.CreateObject("ADODB.Connection")
' Connexion
Conn.Open "test"%>
 
 
<img border="0" src="livre.jpg"><p>&nbsp;</p>
<p>&nbsp;</p>
<div align="center">
  <center>
 
<table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse; font-family:Verdana; font-size:8pt" bordercolor="#111111" width="411" id="AutoNumber1" bordercolorlight="#FF00FF">
 
 
 <tr>
    <td width="51"><font color="#0000FF">id-message</font></td>
    <td width="71"><font color="#0000FF">nom</font></td>
    <td width="109"><font color="#0000FF">message</font></td>
    <td width="51"><font color="#0000FF">date</font></td>
    <td width="123"><font color="#0000FF">adresse-mail</font></td>
 
  </tr>
  <%' Sélectionne toutes les fiches de la table "TLivre"
SQL="SELECT * FROM TLivre"
Set RS = server.createobject("ADODB.Recordset")
RS.Open SQL,Conn , 3, 3
'
<!--                            ="commentaire" -->
' tant qu'il y a des fiches
while not RS.eof %>
  <tr>
    <td width="51"><%=RS("N°")%></a>&nbsp;</td>
    <td width="71"><%=RS("nom")%></a>&nbsp;</td>
    <td width="109"><%=RS("message")%>&nbsp;</td>
    <td width="51"><%=RS("dateL")%></a>&nbsp;</td>
    <td width="123"><%=RS("mail")%>&nbsp;</td>
<!--webbot bot="PurpleText" PREVIEW="commentaire" -->
  </tr>
 
  <%RS.MOVENEXT ' fiche suivante
wend%>
 
</table>
  </center>
</div>
<% ' Deconnexion
 Conn.Close 
SET Conn=Nothing %>
 
<!-- description du formulaire -->
&nbsp;<p>&nbsp;</p>
<p align="center"><font face="Verdana" size="2">Ajouter des données à la base</font></p>
<form method="POST" action="livredor2.asp">
  <p align="center">&nbsp;</p>
  <!-- <p align="left"><font face="Verdana" size="2">Votre nom :</font>-->
 
  <input type="hidden" name="N°" value="0">
 
  <p align="left"><font face="Verdana" size="2">Votre nom :</font>
  <input type="text" name="nom" size="20"></p>
  <p align="left"><font face="Verdana" size="2">Votre message : </font>
  <input type="text" name="message" size="50"></p>
  <p align="left"><font face="Verdana" size="2">votre mail :
  <input type="text" name="mail" size="30"></font></p>
  <p align="left"><input type="submit" value="Envoyer" name="action">
                  <input type="reset" value="Rétablir" name="B2"></p>
</form>
<p align="center">&nbsp;</p>
<p align="center">&nbsp;</p>
<p>&nbsp;</p>
 
&nbsp;
</body>
</html>
 
 
<!--  recuperation donnees formulaire -->
<% ' Création de l'objet permettant la connexion
Set Conn = Server.CreateObject("ADODB.Connection")
' Connexion
Conn.Open "test" %><!--
'   pour creation nouvelle ligne de table à partir du formulaire 
'        ------------------------------------------------------- 
   RS.addnew
   RS("nom")=Request.form("nom")
   RS("message")=Request.form("message")
   RS("mail")=Request.form("mail")
   RS("dateL")=now() 
   RS.update 
   If nom <> "" then
   ' passage--><% 
   nom=Request.form("nom")
   message=Request.form("message")
   mail=Request.form("mail")
  if nom <> "" then
   RequeteSQL = "Insert into TLivre (nom, message, dateL,mail) Values ('"&nom&"','"&message&"','"&now()&"','"&mail&"')"
    Set RS = server.createobject("ADODB.Recordset")
    RS.Open RequeteSQL,Conn , 3, 3
  end if 
    %>
<% ' Deconnexion
Set RS=Nothing
    nom=Nothing 
 Conn.Close 
SET Conn=Nothing %>

Mateache · 31/08/2006, 14h09

Citation:

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
<!--  recuperation donnees formulaire -->
<% ' Création de l'objet permettant la connexion
Set Conn = Server.CreateObject("ADODB.Connection")
' Connexion
Conn.Open "test" %><!--
'   pour creation nouvelle ligne de table à partir du formulaire 
'        ------------------------------------------------------- 
   RS.addnew
   RS("nom")=Request.form("nom")
   RS("message")=Request.form("message")
   RS("mail")=Request.form("mail")
   RS("dateL")=now() 
   RS.update 
   If nom <> "" then
   ' passage--><% 
   nom=Request.form("nom")
   message=Request.form("message")
   mail=Request.form("mail")
  if nom <> "" then
   RequeteSQL = "Insert into TLivre (nom, message, dateL,mail) Values ('"&nom&"','"&message&"','"&now()&"','"&mail&"')"
    Set RS = server.createobject("ADODB.Recordset")
    RS.Open RequeteSQL,Conn , 3, 3
    response.redirect("livredor2.asp")
  end if 
    %>
<% ' Deconnexion
Set RS=Nothing
    nom=Nothing 
 Conn.Close 

SET Conn=Nothing %>

Je t'ai mis ce qu'il faut rajouter en rouge.
Oublie pas la balise code la prochaine fois

fgerard · 31/08/2006, 14h48

Désolée pour la balise code, je ne l'avais pas vue.

Pour le code, Merci, ca marche !!

31/08/2006, 13h00	#2
pc75 Expert Confirmé Inscription : septembre 2004 Messages : 2 807 Détails du profil Informations personnelles : Âge : 56 Localisation : France, Paris (Île de France) Informations forums : Inscription : septembre 2004 Messages : 2 807 Points : 3 005 Points : 3 005	Bonjour, Un peu de code nous aiderait à voir ton problème, mais là ! __________________ Par principe, je ne réponds pas aux messages URGENT. Il n'y a pas de choses urgentes, il n'y a que des choses en retard. (un inconnu)
	00

31/08/2006, 13h02	#3
Pymm Membre chevronné Inscription : janvier 2004 Messages : 633 Détails du profil Informations forums : Inscription : janvier 2004 Messages : 633 Points : 651 Points : 651	Oui et je dirais surtout la partie ou tu affiches les données. __________________ + + http://www.developpez.net/forums/tem...ini_search.gif = ...enfin le plus souvent
	00

31/08/2006, 13h45	#5
Immobilis Expert Confirmé Sénior Inscription : mars 2004 Messages : 5 849 Détails du profil Informations forums : Inscription : mars 2004 Messages : 5 849 Points : 5 965 Points : 5 965	Salut, Si la page se soumet sur elle mm il faut faire des procédures. La séquence serait 1- entrée dans la page 2- mise à jour des données si besoin 3- interrogation de la base pour afficher les données. A+ __________________ Twitter widget Minichat multicast UDP sous Mango Linq to SQL vs SQL vs Entity Framework C# Google Distance Matrix Import/export de données en ASP.Net, L'architecture multicouche, Internationalisation en ASP.Net
	00

31/08/2006, 11h49	#1
fgerard Invité de passage Inscription : août 2006 Messages : 16 Détails du profil Informations forums : Inscription : août 2006 Messages : 16 Points : 3 Points : 3	Rafraichissement page ASP Dans la meme page ASP, : j'affiche un tableau contenant des donnees d'une table de BD. J'ai fait un formulaire pour ajouter des lignes à cette meme table. Quand on clique sur "envoyer" on revient sur la meme page et j'aimerais qu'apparaissent les nouvelles donnees. Mais on ne les voit pas alors qu'elles sont bien dans la BD. Je suis obligee de faire "rafraichir" pour voir la nouvelle ligne. Comment puis-je faire pour que les nouvelles données soient visibles tout de suite ?
	00

31/08/2006, 13h03	#4
Mateache Membre régulier Inscription : juillet 2005 Messages : 161 Détails du profil Informations forums : Inscription : juillet 2005 Messages : 161 Points : 92 Points : 92	en javascript : Code : Sélectionner tout - Visualiser dans une fenêtre à part document.location.reload(); tu le met apres le traiement vers la base de données
	00

31/08/2006, 14h48	#8
fgerard Invité de passage Inscription : août 2006 Messages : 16 Détails du profil Informations forums : Inscription : août 2006 Messages : 16 Points : 3 Points : 3	Désolée pour la balise code, je ne l'avais pas vue. Pour le code, Merci, ca marche !!
	00

Outils de la discussion
Afficher une version imprimable Envoyer un lien vers cette page par email