View Single Post
  #1 (permalink)  
Old October 17th, 2007, 10:21 AM
gopsy_25 gopsy_25 is offline
Registered User
 
Join Date: Oct 2007
Location: aurangabad, maharashtra, India.
Posts: 1
Thanks: 0
Thanked 0 Times in 0 Posts
Send a message via Yahoo to gopsy_25
Default implementing indesign files in asp.net

hi friends,

I am building an application in asp.net in which my task is to create a pdf file by using the Adobe Indesign CS2 in asp.net.

In this i am using Adobe Indesign CS2 trial version.
I am using the code which is found from the net but on running this is given an error That:

"System.UnauthorizedAccessException: Access is denied."

now tell me about this error and what i have to do to achieve this task. this is really urgent one

atleast reply if u don't know the answer also please.......

Here's my code::

Imports System
Imports System.Data
Imports System.Configuration
Imports System.Web
Imports System.Web.Security
Imports System.Web.UI
Imports System.Web.UI.WebControls
' Imports System.Web.UI.WebControls.WebParts
Imports System.Web.UI.HtmlControls
Imports InDesign


Public Class _Default
    Inherits System.Web.UI.Page
    Protected Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load


        Dim cstrInddFile As String = Server.MapPath("~/Archieve/yourstory_backcover1.indd")
        Dim cstrXMLFile As String = Server.MapPath("~/Archieve/xml1.xml")
        Dim cstrOutputFile As String = Server.MapPath("~/Archieve/out.pdf")

        Dim indAppType As Type = Type.GetTypeFromProgID("InDesign.Application")
        Dim objInDesign As InDesign.Application = DirectCast(Activator.CreateInstance(indAppType, True), InDesign.Application)
        Dim objDoc As InDesign.Document = DirectCast(objInDesign.Open(cstrInddFile, False), InDesign.Document)

        objDoc.ImportXML(cstrXMLFile)

Dim objPreset As InDesign.PDFExportPreset=DirectCast(objInDesign.PD FExportPresets.LastItem(),InDesign.PDFExportPreset )
objDoc.Export(idExportFormat.idPDFType, cstrOutputFile, False, objInDesign.PDFExportPresets("Press"))

End Sub

End Class

Reply With Quote