Πρώτα Βήματα - Web Development

Απ: Εμφάνιση εικόνας μέσα από Access2007

darklynx — Sat, 24 Jul 2010 03:02:49 GMT

Πράγματι το DAO είχε κηδευτεί προ πολλού,αλλά με την έλευση του Office 2007 επέστρεψε από τους νεκρούς .Δε νομίζω ότι δεν υπάρχει λύση για το ADO,απλά ίσως θα είναι λιγότερο κομψή.

Απ: Εμφάνιση εικόνας μέσα από Access2007

tasos — Sat, 24 Jul 2010 01:58:12 GMT

Ναι, τα 20 byte "περισσεύουν" από κάθε εικόνα. Μάλλον λοιπόν θα πρέπει να γράψω κάτι σε DAO. Αλλά αυτό από Δευτέρα

Και μια γενική ερώτηση τώρα, το ADO δεν θεωρείται εξέλιξη του DAO; Πάντα είχα την εντύπωση πως το ADO ήρθε να αντικαταστήσει το DAO. Μου κάνει εντύπωση λοιπόν πως δεν υπάρχει λύση (ή μάλλον δεν κατάφερα να βρω) με ADO για το συγκεκριμένο θέμα.

Απ: Εμφάνιση εικόνας μέσα από Access2007

darklynx — Sat, 24 Jul 2010 00:20:28 GMT

Και εγώ αυτήν την αναφορά κοίταγα,μόνο που αφορά DAO Record Sets και όχι ADO Record Sets.Λογικό λοιπόν το μήνυμα λάθους που βγαίνει.Αν κάνεις αυτό που λέγαμε με DAO μήπως δουλέψει;Αλήθεια αυτά τα extra 20 byte κοίταξες τι περιέχουν;Φαντάζομαι επίσης το πρόβλημα δεν το έχεις μόνο με μια συγκεκριμένη εικόνα αλλά με όλες,σωστά;

Απ: Εμφάνιση εικόνας μέσα από Access2007

tasos — Fri, 23 Jul 2010 21:37:33 GMT

Έτσι όπως το κατάλαβα, παίρνω το field2 αντικείμενο όταν δεν χρησιμοποιώ το FileData και αναφέρομαι στο πεδίο του όταν το χρησιμοποιώ. Βρήκα διάφορα παραδείγματα που είχαν κώδικα όπου μπορούσα να γράψω rs(0).Fields("FileData").Value και να πάρω το περιεχόμενο του αρχείου αλλά δεν δούλεψε. Ίσως να θέλει κάτι άλλο στον κώδικα για να μπορέσω να πάρω το αντικείμενο τύπου field2. Δοκίμασα την SaveToFile που πρότεινες και δεν έπαιξε, με το .FileData στο query και χωρίς. Και στις δύο περιπτώσεις το μήνυμα ήταν "Object doesn't support this property or method" για την SaveToFile.

Edit: Τελικά έχεις δίκιο για το FileData και το Field2 πεδίο. Βρήκα αυτό σαν reference. Αλλά από ότι φαίνεται η asp δεν αναγνωρίζει αυτόν τον τύπο πεδίου.

Απ: Εμφάνιση εικόνας μέσα από Access2007

darklynx — Fri, 23 Jul 2010 05:49:37 GMT

Το "FileData" που έχεις πάρει με το query προφανώς είναι Field2 αντικείμενο και όχι "αμιγής" buffer με τα δεδομένα του αρχείου σου.Αν αντί για την BinaryWrite χρησιμοποιήσεις την SaveToFile που είναι μέλος της Field2 ειδικά για attachments,μήπως έτσι δουλέψει;Εικάζω δηλαδή ότι γράφεις ολόκληρο το αντικείμενο και όχι μόνο τα δεδομένα που σε ενδιαφέρουν.

Απ: Εμφάνιση εικόνας μέσα από Access2007

tasos — Thu, 22 Jul 2010 00:36:56 GMT

Σωστή η κατεύθυνση σου και μπόρεσα κ προχώρησα λίγο. Αυτό που βρήκα είναι ότι το πεδίο τύπου Attachment είναι container και (προφανώς) έχει πεδία, με ένα από αυτά να είναι το FileData. Άρα αντί να γράψω στο SQL query "SELECT Picture" γράφω "SELECT Picture.[FileData]". Ο κώδικας μου πλέον είναι κάπως έτσι:

<%@  language="VBSCRIPT" codepage="1253" %>
<% 
set myConn=Server.CreateObject("ADODB.Connection")
myConnStr="Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & Server.MapPath("App_Data\ItemsData.accdb") & ";Persist Security Info=False;"
myConn.open(myConnStr)

