Não compreendi direito pois os dialetos são um pouco diferentes :)

Você esta tentando enviar caracteres para a Com3?

Se for isso, segue rotina:

com=createobject("mscommlib.mscomm.1")
com.commport=3
com.Settings = "9600,N,8,1"
com.portopen=.t.
com.output="teste"

Para saber mais sobre este controle (mscomm.ocx), insira ele em um form e procure o help dele.

Poderia ser assim tmb, mas você perderia o tratamento das informações.

set printer to com3:
??? "teste"
set printer to