Newsgroup: it.comp.lang.visual-basic
Titolo: Ma vi sembrano risposte? E poi dite guardate prima sul sito comune!

Alessandro
Beh c'è qualcuno che mi da la risposta vera?
Ciaotutti
Medusa

 ha scritto nel messaggio
news:ezdC8.38521$zW3.3...@news1.tin.it...
TESTINA DI VITELLO.....
Fai un nuovo progetto....
in una form vuota metti il controllo inet e un command button
nel codice incolla:
Option Explicit
Private Sub Command1_Click()
Inet1.AccessType = icUseDefault
   Dim b() As Byte
   Dim strURL As String
   ' Si suppone che l'URL sia valido.
   strURL = "
http://www.villaceleste.it/images/druid.gif
"
   ' Recupera il file come matrice di dati byte.
   b() = Inet1.OpenURL(strURL, icByteArray)
   Open "C:\Temp\druid.gif" For Binary Access _
   Write As #1
   Put #1, , b()
   Close #1
   MsgBox "FATTO TESTINA!!!!"
End Sub
....il consiglio te l'hanno dato giusto! se scazzi l'url son cavoli tuoi!
(mi raccomando perchè funzioni devi avere una dir c:\temp...........grrrr)
Prima di sparare....accertati che la canna della pistola non sia alla tua
tempia!!!


Beh... se non avessi prima controllato e ricontrollato l'url scritto non
avrei sparato!
Figurati che per essere sicuro che non si trattasse di un errore del genere
ho scritto prima il percorso
sull'explorer e successivamente quando explorer mi ha restituito l'immagine
in questione ho fatto il copia e incolla dell'url sulla variabile.
Inutile dire che l'errore si č ripresentato puntuale.
Sicuro che con l'HTTP funziona?
E comunque non č molto furbo dare una spiegazione con un protocollo diverso
da quello con cui era stata formulata la domanda!
Magari ci sono ragioni  particolari che in questo caso rendono i due
protocolli equivalenti ma non tutti possono saperlo e specialmente coloro
che si rivolgono al sito per lumi...
AH la dir c:\temp cel'ho
CiaoTutti

 CiaoTutti
Ciao L'Oriundo

 formulata la domanda!
Chi ti dà un consiglio spesso copia e incolla un proprio pezzo di codice,
che grossomodo faccia quanto richiesto.
Poi occorre ovviamente guardarselo e adattarselo.
Per il futuro, se ti serve del codice bello pronto, in pratica se vuoi che
qualcuno faccia quello che a te sa fatica fare, invece di usare toni del
cazzo, mi mandi una mail, e io ti mando il codice con allegata la fattura.
E magari impara l'educazione e ringrazia chi ti aveva dedicato del tempo A
GRATIS, invece di essere anche arrogante.
Alberto

 </Consiglio>
Io non ho mica offeso nessuno! Piuttosto mi sono beccato io nell'ordine:
"Testina di Vitello","Imbranato","Arrogante"
Sarei stato un cafone se avessi risposto in quella maniera ad una persona
che ha tentato di darmi una mano.
Cosa ben diversa è erigere una risposta un po carente di spiegazioni (presa
pari pari dall'MSDN Library come esempio sull'OpenUrl) come risposta ad una
FAQ.
Come ho scritto in precedenza io non posso sapere se i due protocolli sono
equivalenti, e se il codice non mi funziona e nella Faq non c'è specificato
che il codice funziona per entambi i protocolli ne traggo, come ho fatto,
delle conclusioni sbagliate.
Avrebbero potuto infatti descrivere anche una metodologia sincrona, e dare
maggiori spiegazioni sul funzionamento del controllo.
Sono l'ultima persona al mondo a volere codice spiattellato ma mi piace
capire il funzionamento delle cose e per quanto riguarda Inet nè sull'MSDN
nè sul sito comune sono riuscito a trovare soddisfazione.
Son stato infatti una giornata intera ad arrovellarmi sul mancato
funzionamento del metodo GetHeder, semplicemente perchè sull'MSDN hanno
omesso di dire che va prima chiamato OpenUrl.
Scusate se ho offeso qualcuno, ma le mie obiezioni sulla faq restano anche
se il codice funziona pure con l'http.
Ciao
Medusa

 nè sull'MSDN nè sul sito comune sono riuscito a trovare soddisfazione.
Forse perchè molti lo evitano?

 Forse perchč molti lo evitano?
Quindi dovrei trovare cosa sarebbe meglio usare.... o devrei sapere o mi
dovrei documentare ma chi mi dovrebbe dire o documentare non mi puň dire
cosa sarebbe meglio usare perchč prima ..?
I miei omaggi Sir
Medusa

 ha scritto nel messaggio
