VBscript place linked image
Hi everyone,
I am working on a small project which gets a list of image file locations from a DB and then I need to loop through the files and put the images onto the active photoshop document as a linked image.
The first part is easy enough, I found the photoshop scripting guide and cut and paste the Hello world example.
The only issue I have now is that I need to place the linked image on the active document.
I know that people prefer to program in Javascript to get this job done, but could someone kindly help me out with the VBscript. Thanking you kindly for your help.
Below is the code I have so far:
Dim appRef
appRef = CreateObject("Photoshop.Application")
Dim docRef
Dim artLayerRef
Dim textItemRef
docRef = appRef.ActiveDocument
'add the image --->>> this is a test file to place it as a linked file
Dim file As String
file = "D:\one_drive\OneDrive\English School\MES\Unit 3\feelings\images\real images\01 Happy.jpg"
'???? Now what??? ;(
' below is the hello world example
artLayerRef = docRef.ArtLayers.Add
artLayerRef.Kind = 2
' Set the contents of the text layer.
textItemRef = artLayerRef.TextItem
textItemRef.Contents = "Hello, World!"
