VOila je doit rendre mon site aujourd'hui, sauf il me reste des petits problème assez récurrents tout de même.

Tout d'abord, pour le formulaire administrateur, j'ai ce 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
<% 
                                     	dim guignol
										  	dim datarticle 
											dim nom_article 
											dim nomlien 
											dim pblarticle 
											dim objCnx 
											dim dateart 
											dim mySql
											if Len(Request.Form("Btn_enregistrer")) > 0 Then
     										flot =Request.Form("num_article")
											datarticle =Request.Form("datzrticle")
											nom_article =Request.Form("nom_article")
											dateart =Request.Form("date_article")
											nomlien =Request.Form("lien article")											
											pblarticle =Request.Form("publ_article")
											set objCnx = dbConnect("BNW0001B" , "IUSR_BNW0001B" , "VF85DS" , "") 
											mySql="Insert Into BREVE( nom_breve, date_breve, lien, num_publication) VALUES ( ' " & nomarticle & " ' , ' " & datarticle & " ' ,  ' " & nomlien & " ' , ' " & pblarticle & " ' )"										
											objCnx.Execute( mySql )
											dbDisconnect( objCnx )
											end if
											%>
Il marche mais une fois que j'ouvre lâ table brève surprise elle est bien incrémentée d'une nouvel enregistrement mais toute les valeur sont à zero?
Si quelqu'un voit d'ou ça peut venir je vois pas.

Deuxième soucis:

Lors de mon insertion d'actualité dans ma page actualité, j'ai deux tableau qui se crée pour n'importe quelle semaine. DOnc le code doit avoir une petite erreur mais je vois pas ou, car je lit bien mon tableau pour ensuite renvoyer chaque ligne sous forme de tableau sous ma page non?
VOici le 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
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
<%
											if Len(Request.Form("Cmd_semaine")) > 0 Then
dim objRecordset
dim numero
dim i
dim j
dim objCnx
numero=Request.Form("num_semaine")	
i=2
j=0
dim tab (50,5)
dim SQL
set objCnx = dbConnect("BNW0001B" , "IUSR_BNW0001B" , "VF85DS" , "") 
 
 
                        SQL= " SELECT num_cas , nom_cas , lien ,date_cas , date_publication FROM CASPRATIQUE, PUBLICATION WHERE PUBLICATION.num_publication=CASPRATIQUE.num_publication ORDER BY date_publication"
 
set objRecordset=Server.CreateObject("ADODB.Recordset")
objRecordset.Open SQL, objCnx
Do While Not objRecordset.EOF
                                    tab(i, 1)=objRecodset(CStr(num_cas))
                                    tab(i,2)=objRecodset(CStr(nom_cas))
                                    tab(i,3)=objRecodset(CStr(lien))
                  					  tab(i,4)=objRecodset(CStr(date_cas))
                                     tab(i,5)=objRecodset(CStr(date_publication))
 
                                   i=i+1
 
										objRecordset.MoveNext
 
										Loop
										objRecordset.Close
										Set objRecordset=Nothing                    
	end if
											%>
 
											<%
											FOR j =1 to i
											%>
							<table border="1" width="100%" height="37">				
                            <tr>
                              <td width="87%" height="27" valign="top"><input type="text" name="Txt_titre" size="73" value="<%=tab(j,1)%>"></td>
                              <td width="13%" height="27" valign="top"><input type="text" name="date" size="20" value="<%=tab(j, 2)%>"></td>
                            </tr>
                            <tr>
                              <td width="87%" height="1">
                                <form method="POST" action="--WEBBOT-SELF--">
                                  <!--webbot bot="SaveResults" startspan
                                  U-File="_private/form_results.txt"
                                  S-Format="TEXT/CSV" S-Label-Fields="TRUE" --><input TYPE="hidden" NAME="VTI-GROUP" VALUE="1"><!--webbot
                                  bot="SaveResults" endspan -->
                                  <p><input type="button" value="Telecharger" name="Cmd_actutel" value="<%=tab(j, 3)%>"></p>
                                </form>
                              </td>
                              <td width="13%" height="1">
                                <form method="POST" action="--WEBBOT-SELF--">
                                  <!--webbot bot="SaveResults" startspan
                                  U-File="_private/form_results.txt"
                                  S-Format="TEXT/CSV" S-Label-Fields="TRUE" --><input TYPE="hidden" NAME="VTI-GROUP" VALUE="2"><!--webbot
                                  bot="SaveResults" endspan -->
                                  <p><input type="button" value="Commentaire" name="Cmd_commentaire" value="<%=tab(j, 4)%>"></p>
                                </form>
                              </td>
                            </tr>
 
 </table>
 
 <%
                                 NEXT 
                            %>
Voila les deux bug que j'ai sur mon site si quelqu'un pouvait m'aider merci!!
Cordialement