Avatar billede domino1977 Nybegynder
23. september 2002 - 11:08 Der er 10 kommentarer og
1 løsning

Et billed i VB 6.0 fra Access!!!

Jeg har en Access database, hvor jeg har en række informationer.... men jeg har osse et billed på hver af dem der skal hentes ind osse.... hvordan gør jeg det??
Her er min kode:
-------------------------------------------------------
Private Sub Form_Load()
Set datDB = DBEngine.Workspaces(0).OpenDatabase("I:\CRM\data\data\data.mdb")
strSQL = "Select * from Kunder "
Set recRecordset = datDB.OpenRecordset(strSQL)
UpdateFelter
End sub
-------------------------------------------------------
Private Sub UpdateFelter()
Navn.Text = recRecordset("Name") & ""
konto.Text = recRecordset("Type") & ""
Picture.??? = recRecordset("Picture") & ""
End sub
-------------------------------------------------------
Spørgsmålet ligger så i... hvordan ligger man et billed ind i databasen?? Måske via Access og den så kan hentes ind i VB 6.0???

Nogen der kan hjælpe mig??
Avatar billede bccinlove Nybegynder
23. september 2002 - 11:25 #1
Du kan ikke ligge et billede ind i selve databasen. Access kan indeholde data, ikke filer!

Du kan gå en anden vej...

Noget med en tabel der indeholder de forskellige stier til de respektive billeder, disse stier kan du så hente ind i VB og dernæst loade dem ind i VB!
Avatar billede domino1977 Nybegynder
23. september 2002 - 12:03 #2
OK.... men jeg har jo lavet et OLE objekt... og deri indsat et billed... så man kan faktisk godt sige at databasen indholder selve billedet!!!

Men hvis nu jeg så bare ligger en sti ind, og hvordan får jeg den så over i VB 6.0?? Skal den hedde Picture.???
Avatar billede bccinlove Nybegynder
23. september 2002 - 12:14 #3
så skal du hente stien som du hente al mulig anden data ind i en textstreng

txtVar = recRecordset("Sti")

Dernæst kan du jo loade den sti ind i en picturebox

Picture1.loadpicture(txtvar)
Avatar billede domino1977 Nybegynder
23. september 2002 - 12:49 #4
Hvorfor stopper den her:

txtVar = recRecordset("Picture") & ""
Picture1.LoadPicture (txtVar)

Og skriver:

Compile error:
Variable not defined
Avatar billede bccinlove Nybegynder
23. september 2002 - 13:03 #5
Fordi at syntaksen er sådan her:

Picture1 = LoadPicture(txtVar)
Avatar billede domino1977 Nybegynder
23. september 2002 - 13:41 #6
OK... så ser den sådan her ud!!
---------------------------------------------------------------------------
txtVar = recRecordset("Picture")
Picture1 = LoadPicture(txtVar)
---------------------------------------------------------------------------
MEn den bliver ved med at sige at den ikke kan finde filen!!!
Avatar billede bccinlove Nybegynder
23. september 2002 - 13:59 #7
så er det nok fordi at stien ikke er korrekt!

Syntaks er korrekt nu...

Led efter fejl i din database...
Avatar billede domino1977 Nybegynder
23. september 2002 - 15:31 #8
Jamen.... hvis jeg bare skriver "pix.jpg"... og den ligger samme sted som selve Access Databasen.. er den så ikke god nok???

Og selv den konlone (post) jeg har lavet er bare sat til en tekst felt.....
Avatar billede bccinlove Nybegynder
24. september 2002 - 12:58 #9
Nej...

der skal i feltet i Access stå hele stien fx. "c:\pix.jpg". Hvis billedet ligger samme sted som dit program kan du bruge app.path & "\" & txtVar (txtVar behøves så kun at være "pix.jpg")
Avatar billede domino1977 Nybegynder
24. september 2002 - 15:35 #10
Jeg prøvede osse at skrive:
---------------------------------------------------------------------------
"I:\DATA\DATA\pix.jpg"

Men den kunne stadig ikke finde den!!

Access kunne godt... men VB kunne ikke!!!
Avatar billede domino1977 Nybegynder
27. september 2002 - 12:17 #11
Jepper..... jeg takker....
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester