ho fatto una pagina unendo le cose che mi hai detto e finalmente gia vedo la pagina del form senza errori...
scrivo il messaggio e al momento dell'invio compare
Microsoft OLE DB Provider for ODBC Drivers error '80040e14'
[Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression 'Iscritti.ID='.
/bbart/invia.asp, line 99
la quale linea bastarda è
sql2="Select * from Iscritti"
che si trova nella pagina da me fatta(per modo di dire da me :maLOL: così ...
ora mi ammazzacodice:<% Session.LCID = 1040 verifyAlreadyExist=false ID_Mittente=Session("ID") Titolo_Messaggio=Replace(Trim(Request.form("Titolo_Messaggio")),"'","''") Messaggio=Replace(Trim(Request.form("Messaggio")),"'","''") if ID_Mittente><"" and Titolo_Messaggio><"" and Messaggio ><"" then Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& Server.MapPath("data.mdb") Set rs=Server.CreateObject("ADODB.RecordSet") sql="Select distinct utente from tabella_utenti" rs.Open sql,Conn,3,3 do until rs.eof ID_Destinatario=rs("utente") sql2 = "Insert into MiniBlog (ID_mittente, ID_destinatario, Titolo_messaggio, Messaggio, Data_messaggio) values ('"&ID_mittente& "', '"&ID_destinatario&"', '"&Titolo_messaggio&", '"&Messaggio&", #" & now() & "#)" conn.execute sql2 rs.movenext loop rs.close set rs=nothing conn.close set conn=nothing end if %> <% if Session("ID")="" or Session("ID")=null then %> <script> function closeAll(){ window.opener.focus(); window.opener.location.href="default.asp" window.close(); } </script> <% Response.write("Ti devi prima loggare ..... Clicca Qui") else %> <% Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& Server.MapPath("data.mdb") Set rs=Server.CreateObject("ADODB.RecordSet") sql="Select * from Iscritti where Iscritti.ID=" & Session("ID") rs.Open sql,Conn,3,3 %> <% Set rs2=Server.CreateObject("ADODB.RecordSet") sql2="Select * from Iscritti" rs2.Open sql,Conn,3,3 if verifyAlreadyExist=false then %> <form action="invia.asp" method="POST" name="inputForm"> <TABLE BORDER="0" CELLPADDING="0" CELLSPACING="0" WIDTH="380" HEIGHT="299" align='center'> <TR> <TD ROWSPAN="5" COLSPAN="1" WIDTH="34" HEIGHT="126"> [img]img_invia/invia_1x1.gif[/img]</TD> <TD ROWSPAN="1" COLSPAN="1" WIDTH="324" HEIGHT="18"> [img]img_invia/invia_1x2.gif[/img]</TD> <TD ROWSPAN="5" COLSPAN="1" WIDTH="22" HEIGHT="126"> [img]img_invia/invia_1x3.gif[/img]</TD> </TR> <TR> <TD ROWSPAN="1" COLSPAN="1" WIDTH="324" HEIGHT="34"> [img]img_invia/invia_2x1.gif[/img]</TD> </TR> <TR> <TD ROWSPAN="1" COLSPAN="1" WIDTH="324" HEIGHT="11"> [img]img_invia/invia_3x1.gif[/img]</TD> </TR> <TR> <TD WIDTH="324" HEIGHT="20" background="img_invia/invia_4x1.gif"> <input type="text" name="Titolo_Messaggio" size="50" style="border: 1px solid #8D9AA8" maxlength="20" value="da <%=rs("user")%>"></TD> </TR> <TR> <TD WIDTH="324" HEIGHT="43" background="img_invia/invia_5x1.gif"> <font face="Verdana" size="1">Altre Faccine</font></TD> </TR> <TR> <TD WIDTH="34" HEIGHT="128" background="img_invia/invia_6x1.gif"> </TD> <TD WIDTH="324" HEIGHT="128" background="img_invia/invia_6x2.gif"> <p align="center"> [img]faccine/5.gif[/img] [img]faccine/13.gif[/img] [img]faccine/12.gif[/img] [img]faccine/11.gif[/img] [img]faccine/1.gif[/img] [img]faccine/20.gif[/img] [img]faccine/15.gif[/img] [img]faccine/27.gif[/img] [img]faccine/24.gif[/img] [img]faccine/23.gif[/img] [img]faccine/22.gif[/img] [img]faccine/25.gif[/img] <textarea rows="5" name="Messaggio" cols="34"></textarea><font face="Verdana"><font style="font-size: 9pt" size="1"> <input type="submit" value="Invia Messaggio" name="B1" style="border: 1px solid #8D9AA8"></font></font></p> </TD> <TD WIDTH="22" HEIGHT="128" background="img_invia/invia_6x3.gif"> </TD> </TR> <TR> <TD ROWSPAN="2" COLSPAN="1" WIDTH="34" HEIGHT="27"> [img]img_invia/invia_7x1.gif[/img]</TD> <TD ROWSPAN="1" COLSPAN="1" WIDTH="324" HEIGHT="11"> [img]img_invia/invia_7x2.gif[/img]</TD> <TD ROWSPAN="2" COLSPAN="1" WIDTH="22" HEIGHT="27"> [img]img_invia/invia_7x3.gif[/img]</TD> </TR> <TR> <TD ROWSPAN="1" COLSPAN="1" WIDTH="324" HEIGHT="16"> [img]img_invia/invia_8x1.gif[/img]</TD> </TR> <TR> <TD ROWSPAN="1" COLSPAN="1" WIDTH="34" HEIGHT="18"> [img]img_invia/invia_9x1.gif[/img]</TD> <TD ROWSPAN="1" COLSPAN="1" WIDTH="324" HEIGHT="18"> [img]img_invia/invia_9x2.gif[/img]</TD> <TD ROWSPAN="1" COLSPAN="1" WIDTH="22" HEIGHT="18"> [img]img_invia/invia_9x3.gif[/img]</TD> </TR> </TABLE> <input type="hidden" name="Mittente" value="<%=rs("User")%>"> <input type="hidden" name="ID_Mittente" value="<%=ID_Mittente%>"> <input type="hidden" name="Destinatario" value="<%=rs2("User")%>"> <input type="hidden" name="ID_Destinatario" value="<%=ID_Destinatario%>" > </form> <% else %> <script> window.close(); </script> <% response.Write(" <form name='form1'>Chiudi Finestra La finestra si chiuderà automaticamente </form>") end if end if %> </p> </BODY> </HTML>![]()

Rispondi quotando