Page tree

Versions Compared

Key

  • This line was added.
  • This line was removed.
  • Formatting was changed.

...

Code Block
titleInserting an Image from a byte array VB
languagevbnet
'The ReadAllBytes method can be used to create a byte array from an image filepath.
Dim imgArray as Byte() = File.ReadAllBytes(@"C:\image.png")

'create an object array of values to be populated
Dim valuesArray as Object() = new Object() {imgArray}

'create a string array of column names.
'the field names must match the data marker column names in the template.
Dim colNames = New String() {"Logo(image(1,2,2))"}

Dim DataProps As DataBindingProperties = pptt.CreateDataBindingProperties()

'Bind the data to the template
pptt.BindData(valuesArray, colNamesArray, "Company",pptt.CreateDataBindingProperties())
pptt.Process()

'Pass the template to PowerPointApplication
Dim ppta As PowerPointApplication = new PowerPointApplication()
Dim pres As Presentation = ppta.Open(pptt)

'Get the first slide in the presentation
Dim slide1 As Slide = pres.Slides(0)

//'Get the first picture on the slide 
Dim allPics As Pictures = slide1.Pictures
Dim pic As Picture = allPics(0)
            
//'Set the alignment to be in the center of the slide, both horizontally and veritcally
pic.Align(Alignment.Center)
pic.Align(Alignment.Middle)