[JavaScript]
var myDoc = app.activeDocument;
myDoc.exportFile(ExportFormat.EPS_TYPE, File("/c/sample.eps"));
[VBScript]
Set app = CreateObject("InDesign.Application")
Const idEPSType = 1952400720
Set myDoc = app.ActiveDocument
myDoc.Export idEPSType, "C:/sample.eps", False