Hej!

Håller på med ett projekt där jag i min enfald trodde att det räckte om jag sparade ner sökvägen till bilderna i min sql-databas.

Nu visade det sig att Crystal Reports som jag använder inte gillar att använda dynamiska länkar för att visa olika bilder beroende på vilken produkt som avses. De vill istället att man skall använda image datatypen och spara ner bilderna i själva databasen.

Nu är ju grejen att jag redan har sparat ner sökvägen till alla bilderna kopplade till artikelnumret i text datatypen. Finns det något enkelt sätt att bara konvertera detta till image datatyp nu eller måste jag göra om denna delen?

Det rör sig om ca 900 artiklar/bilder som skall kopplas...

Hoppas på hjälp!
/kristina

Detta går att utföra via en klient, t.ex DTS.
Du får alltså ta och programmera fram en lösning för detta själv. Jag vet inte om någon universallösning som man kan använda.

/micke

Har hittat och läst om ngt som heter BCP Utility i SQL som hanterar massimporter och bulk inserts men jag förstår inte riktigt hur det skall användas. Ngn som kan ge mig lite vägledning?

/kristina

'Exempelkod för att läsa skriva bilder till SQL server
'Access and Modify SQL Server BLOB Data by Using the ADO Stream Object

<code>
'Read from sql
Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset
Dim mstream As ADODB.Stream

Set cn = New ADODB.Connection
cn.Open "Provider=SQLOLEDB;data Source=<name of your SQL Server>;
</code>
Initial Catalog=pubs;User Id=<Your Userid>;Password=<Your Password>"

Set rs = New ADODB.Recordset
rs.Open "Select * from pub_info", cn, adOpenKeyset, adLockOptimistic

Set mstream = New ADODB.Stream
mstream.Type = adTypeBinary
mstream.Open
mstream.Write rs.Fields("logo").Value
mstream.SaveToFile "c:\publogo.gif", adSaveCreateOverWrite

rs.Close
cn.Close

'write to sql
Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset
Dim mstream As ADODB.Stream
Set cn = New ADODB.Connection
cn.Open "Provider=SQLOLEDB;data Source=<name of your SQL Server>;
Initial Catalog=pubs;User Id=<Your Userid>;Password=<Your Password>"

Set rs = New ADODB.Recordset
rs.Open "Select * from pub_info", cn, adOpenKeyset, adLockOptimistic

Set mstream = New ADODB.Stream
mstream.Type = adTypeBinary
mstream.Open
mstream.LoadFromFile "<path to .gif file>"
rs.Fields("logo").Value = mstream.Read
rs.Update

rs.Close
cn.Close

BCP läser BARA textfiler, så länge du inte har bilderna i EN textfil så fungerar tyvärr inte den.

Tja!
Inte ska du väl behöva lägga in själva bilderna i databasen heller.
I mitt program skapar jag ett dataset som jag fyller med data från databasen sen lägger jag in bilder i datasetet programatiskt för att sedan koppla det som datakälla till mina rapporter i crystal.