https://youtu.be/Mn_d78iToAw
Bom Dia Boa Tarde Boa Noite
Mande um email pedido para receber todas notificaçoes dos videos
email : amarildo.matos@gmail.com
Seja Membro do Canal
Esse Video vai estrear as 06:00 do dia 24/05/2021
DICAS 3334 - WINDEV WEBDEV MOBILE - CertificateList - Retorna a lista de certificados disponíveis no computador - CURSO CERTIFICADO 14
Assunto:
CertificateList - Retorna a lista de certificados disponíveis no computador
Windev - Criar uma windows chamado Certificado
Criar uma Tabela com Dados do Certificado
Criar um botao para listar os certificados
Colunas
1 Nome
2 Nome completo
3 Issuer
4 situacao Certificfado
5 Data Inicial Valida
6 Data Final Valida
7 Serial
8 ThumbPrint
9 subject
10 Objet
11 Empreinte
Fazer o codigo
Mostrar Exemplo Pratico
----------- Codigo
// Recupere a lista de certificados disponíveis no computador // (armazenamento de certificados pessoais do Windows)
TABLE_Certificado.DeleteAll() // vamos eliminar os dados da tabela
arrAy_certificado is array of Certificate //Vamos criar um array de certificado
arrAy_certificado=CertificateList() // Vamos agora preencher esse array com os certificados encontrados no windows
certificado_individual is Certificate // vamos criar um certificado individual
FOR EACH certificado_individual OF arrAy_certificado // vamos percorrer o array
IF certificado_individual.ValidForSignature=True THEN // Verifica se o certificado é válido para assinatura
sItuacao_certificado is string="" // vamos verificar a situacao do certificado
SWITCH certificado_individual.Reliability
CASE certificateOk:
sItuacao_certificado = "Certificado Valido"
CASE certificateInvalid:
sItuacao_certificado = "Certificado Invalido"
CASE certificateUntrusted:
sItuacao_certificado = "Certificao Nao confiavel"
CASE certificateExpired:
sItuacao_certificado = "Expirado Certificado"
END
nOcorrencia is int=TableAddLine(TABLE_Certificado)// vamos adicionar uma linha na tabela
TABLE_Certificado[nOcorrencia].COL_Nome=certificado_individual.Name
TABLE_Certificado[nOcorrencia].COL_Nome_Completo = certificado_individual.FullIssuer
TABLE_Certificado[nOcorrencia].COL_Issuer = certificado_individual.Issuer // nome empresa
TABLE_Certificado[nOcorrencia].COL_Situacao_Certificado = sItuacao_certificado
TABLE_Certificado[nOcorrencia].COL_Data_Inicial_valida = certificado_individual.StartValidityDate
TABLE_Certificado[nOcorrencia].COL_Data_Final_Valida = certificado_individual.EndValidityDate
TABLE_Certificado[nOcorrencia].COL_Serial = certificado_individual.SerialNumber
TABLE_Certificado[nOcorrencia].COL_ThumbPrint = NoSpace(certificado_individual.ThumbPrint,sscAll)
TABLE_Certificado[nOcorrencia].COL_Subject = certificado_individual.Subject
TABLE_Certificado[nOcorrencia].COL_Objet = certificado_individual.Subject
TABLE_Certificado[nOcorrencia].COL_Empreinte = certificado_individual.ThumbPrint
END
END
------------ Indice Certificado
Blog - WinDev - Curso Certificado - 001/... - Seleciona Certificado - Certificate Select
Blog - WinDev - Curso Certificado - 002/... - Certificate Type - Pegar Dados Certificado
Blog - WinDev - Curso Certificado - 003/... - Ver se Certificado é Válido
Blog - WinDev - Curso Certificado - 004/... - CertificateLoad - Chamar pfx/arquivo
Blog - WinDev - Curso Certificado - 005/... - Assinatura Digital Nfe - Parte 1/...
Blog - WinDev - Curso Certificado - 006/... - Assinatura nfe - Parte 2/... - System.xml.xmlDocument
Blog - WinDev - Curso Certificado - 007/... - Assinatura nfe - Parte 3/... - Assinar Documento
Blog - Windev - Curso Certificado - 008/... HttpListCertificate
Blog - WinDev - Curso Soap - 009/... Consulta Cadastro Sefaz - WebService
Blog - WinDev - Curso Soap - 010 - Status Nfe Sefaz - WebService
DonwLoad Arquivo/Barra progresso/Http - WinDev - Certificado 011/...
CertificateSelect - DICAS 1955 - PUBLICA - WINDEV - Certificado 12 -
DICAS 1981 - MOBILE-13- InternetConnected (Função) VERIFICAR SE TEM INTERNET -
Blog - WinDev - Curso Certificado - 001/... - Seleciona Certificado - Certificate Select
Blog - WinDev - Curso Certificado - 002/... - Certificate Type - Pegar Dados Certificado
Blog - WinDev - Curso Certificado - 003/... - Ver se Certificado é Válido
Blog - WinDev - Curso Certificado - 004/... - CertificateLoad - Chamar pfx/arquivo
Blog - WinDev - Curso Certificado - 005/... - Assinatura Digital Nfe - Parte 1/...
Blog - WinDev - Curso Certificado - 006/... - Assinatura nfe - Parte 2/... - System.xml.xmlDocument
Blog - WinDev - Curso Certificado - 007/... - Assinatura nfe - Parte 3/... - Assinar Documento
Blog - Windev - Curso Certificado - 008/... HttpListCertificate
Blog - WinDev - Curso Soap - 009/... Consulta Cadastro Sefaz - WebService
Blog - WinDev - Curso Soap - 010 - Status Nfe Sefaz - WebService
DonwLoad Arquivo/Barra progresso/Http - WinDev - Certificado 011/...
CertificateSelect - DICAS 1955 - PUBLICA - WINDEV - Certificado 12 -
DICAS 1981 - MOBILE-13- InternetConnected (Função) VERIFICAR SE TEM INTERNET -
PlayList WebDev tutorial Amarildo Webdev
Playlist Windev Tutorial Amarildo Windev
PlayList Windev Mobile
Amarildo
Donwloads Windev
Windev
WxSolucoes
Matos Informatica
Repositorio Windev
Inscricao Evento Pcsof
Site forum Google
Video sobre 3 Mil Videos Windev
Video sobre Alfaserver servidor