set rsimage=Server.CreateObject("ADODB.Recordset")
 query="SELECT Picture.[FileData] FROM NewItemTable where CodeStore='ΑΕΡΟ-001'"
 rsimage.open query,myConn,3,3

If not rsimage.EOF Then
    
    set strtemp = rsimage(0)
 
    response.Expires = 0
    response.Buffer  = True
    response.Clear
 
    Response.ContentType = "image/jpg"
    Response.BinaryWrite strtemp

    Response.End
 end if
 
rsimage.close
set rsimage=nothing
myConn.close
%>

Παρόλα αυτά, η εικόνα δεν εμφανίζεται.
Βέβαια, η αρχική εικόνα έχει μέγεθος 5.04kb ενώ αυτό που δίνει ο server είναι 5.06kb. Άρα μήπως από την Access παίρνω σωστά τα δεδομένα, και χαλάω κάτι με τους headers;

Edit: Όπως ανέφερα κ πιο πριν, προσπάθησα το ίδιο script σε asp.net. Αυτό που βρήκα είναι ότι με το ίδιο sql query (SELECT Picture.[FileData] FROM....) παίρνω ένα byte array, αλλά αυτό είναι 20 byte μεγαλύτερο από το μέγεθος της εικόνας. Αν κάνω λοιπόν, Response.BinaryWrite() από το 21ο byte και μετά η εικόνα εμφανίζεται σωστά!! Άρα κάπως αλλιώς πρέπει να διαβάσω τα data. Πάντως βρήκα αρκετά threads που ρωτάνε το ίδιο πράγμα, αλλά σε κανένα δεν υπήρχε λύση.

Υ.Γ. Σε asp πάντως δεν μπόρεσα να "κόψω" τα 20 πρώτα bytes από το rsimage(0).

Απ: Εμφάνιση εικόνας μέσα από Access2007

cap — Wed, 21 Jul 2010 19:21:34 GMT

Αν και δεν μπορώ να σου δώσω ολοκληρωμένη απάντηση, ψάχνοντας διαπίστωσα οτι το attachment data type στην Access συμπεριφέρεται διαφορετικά από ένα κοινό blob field. Συγκεκριμένα, κάνει wrap το binary περιεχόμενο μέσα σε ένα object, γι'αυτό και δεν σου δουλεύει το binarywrite. Δυστυχώς λόγω περιορισμένου χρόνου δεν μπόρεσα να βρω πώς γίνεται "unbox" το πραγματικό περιεχόμενο, αλλά νομίζω ότι ψάχνοντας να βρεις κάτι για αυτό θα κινηθείς προς τη σωστή κατεύθυνση.

Εμφάνιση εικόνας μέσα από Access2007

tasos — Wed, 21 Jul 2010 18:32:07 GMT

Καλημέρα σας,

Έχω μία βάση δεδομένων σε Access 2007 και σε έναν πίνακα έχει ένα πεδίο τύπου Attachment και εκεί είναι αποθηκευμένη η φωτογραφία του προϊόντος. Όταν όμως διαβάζω το πεδίο αυτό, αντί να πάρω ένα το περιεχόμενο του αρχείου (σε binary), παίρνω το filename του. Σας παραθέτω τον κώδικα για το image.asp αρχείο, όπου το καλώ ως εξής:

<img src="image.asp?code=myProductCode" />

<% 
set myConn=Server.CreateObject("ADODB.Connection")
ConnStr= "DRIVER={Microsoft Access Driver (*.mdb, *.accdb)}; DBQ=" & Server.MapPath("data\ItemsData.accdb")
myConn.open(ConnStr)

 query="SELECT picture FROM NewItemTable where CodeStore='" & request("code") & "'"
 Set rsimage = myConn.Execute(query)
 
If not rsimage.EOF Then
    response.Expires = 0
    response.Buffer  = True
    response.Clear
    Response.ContentType = "image/jpeg"
    set strtemp = rsimage("picture")
    Response.BinaryWrite strtemp
    Response.End
 end if
  
rsimage.close
set rsimage=nothing
myConn.close
%>

Προσπάθησα κάτι αντίστοιχο με asp.net αλλά δυστυχώς και εκεί έχω την ίδια συμπεριφορά. Ψάχνωντας στο google βρήκα παραδείγματα παρόμοια με το παραπάνω, αλλά για κάποιο λόγο δεν μπορώ να το κάνω να δουλέψει.