S
sandeepkedlaya
Hello,
I need to copy images from a folder and copy to a word document. I
have done as follows.. but It copies only last image. Can any one of
you help me in this..
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Load
Response.Buffer = True
Dim DirPath As String
DirPath = "D:\ASPDotNet\images\"
Dim FileName As String
Response.ContentType = "application/msword"
Response.AddHeader("Content-Disposition",
"inline;filename=TestImage.doc")
Dim FileList As String() = Directory.GetFiles(DirPath)
For Each FileName In FileList
Image1.Style.Item("Height") += 50
Image1.ImageUrl = FileName
Label1.Text = "this is Image No:" & i
Label1.Style.Item("Height") += 50
i = i + 1
Next
End Sub
I need to copy images from a folder and copy to a word document. I
have done as follows.. but It copies only last image. Can any one of
you help me in this..
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Load
Response.Buffer = True
Dim DirPath As String
DirPath = "D:\ASPDotNet\images\"
Dim FileName As String
Response.ContentType = "application/msword"
Response.AddHeader("Content-Disposition",
"inline;filename=TestImage.doc")
Dim FileList As String() = Directory.GetFiles(DirPath)
For Each FileName In FileList
Image1.Style.Item("Height") += 50
Image1.ImageUrl = FileName
Label1.Text = "this is Image No:" & i
Label1.Style.Item("Height") += 50
i = i + 1
Next
End Sub