Newsgroup: it.comp.www.asp
Titolo: aruba niente stream ado

sui server aruba utilizzo questo script per permettere il download dei
miei file.
il problema č che a volte non funziona.
aruba mi risponde dicendo che non posso usare oggetti stream di ADO su
server windows, allora vi chiedo dove poter trovare del codice funzionante
per sostituire quello scritto da me.
grazie
Nella nostra sezione di download, all'atto del download di un file viene
generata una pagina di errore "HTTP 500....Impossibile visualizzare la
pagina".
---
Dim objStream, strFileName
strFileName = Request.QueryString("file")
Set objStream = Server.CreateObject("ADODB.Stream")
objStream.Open
objStream.Type = 1 ' adTypeBinary
objStream.LoadFromFile server.MapPath("/automazione/zip/" & strFileName &
".zip")
' Istruiamo il browser sul tipo di file
Response.AddHeader "Content-Disposition", "attachment; filename=" &
strFileName & ".zip"
Response.ContentType = "application/x-unknown"
Response.BinaryWrite objStream.Read
objStream.Close
Set objStream = Nothing
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 funzionante per sostituire quello scritto da me.
Usa FSO (file system object) e un semplice loop che legga dal file e scriva
con "response.binaryWrite".
Aprirai il file come testo ma io non ho avuto problemi a farlo con immagini
o zip...
Alex.
-- 
___________________________________________________________
a p bertolini
(Tribů Digitale Blackmambo: 
www.blackmambo.it
)

server windows [CUT]
Mi inserisco perchč mi hai messo una pulce nell'orecchio.
Dovrei prendere anch'io fra poco uno spazio su Aruba, e ho sviluppato
una applicazione in vb che utilizza proprio un ADO stream per
connettersi a un db access sul web server.
Vorrei quindi indagare meglio: tu dici che a volte non funziona, e
Aruba ti risponde in quel modo che a me proprio pare strano.
Ti chiedo: ma a volte anche *funziona* ?
Puoi aggiungere qualche dettaglio in piů?
Ciao

 Ciao


 Alex.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 


 si rischia il blocco.
Si, poi avevo letto anch' io:
SCRIPTING: e' vietato utilizzare l'oggetto stream di ADO per rendere
disponibili in download
qualunque tipo di file, fatta eccezione per piccoli files del tipo .pdf ,
..rtf .e .doc.
Scritto cosě in realtŕ č un po' fuorviante.
Io la interpreto cosě: non č che sia vietato in assoluto
ma solo per i *FILES* di una certa consistenza ("fatta eccezione per piccoli
files ..ecc").
Cioč, probabilmente, fanno un qualche tipo di controllo sulla grandezza
dello stream (ed č questo il tuo caso).
Sarei curioso di sapere come controllano la cosa.
Io dovrei salvare nello stream semplici recordset in xml, e vorrei sapere se
anche in tal caso
potrei avere problemi.
Ciao

 alternativo che funzioni.
Non ho nulla sottomano di già pronto, prova a far funzionare questo
frammento di codice:
===========================
set fsoObject = Server.CreateObject ("Scripting.FileSystemObject")
set tsObject = fsoObject.OpenTextFile(Server.MapPath(path), 1, false)
strContents = tsObject.ReadAll()
tsObject.Close()
set tsObject = nothing
response.BinaryWrite(strContents )
===========================
Certo però che 100Mb sono tanti, qualsiasi sia la soluzione adottata.
Alex.
-- 
___________________________________________________________
a p bertolini
(Tribù Digitale Blackmambo: 
www.blackmambo.it
)

> response.BinaryWrite(strContents )

> response.BinaryWrite(strContents )

ho provato il tuo codice mi da errore di memoria
ho fatto la prova con un file di 25 Mb
comunque se guardi qui
http://www.windowsitpro.com/Article/ArticleID/8604/8604.html
dicono che con FSO non è possibile utilizzare file binari
ciao
