Pagina1.asp
Pagina2.aspcodice:<% Set objConn = Server.CreateObject("ADODB.Connection") objConn.Open("Provider = Microsoft.Jet.OLEDB.4.0; Data Source = C:\Inetpub\wwwroot\Contratti\database\Contratti.mdb") Set objRs = Server.CreateObject("ADODB.Recordset") IF Session("Livello") <> "Contabilità" THEN Response.Redirect "log_in.asp" ' Recupero le variabili Request.QueryString NomeFile = Request ("NomeFile") ID_Contratto = Request ("ID_Contratto") %> <html><head> </head><body topmargin="0" bottommargin="0"> <form method="post" action="upload_semplice.asp" name="upload_semplice" enctype="multipart/form-data"> <table width="335" height="" border="0" cellspacing="0" cellpadding="0" align="center"> <tr> <td colspan="5" height="25"></td> </tr> <tr> <td width="100" height="20" align="right">Collega</td> <td width="25" height="20"></td> <td width="200" height="20" align="right"><input class="modulo_dati_upload" type="file" name="Campo1" size="27"></td> </tr> <tr> <td colspan="5" height="50"></td> </tr> </table> <input class="modulo_dati" type="hidden" name="NomeFile" size="27" value="<% Response.Write NomeFile %>"> <input class="modulo_dati" type="hidden" name="ID_Contratto" size="27" value="<% Response.Write ID_Contratto %>"> <div align="center"> <input class="modulo_tasti" type="submit" value="COLLEGA" name="invia" size="27"> </div> </form> </body></html>
La seconda pagina dovrebbe fare l'upload del file e poi passare ad un altra paginacodice:<% Dim oUpload Set oUpload = new cUpload oUpload.SetPath "Files\" oUpload.UploadAndSave Set oUpload=Nothing ' Recupero le variabili NomeFile = Request ("NomeFile") ID_Contratto = Request ("ID_Contratto") Response.Write "collega_effettuato.asp?NomeFile=" & NomeFile & "&ID_Contratto="& ID_Contratto %>
NomeFile e ID_Contratto
per fare un UPDATE sul DBAccess
però alla Pagina2.asp dice
La linea 16 è NomeFile = Request ("NomeFile")codice:ADODB.Stream error '80004005' Operation is not allowed when the object is closed. /Contratti/sito/upload_semplice.asp, line 16
Come mai?

Rispondi quotando