Visual Basic 6 - Caricare/visualizzare immagine in un form

Forum - Visual Basic 6 - Caricare/visualizzare immagine in un form

Pagine: [ 1 2 ]

Swanny (Normal User)
Rookie

Messaggi: 25
Iscritto: 25/07/2009

Postato alle 21:29
Giovedì, 17/09/2009

Ciao a tutti, tempo fa avevo chiesto aiuto per ultimare il programma che stavo creando dove poter catalogare tutti i libri e i fumetti che possiedo, il programma si appoggia ad un database in access dove vengono salvati tutti i dati relativi al libro. Adesso volevo "implementare" 2 cose nuove:

1)Poter ordinare in ordine alfabetico tutti i relativi titoli presenti nel database, altrimenti ad ogni apertura del programma viene visualizzato l'ultima scheda che ho visionato.

2)Aggiungere l'immagine della copertina

Per il primo caso ho dato uno sguardo in internet ma non ho trovato nulla di soddisfacente. Per il secondo caso ho trovato molto su internet ma tutto estremamente confuso o difficile da realizzare, da qui mi è venuta un'idea :idea:

che non so se è realizzabile: avevo pensato di caricare le immagini su di un sito di hosting free e cercare di far visualizzare a VB l'immagine direttamente da link senza bisogno di appesantire il database ma non ho proprio idea di come fare. Potete aiutarmi?
:-|

zemas (Normal User)
Newbie

Messaggi: 11
Iscritto: 16/07/2009

Postato alle 22:05
Giovedì, 17/09/2009

Ciao Swanny,
per ordinare i dati basta fare così:

rs.sort= "NomeCampo"

per visualizzare un immagine abbianta a un record del db

img = rs("DirectoryImmagine")
Set Image1 = LoadPicture(img)

Swanny (Normal User)
Rookie

Messaggi: 25
Iscritto: 25/07/2009

Postato alle 21:27
Domenica, 20/09/2009

Ho provato ad usare il codice che mi hai consigliato solo che non sono riuscito a farlo andare. Ho creato un pulsante e ho aggiunto il codice
Private Sub cmdcopertina_Click()
Dim rs As String
rs.Sort = "titolo"
End Sub

quando lo provo mi dice qualificatore non valido.

invece per il fatto di caricare l'immagine non ho proprio capito cosa fare, alla fine ho escluso il fatto di hostare la copertina su internet, in quanto dovrei essere collegato per poi visualizzarla...mi sapete aiutare in qualche modo?

ruggy94 (Member)
Guru

Messaggi: 890
Iscritto: 21/04/2008

Postato alle 22:14
Domenica, 20/09/2009

Basta che scrivi nel DB il percorso dell'immagine.

zemas (Normal User)
Newbie

Messaggi: 11
Iscritto: 16/07/2009

Postato alle 20:55
Lunedì, 21/09/2009

Ciao Swanny,
che metodo usi per collegarti al db? (Io uso ADO)

"rs" corrisponde a una connessione al recordset del db.

Esempio:
<<
Dim Cn As ADODB.Connection
Dim Rs As ADODB.Recordset
Set Cn = New ADODB.Connection
Percorso = [Percorso del database]
Cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Percorso
Set Rs = New ADODB.Recordset
Rs.Open "[Tabella]", Cn, adOpenForwardOnly, adLockOptimistic, adCmdTable
Rs.Sort = "titolo"
>>
Questo è un semplice esempio e di riordino di una connessione ad una Tabella di un Db di Access

Swanny (Normal User)
Rookie

Messaggi: 25
Iscritto: 25/07/2009

Postato alle 21:34
Lunedì, 21/09/2009

Ciao Zemas,
Allora io uso DAO, lo so che qualcuno si arrabbierà per questa mia scelta cmq...uso il controllo DATA per la connessione al DB in access: questa è la form del programma
http://img10.imageshack.us/img10/9277/immaginepe.jpg
se può essere di aiuto allego il file con il codice che ho scritto fin'ora, magari si trova qualche corbelleria :-|

Swanny ha allegato un file: ebookprogramma.zip (943 bytes)
Clicca qui per scaricare il file

Ultima modifica effettuata da Swanny il 21/09/2009 alle 21:36

theprogrammer (Normal User)
Guru^2

Messaggi: 2509
Iscritto: 28/01/2009

Postato alle 7:54
Martedì, 22/09/2009

Dim rs As String

??

rs deve esere un oggetto recordset non una stringa ...

mash_mash (Normal User)
Expert

Messaggi: 230
Iscritto: 25/07/2007

Postato alle 11:19
Martedì, 22/09/2009

Ciao swanny ti posto per chiederti se puoi gentilmente allegare le immagini che hai usato per i pulsanti come da tua immagine precedentemente allegata , oppure dove posso scaricarle.
Ciao e grazie

Swanny (Normal User)
Rookie

Messaggi: 25
Iscritto: 25/07/2009

Postato alle 13:46
Martedì, 22/09/2009

Ciao mash_mash,
i pulsanti li ho creati io appositamente per il programma. Te li allego :k:

Swanny ha allegato un file: pulsanti.zip (24528 bytes)
Clicca qui per scaricare il file

Pagine: [ 1 2 ]