|
|||||
| | |||||
On Error Resume Next
Set mappAcad = GetObject(,"AutoCAD.Application")
If (Err.Number = 0) Then
MsgBox "Unable to connect to AutoCAD!"
Unload Me
End If
if intnumber = 1 then
...
elseif intNumber =2 then
...
else
...
end if
dim matriz (10)
for i=0 to 10
matriz(i)=100 * i
next
for i=0 to 10
document.writeln("Posicion " & i & ": " & matriz(i) & "
")
next
for x=0 to UBound(miArray) document.write(miArray(x)) next
| Leave a Reply |