Avatar billede nederbasse Nybegynder
15. januar 2002 - 13:50 Der er 10 kommentarer og
1 løsning

Billeder i en AccessDB

Halløj
Hvordan får man vist nogle billeder hvor stien til billederne står i en database uden at bruge FSO
kun med SQL ?
Avatar billede torbenmelander Nybegynder
15. januar 2002 - 13:53 #1
Du kan evt. uploade billederne i database med en komponent som aspSmartUpload (www.aspsmart.com) ...
Avatar billede torbenmelander Nybegynder
15. januar 2002 - 13:55 #2
Ellers skulle det vel bare være at skrive:

<IMG SRC=\"<%=RS(\"FeltMedStiNavn\")%>\">
Avatar billede Slettet bruger
15. januar 2002 - 13:56 #3
Hvis du lægger stien i et felt i en database, kan du da bare hive dem ud sådan her:

<img src=\"<%=rs(\"feltnavn\")%>\">
Avatar billede nederbasse Nybegynder
16. januar 2002 - 08:44 #4
virker ikke rigtigt
Skal der ikke være en form for et id til hvilket billed det er ?

fx:

Select sti from tblImages where Id = 2\"
Avatar billede torbenmelander Nybegynder
20. januar 2002 - 16:52 #5
Jo, de skal selvfølgelig lave både databaseforbindelse og vælge hvilke data du vil udtrække med SQL-sætning ... hvis du ikke ved hvordan det gøres kan lære det på www.html.dk
Avatar billede nederbasse Nybegynder
21. januar 2002 - 11:37 #6
Ok her er kode som den ser ud nu, i stedet for stien til billederne vil jeg have billederne.
<%
    Set Conn = Server.CreateObject(\"ADODB.Connection\")
    Conn.Open \"driver={Microsoft Access Driver (*.mdb)};dbq=\" & Server.MapPath(\"billeder.mdb\")

    Set RecSet = Server.CreateObject(\"ADODB.Recordset\")
   
    vis = \"Select * From tblBilleder\"
    RecSet.Open vis, Conn, adOpenStatic, adLockOptimistic
   
   
    Do Until RecSet.EOF
    Response.Write         \"<TR><TD>\" & RecSet.Fields(\"Navn\") &_
                        \"</TD><TD>\" & RecSet.Fields(\"sti\") & \"</td></tr>\"
                           
        RecSet.MoveNext
    Loop
    RecSet.Close
    Conn.Close
%>
Avatar billede Slettet bruger
21. januar 2002 - 11:43 #7
Skift

\"</TD><TD>\" & RecSet.Fields(\"sti\") & \"</td></tr>\"

ud med

\"</td><td><img src=\"\"\" & RecSet.Fields(\"sti\") & \"\"\"></td></tr>
Avatar billede nederbasse Nybegynder
21. januar 2002 - 12:17 #8
Error Type:
Microsoft VBScript compilation (0x800A0409)
Unterminated string constant
/billeddb/test.asp, line 38, column 62
Avatar billede Slettet bruger
21. januar 2002 - 12:21 #9
Det er fordi der mangler en \" til sidst.

\"</td><td><img src=\"\"\" & RecSet.Fields(\"sti\") & \"\"\"></td></tr>\"

Sådan går det jo engang imellem :)
Avatar billede nederbasse Nybegynder
21. januar 2002 - 12:31 #10
Jeps jeg fandt ud af det :-)
Trode bare at det skulle være noget med:
Server.CreateObject(\"ADODB.BINAER\")
og der skulle sætte en ContentType som gif eller jpg
Avatar billede Slettet bruger
21. januar 2002 - 12:32 #11
hehe - 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