Execute Script

[cadbob]

Would be nice that after you use "EXECUTESCRIPT" that it remembers where your scripts are stored on PC.

It defaults to Desktop.

[jberen]

Mine doesn't!! HAHA!! 😉

[cadbob]

wtf 🙂

[cadbob]

Mine is now with SP1

[tim-bot]

for the .net savy

<CommandMethod("ABCD", "CustomExecuteScript", CommandFlags.Modal)>
    Public Sub CustomExecuteScript()
        Using oDlg As New System.Windows.Forms.OpenFileDialog With {
            .AddExtension = True,
            .AutoUpgradeEnabled = True,
            .CheckFileExists = True,
            .DefaultExt = "cod",
            .DereferenceLinks = True,
            .Filter = "CADmep Script Code (*.cod)|*.cod",
            .Multiselect = False,
            .Title = "Execute Script"}
            If oDlg.ShowDialog = Forms.DialogResult.OK Then
                Doc.SendStringToExecute("(Progn (Command ""TakeOff"")(ExecuteScript """ & oDlg.FileName.Replace("\", "/") & """)(Princ)) ", True, False, False)
            End If
        End Using
    End Sub

[andy.robins]

Executescript command now uses and remembers the SCRIPT folder defined in MAP.INI instead of the desktop.