Vi posto qualche info in più.

Ecco qua un po' più di codice:
codice:
' *******************************************************
' Procedura di stampa dei cartellini multipli
' *******************************************************
cn.Provider = "MSDataShape"
cn.Open "dsn=" & strNomeODBC & ";Pwd=tt3db$$;"

With cmd
  .ActiveConnection = cn
  .CommandType = adCmdText
  .CommandText = " SHAPE {SELECT ..... FROM tblStampaMultipla ORDER BY Data} AS Command1 COMPUTE Command1 BY ......                
                            
  .Execute
End With
L'errore viene generato in corrispondeza di .Execute.
Forse il problema sta nel provider utilizzato per lo SHAPE?
codice:
cn.Provider = "MSDataShape"
Sto provando altre soluzioni che possono piacere a Vista.

Qualche suggerimento?