[VB6] Data1 & Aggiungi Record

[x69asterix]

Ciao a tutti,
Sono alle prese con un rompicapo, allora nel mio db all' apertura del form voglio ke il record si posizioni in aggiungi record, ma questo non mi riesce mi si posiziona sempre sull' ultimo record, anke se imposto:
BOF Action a Move First
e
EOF Action in Add New
Il risultato non và a buon fine, come posso fare per far si ke all'apertura del form mi ritrovo le caselle vuote pronte per inserire i nuovi dati?

[yyzyyz]

esempio

Private Sub Form_Load()
Data1.DatabaseName = App.Path & ("\db.mdb")
Data1.RecordSource = "Tabella1"
Data1.Recordset.MoveFirst
Data1.Recordset.AddNew
End Sub

se lavori con DAO , ricorda di settare sulla proprieta text,
il datafield ke deve essere il campo della tabella scelta.

[x69asterix]

Originariamente inviato da yyzyyz
esempio

Private Sub Form_Load()
Data1.DatabaseName = App.Path & ("\db.mdb")
Data1.RecordSource = "Tabella1"
Data1.Recordset.MoveFirst
Data1.Recordset.AddNew
End Sub

se lavori con DAO , ricorda di settare sulla proprieta text,
il datafield ke deve essere il campo della tabella scelta.

Ciao,
allora avevo risolto ieri sera semplicemnte ke poi è la stessa cosa di quello ke hai postato tu, ho agginto semplicemente Data1.Recordset.AddNew, in un bottone, ke a sua volta mi apriva un form. Per quanto riguarda il report sai se esiste la possibilità di inserire anke le bmp?

[yyzyyz]

se ti riferisci al datareport non saprei , è una cosa ke non ho mai provato, pero' fammi capire come dovrebbe leggere la bmp, tu nel record del DB memorizzi la path della bmp oppure memorizzi la bmp in binario (blob)???

[x69asterix]

Originariamente inviato da yyzyyz
se ti riferisci al datareport non saprei , è una cosa ke non ho mai provato, pero' fammi capire come dovrebbe leggere la bmp, tu nel record del DB memorizzi la path della bmp oppure memorizzi la bmp in binario (blob)???

ciao,
allora nella tabella del db in access, il bmp è conservato come binario, x la memorizzazione ho usato l'OLE.

[yyzyyz]

questo codice e sicuramente da implementare , str_image dovrebbe contenere i dati in binario dalla foto contentuta nel campo OLE del tuo db.

With DataReport1.Sections("Section1")
    Set .Controls("Image1").Picture = str_image
End With

ps. conosci qualke sistema facile sul come leggere e scrivere bmp in binario su db (blob)?

[x69asterix]

Originariamente inviato da yyzyyz
questo codice e sicuramente da implementare , str_image dovrebbe contenere i dati in binario dalla foto contentuta nel campo OLE del tuo db.

With DataReport1.Sections("Section1")
    Set .Controls("Image1").Picture = str_image
End With

ps. conosci qualke sistema facile sul come leggere e scrivere bmp in binario su db (blob)?

Ciao e Buona Pasqua,
allora potresti spiegarmi la "Section1" e la "Image1"

[yyzyyz]

se guardi l'allegato immagine ti sarà + chiaro sicuramente.

[x69asterix]

Originariamente inviato da yyzyyz
se guardi l'allegato immagine ti sarà + chiaro sicuramente.

Ok,
è kiaro, ma non riesco a caricare l'immagine, ho inserito la porzione del tuo listato in questo modo:

Private Sub DataReport_Initialize()
With DataReport1.Sections("Report_Dettaglio")
    Set .Controls("Image1").Picture = str_image
End With
End Sub

forse sbaglio io?

[yyzyyz]

ma kome la estrai l'immagine dal DB ?
str_image dovrebbe contenere il percoso/file temporaneo ke scrivi con la funzione blob x l'immagine.