Hej,
Since I was trying to adapt from an example, there was a piece of code that was makeing
file$ equal to 0. I took that out and now the code works.( I used a lot of print file$ before I found the mistake.) Your replies got me on the right track, thanks.
Here's the code that works.
rem first loop to get the dbo file to show object.
do
getevent
if eventType()=MOUSE_CLICK
if eventSource()= Gadget1
file$=openDialog("Load List","dbo Files (*.dbo)|*.dbo")
endif
exit
endif
loop
load object file$, 1
PositionObjectPro(1,0,0,5)
May the sun shine on the soles of your feet.