news:ezdC8.38521$zW3.3...@news1.tin.it...
Stamani stavo per risponderti poi ho detto lascia perdere...poi
continui....e allora mo te becchi il MIO SFOGO!
Ho ascoltato il tuo ora ascolti IL MIO!
Allora tu hai postato per scaricarti e per sfogarti a chi ti aveva (secondo
te) postato "fischi per fiaschi"
Tutto questo (secondo me) NON è vero
Tutto quello che segue presuppone uno o mabedue le seguenti condizioni:
a) Hai un VB regolarmente acquistato e installato
b) Hai un pusher "serio" che insieme a VB tarocco ti ha dato anche l'help!
Se ci sei(con questa dotazione) si continua altrimenti ...ciao!
Presuppongo di continuare.....
se schiacci (o premi dipende dalla forza) il tasto F1 dentro VB ti appare
l'help....
Si cerca.....Internet Transfer....
Ma va guarda c'è!...mi propone una sottovoce
clicco su Controllo
mi si apre una finestrina....uao!
scelgo di cliccare su Controllo Microsoft Internet Transfer.....TA DAH!
ci siamo!
scelgo di vedere come funziona sto controllo...ad esempio...
metodo OPENURL...clicco su metodi e scelgo OpenURL
Azz...cambia la finestra.....
che dice????
azz quanto robina da studiare....quindi...cito:
"
Il valore restituito dal metodo OpenURL dipende dalla destinazione dell'URL.
Se, ad esempio, l'URL di destinazione è la directory di un server FTP, verrà
restituita la directory.
Se la destinazione è un file, verrà recuperato il file.
"
più sopra ti dice che openurl si usa
":
oggetto.OpenUrl url [,tipodati]
"
 tipo dati che è ????
un po + sotto:
"
Le possibili impostazioni di tipodati sono:
Costante Valore         Descrizione
icString            0         Impostazione predefinita.  Recupera i dati
come stringa.
icByteArray    1          Recupera i dati come matrice di dati byte.
"
Ma se colto da un raptus mi azzardo a cliccare su esempio?????
CAZZO! L'ESEMPIO...........
Private Sub Form_DblClick()
   Inet1.AccessType = icUseDefault
   Dim b() As Byte
   Dim strURL As String
   ' Si suppone che l'URL sia valido.
   strURL = "
ftp://ftp.microsoft.com/
" & _
   "developr/drg/Win32/Autorun.zip"
   ' Recupera il file come matrice di dati byte.
   b() = Inet1.OpenURL(strURL, icByteArray)
   Open "C:\Temp\Autorun.zip" For Binary Access _
   Write As #1
   Put #1, , b()
   Close #1
   MsgBox "Done"
End Sub
MA MA MA
...ma io lo conosco...infatti è quello che ti ho postato!
mmmm è un po diverso!!!
Infatti ...scusa cercavi di scaricare un file? nell'url gli ho messo un file
(una immagine) da scaricare...e funziona!
se li dici di scaricare una pagina html ti scarica anche quella anche una
pagina ASP!(non proprio eh eh!...il risultato della pagina asp ti scarichi!)
DOVE SBAGLIAVANO A DIRTI COME SCARICARE UNA IMMAGINE???
se sai cosa è una URL che cavolo di discorsi fai "l'esempio è ftp...ma io
voglio http..etc etc" ???????
Io devo aver capito che ti sfogavi perchè volevi scaricare una immagine che
deriva dall'elaborazione di una pagina ASP (sbaglio? o interpretato
giusto?)...così non la scarichi almeno non direttamente...perchè dalla
pagina asp vien fuori un documento cha ha il link all'immagine
infatti nel post che ti ho fatto trasforma il codice in...
Option Explicit
Private Sub Command1_Click()
Inet1.AccessType = icUseDefault
   Dim b() As Byte
   Dim strURL As String
   ' Si suppone che l'URL sia valido.
   strURL = "
http://www.villaceleste.it/GildaAktu/asp/test.asp?id=23
"
   ' Recupera il file come matrice di dati byte.
   b() = Inet1.OpenURL(strURL, icByteArray)
   Open "C:\Temp\dump.txt" For Binary Access _
   Write As #1
   Put #1, , b()
   Close #1
   MsgBox "FATTO TESTINA!!!!"
End Sub
prova vari valori di ID (0 1 2 etc) e vedi quello che ottieni nel file !
la spiegazione è insita nel funzionamento di una pagina HTML (generata dal
server o no )....che in realtà è un file di testo che istruisce un programma
a ricevere stream di dati...il programma è il browser! (in MOLTA sintesi e
buona approssimazione)
Ad un post simile avevano risposto tempo fa di non bacarsi tanto le palle e
che forse la via + comoda era reperire l'immagine direttamente nella cache
del browser...
ma qui ho esaurito le pile e non ti son di aiuto......e poi mi sembra che
prima tu debba digerire ancora 2 o 3 cose
1) Il funzionamento del controllo Inet
2) Come funziona una pagina HTML
3) Come funziona una pagina ASP
4) ....devi
sperimentare...sperimentare...sperimentare....sperimentare....sperimentare..
..non ti devi mai fermare...anche ame ha fatto bene ripassare certe
cose....non sono mai assodate completamente....cerca via laterali...sii
curioso...!
lo dico per il tuo bene...poi fai te!
Ciauz! Medusa...mi lasci impietrito!!!!
AH AH AH !
PRRRRR
:-)