VB and Corel

Hi, I have a need to open all files in a directory, apply certain filter types and then save the files again. I'm fine with VB but new ro the Corel (10) side of things. I would really like to do this in VB6.

Anyone got any sample code to get me started?

Thanks,
Tull.

[Alex]

Tull,

You just need to use VB's Dir function to iterate through all the files in a folder, then open them one by one, do whatever you need and then save. For example:

Sub Test()
    Const InPath As String = "C:\Input\"
    Const OutPath As String = "C:\Output\"
    Dim f As String
    Dim doc As CorelDRAW.Document
    f = Dir(InPath & "*.cdr")
    While f <> ""
        Set doc = CorelDRAW.OpenDocument(InPath & f)
        ' .... Do something to your document here
        doc.SaveAs OutPath & f
        doc.Close
        f = Dir() ' Find next file
    Wend
End Sub

This is briefly what you need to do...