Creazione di un'applicazione in Visual Basic è un compito abbastanza semplice che può essere realizzato anche in versione gratuita "Express" di Visual Basic. Il requisito più importante è che si deve utilizzare un servizio di hosting di immagini che supporta il protocollo FTP per il trasferimento di file su internet. Agli inizi del 2010, alcuni esempi di servizi che supportano questa funzione sono VillagePhotos e la versione Pro di Photobucket.

istruzione

1 Aggiungere un pulsante, una casella di testo e un'etichetta. Questo può essere fatto trovando ogni componente a turno nella lista componenti sul lato sinistro dello schermo e trascinarli nella finestra vuota del progettista GUI Visual Basic.
Modificare il testo del pulsante a "Trova immagine" di sinistra-clic sul pulsante e trovare la proprietà "Testo" nelle proprietà casella nella parte in basso a destra dello schermo.
Cambiare il nome della casella di testo per "ImageBox", modificando la proprietà "Nome" nella sua scatola di proprietà. Modificare proprietà text dell'etichetta di "immagine". La casella di testo si terrà la posizione dell'immagine e il pulsante, si apre un browser di file per consentire all'utente di selezionare un'immagine.

2 Aggiungere un OpenFileDialog dalla lista dei componenti sulla sinistra.

3 Aggiungere altri due caselle di testo e le etichette che accompagnano. Nome le scatole "usernameBox" e "pwBox." Modificare le proprietà del testo delle etichette di "username" e "password". Questo può essere fatto selezionando uno alla volta e cambiare il "Testo" o "nome" dei componenti nella loro scatola proprietà.

4 Aggiungere un pulsante trascinandolo dalla lista dei componenti. Modificare il testo di "Upload".

5 Fare doppio clic sul pulsante "Trova immagine" per creare un'azione per quando questo pulsante viene premuto. Questo tirerà fuori l'interfaccia di progettazione grafica e nel editor di codice sorgente. Inserisci il codice:

OpenFileDialog1.ShowDialog()
imageBox.Text = OpenFileDialog1.FileName

Questo presenterà all'utente una finestra di dialogo ogni volta che si preme il pulsante "Trova immagine" che lo inviterà per selezionare un file di immagine sul suo hard disk. Il nome del file completo e il percorso dell'immagine saranno poi collocati nella casella di testo accanto al pulsante, che abbiamo chiamato "ImageBox" al punto 1.

6 Fare clic sulla scheda "Design" per tornare alla interfaccia di progettazione grafica e fare doppio clic sul pulsante "Carica" ​​per creare un'azione per il caricamento dell'immagine. Questo vi porterà indietro per l'editor di codice sorgente e creare automaticamente una nuova funzione azione per voi. Inserisci questo codice nella funzione:

Dim username = usernameBox.Text
Dim password = pwBox.Text
Dim server = "ftp://ftp.photobucket.com/"
My.Computer.Network.UploadFile(imageBox.Text, server & OpenFileDialog1.SafeFileName, username, password)

Modificare il server a quello fornito dal vostro servizio di hosting di immagini, se il vostro host non è Photobucket.

Consigli e avvertenze

• È importante che il "ftp: //" e il trascinamento finale "/" nel nome del server non vengono lasciati fuori. Tralasciando o si romperà il programma.