Componente

Caso vocês possua algum componente da TecnoSpeed, basta realizar a configuração de algumas propriedade que será possível realizar o envio automático para o Nota Segura.

Componente

Basta utilizar o componente Nota Segura, que atualmente é instalado junto com nossos componentes e realizar as configurações abaixo.

Delphi

                        
procedure TDemonstracaoNotaSegura.btnEnviarClick(Sender: TObject);
var
  spdNotaSegura: TspdNotaSeguraX;
begin
  spdNotaSegura := TspdNotaSeguraX.Create(nil);

spdNotaSegura.Token := 'token'; spdNotaSegura.Login := 'email-cliente@email.com'; spdNotaSegura.Senha := 'senha-do-cliente'; mmXml.Text := spdNotaSegura.EnviarXml('Conteúdo do XML da nota'); end;

C#

Antes de adicionar o código abaixo, referencie no seu projeto a OCX spdNotaSeguraX.ocx, que fica no diretório C:\Windows\System32\spdNotaSeguraX.ocx ou C:\Windows\System64\spdNotaSeguraX.ocx.

                        
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Windows.Forms;
using spdNotaSegura;

namespace NotaSegura { public partial class Form1 : Form { spdNotaSeguraX NotaSegura = new spdNotaSeguraX(); public Form1() { InitializeComponent(); }

private void Form1_Load(object sender, EventArgs e)
{
    NotaSegura.Token = "token";
    NotaSegura.Login = "email-cliente@email.com";
    NotaSegura.Senha = "senha-do-cliente";
    MessageBox.Show(NotaSegura.EnviarXml("Conteúdo do XML da nota"));
}

}

}

VB6

Antes de adicionar o código abaixo, referencie no seu projeto a OCX spdNotaSeguraX.ocx, que fica no diretório C:\Windows\System32\spdNotaSeguraX.ocx.

                        
Dim NotaSegura As spdNotaSegura.spdNotaSeguraX

Private Sub Form_Load() Set NotaSegura = New spdNotaSegura.spdNotaSeguraX

NotaSegura.Token = "token" NotaSegura.Login = "email-cliente@email.com" NotaSegura.Senha = "senha-do-cliente" MsgBox (NotaSegura.EnviarXml("Conteúdo do XML da nota"))

End Sub