Thanks for your help and here is my code.

dodefault()

if this.parent.editmode
********* WITH OUTLOOK AUTOMATION: *********
	else
	*set step on
    select llamadas.numero as numero, llamadas.fllamada as fllamada, llamadas.detalle as detalle, clientes.mail as correo from llamadas, clientes where llamadas.numero=thisform.numero1.value and clientes.codigo = thisform.usuario1.value into cursor mira
    Wait windows "Enviando Correo...." nowait
	cuerpo="Estimado cliente."+chr(13)
	cuerpo=cuerpo+"Colservice se permite informarle a través de este medio"+chr(13)
	cuerpo=cuerpo+"que se le ha generado la llamada No. "+alltrim(str(mira.numero))+" "+dtoc(mira.fllamada)+", con el siguiente"+chr(13)
	cuerpo=cuerpo+"requerimiento:"+chr(13)+chr(13)
	cuerpo=cuerpo+alltrim(mira.detalle)+chr(13)+chr(13)
	cuerpo=cuerpo+"Atentamente,"+chr(13)+chr(13)
	cuerpo=cuerpo+"Helpdesk Colservice"	
	
	oMail = CreateObject("Outlook.Application")
	oMsg = oMail.CreateItem(0) && mail item
	With oMsg
	   .Subject = "Creación de Tiquete: "+alltrim(str(mira.numero))
	   .Body = cuerpo &&"My body string"
	   .Recipients.Add(alltrim(mira.correo))
	   .Send
	EndWith
	Wait windows ".:Correo enviado:." nowait
endif

Where do i have the problem?

Thanks for your support.