[VB6]nserire nelle "" il contenuto di un text

[andrew4]

Ciao a tutti,
per farvi capire cosa devo fare vi scriverò il codice direttamente:

Dim passw As String
Dim ftpurl As String
user = "" ' USER
paswd = "" ' PASS
ftpurl = ""
Inet1.URL = ftpurl
Inet1.UserName = user
Inet1.Password = paswd
passw = Text1.Text & ":\" & Text2.Text ' Nome e percorso file da Uppare sull'ftp..
Inet1.Execute Inet1.URL, "PUT (Text1.Text & ":\" & Text2.Text) " & passw
Do While Inet1.StillExecuting = True
DoEvents
Loop
Inet1.Execute , "CLOSE"


Praticamente questo codice copia un file in un ftp, li dove c'è scritto "PUT (Tex....

Dovrei inserire il percorso del file, ma non riesco perchè questo può variare e deve essere preso da un text, come posso fare?

[oregon]

Cioe' non sai concatenare il contenuto di una textbox con una o piu' stringhe costanti ?

Qual e' la frase che vuoi formare? Cosa c'e' in text1 ? E in text2 ?

P.S. Ma hai riletto il titolo del tuo post? E scrivere qualcosa di piu' comprensibile ...

[andrew4]

E' facile da capire, che interessa cosa c'è scritto in text1 e 2, non riesco a farlo leggere da put

[oregon]

Originariamente inviato da andrew4
E' facile da capire

Scusa se ti ho fatto qualche domanda ...

, che interessa cosa c'è scritto in text1 e 2, non riesco a farlo leggere da put

Una stringa e quello che c'e' in un textbox si uniscono cosi'

"PUT " & text1.text

Buon lavoro

[andrew4]

Non occorre offendersi oregon, ma scusa che cambia se in text c'è scritto un percorso di un file oppure andrea, a me è sembrata una domanda a scopo personale più che tecnico e perciò ti ho risposto così.

[oregon]

Originariamente inviato da andrew4
Non occorre offendersi oregon, ma scusa che cambia se in text c'è scritto un percorso di un file oppure andrea, a me è sembrata una domanda a scopo personale più che tecnico e perciò ti ho risposto così.

Non mi sono offeso ... figurati ... ma se tu rispondi in quel modo, mi sento autorizzato a replicare come ho fatto ...

Quello che cambia e' che volevo vedere se c'erano barre / o barre \ se ne mancavano all'inizio o alla fine, se bisognava aggiungerne nella costante prima di unire il contenuto dei controlli ... e cosi' via ...

Se ti ho chiesto qualcosa, è perche' lo ritenevo importante dal punto di vista "tecnico" ... "personale" sicuramente no ... perche' non vedo cosa ci possa essere di "personale" ... in ogni caso, libero di fare come vuoi ...

[andrew4]

Va bene, chiudiamo qui la cosa per favore, facendo in quel modo nn funziona.

in text1 ci inserisco per esepio ciao.txt e prima del text1.text ci devo mettere C:\

[oregon]

Se nella textbox non c'e' la barra allora

"C:\" & Text1.Text

e' sufficiente per unire i dati ...

[andrew4]

Private Sub Command1_Click()
Dim passw As String
Dim ftpurl As String
user = "" ' USER
paswd = "" ' PASS
ftpurl = "" ' FTP Address
Inet1.URL = ftpurl
Inet1.UserName = user
Inet1.Password = paswd
passw = Text1.Text ' Nome e percorso file da Uppare sull'ftp..
Inet1.Execute Inet1.URL, "PUT" & "c:\" & Text1.Text & passw
Do While Inet1.StillExecuting = True
DoEvents
Loop
End Sub

in text1 ho scritto per esempio ciao.
Però non funziona uguale, è come se dentro put legge un file senza nome, una cosa simile.

[oregon]

Hai scritto

passw = Text1.Text ' Nome e percorso file da Uppare sull'ftp..

e poi

Inet1.Execute Inet1.URL, "PUT" & "c:\" & Text1.Text & passw

Quindi, se hai ciao nella texbox, otterrai la stringa

PUTc:\ciaociao

Ti sembra corretto?