Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Help- Exporting General Fields Image
Message
 
 
À
13/09/2000 13:45:09
Information générale
Forum:
Visual FoxPro
Catégorie:
Photos et traitement d'images
Divers
Thread ID:
00406626
Message ID:
00416650
Vues:
16
>You can do that with a tool available at www.aspupload.com
>this example we use saves a ole JPG file from a SQL database to a file excelhelper.jpg
>file_g is the database fildname where the ole object is stored in.The databasename is image
>
>
>
>*** savejpg.prg ***
>parameters cImagenr
>LOCAL lcConnStr,lcSQL,oConnection,rs
>su=createobject("aspSmartUpload.SmartUpload")
>lcConnStr="DRIVER=SQL Server;SERVER=sqlserver;User Id=sa;PASSWORD=;DATABASE=pictures"
>oConnection=CREATEOBJECT("ADODB.Connection")
>oConnection.open(lcConnStr)
>lcSQL="select file_g from image where ID_image="+cImagenr
>rs=oConnection.execute(lcSQL)
>rs.close
>rs.cursorType=1 && 1=ADOPENKEYSET
>rs.open
>x=rs.Fields("file_g")
>if rs.recordCount>0
> su.FieldToFile(x, "c:\excelhelper.jpg")
>endif
>rs.close
>oConnection.close
>RETURN
Thanx for the reply,
I won't have time this week to try - but will let you know how it works out later.
Edgar L. Bolton, B.S. B.B.A.
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform