ok this sucks need help with simple program

[Shaun29]

Sub BOM()
Write #1, "txt.outputbom.txt" eof(1)
Close #1

End sub

i open CAD I run VBAIDE i put this in and the output file does not get wrote to
what am i doing wrong i have tried to open the text file

Sub BOM()

Open "BOM_TEXT.dwg" For Append As #1
Write #1, "txt.outputbom.txt" eof(1)
Close #1

End sub


and nothing works

 

[mintjulep]

You're trying to open an AutoCad .dwg file with a function that was intended to deal with ASCII text files.

That might produce unexpected results.