Buongiorno. Avrei un quesito da porre. Ho già letto parecchie cose sull'argomento ma ho ancora dei dubbi; per cui vi spiegherò la situazione.
Io devo scaricare dal mio sito un file creato sempre in visual basic che contiene dei dati inseriti con una variabile di tipo definito dall'utente, cioè da me.
Questo è il codice che ho usato trovato su queste pagine.
Dim byteData() As Byte
Dim intFile As Integer
Dim urlDownload As String
Dim nomefile As String
Dim Contenuto As Contenuto
Private Sub CApri_Click()
urlDownload = "http://provaorders.altervista.org/cons_101"
intFile = FreeFile()
byteData() = Inet1.OpenURL(urlDownload, icByteArray)
Open App.Path & "/cons_101" For Binary Access Write As #intFile
Put #intFile, 1, byteData
Close #intFile
'qui pensavo di riaprire il file e inserirlo nella mia variabile tipo
Open App.Path & "/cons_101" For Binary Access Write As #intFile
Put #intFile, 1, Contenuto
Close #intFile
'qui inseriso i dati nelle text box
TNumero.Text = Contenuto.NCons
TTitolo.Text = Contenuto.Titolo
TSottotitolo.Text = Contenuto.Sottotitolo
TTesto.Text = Contenuto.Testo
End Sub
Questo è il tipo dichiarato nel modulo
Type Contenuto
NCons As String
Titolo As String
Sottotitolo As String
Testo As String
End Type
Ho provato in questo modo. Va avanti tutto liscio ma il file risulta vuoto. Come mai?
Rispondi quotando
