VBScript Examples

ChilkatHOMEASPVisual BasicVB.NETC#Visual C++CMFCDelphiFoxProJavaPerlPHPPythonRubySQL ServerVBScript



VBScript Examples

Bounced Mail
Character Encoding
Digital Certificates
Digital Signatures
Email
FTP
HTML-to-XML
HTTP
IMAP
Encryption
MHT / HTML Email
PFX
RSA Encryption
S/MIME
Socket
Spider
String
Tar
Upload
XML
XMP
Zip Compression
Self-Extractor

More Examples...
Email Object
POP3
SMTP
Byte Array
RSS
Atom

Unreleased...
Service
PPMD
Deflate
Bzip2
LZW
Bz2
DH Key Exchange
DSA
Icon

 

 

 

 

 

 

 

Validate the FindCertBySubjectE Method

Iterate over the certificates in the Local Machine Certificate Store and verify that FindCertBySubjectE is working correctly for each cert's SubjectE property.

' Iterate over each certificate in the local machine store
' and test the FindCertBySubjectE method
set ccs = CreateObject("ChilkatCertificate.ChilkatCreateCS")

' Open the local machine certificate store
set certStore = ccs.OpenLocalSystemStore()

numCerts = certStore.NumCertificates

for idx = 0 to numCerts-1
	set cert = certStore.GetCertificate(idx)
	if len(cert.SubjectE) > 0 then
		set cert2 = certStore.FindCertBySubjectE(cert.SubjectE)
		if cert2 is nothing then
			MsgBox "Error: Could not find " + cert.SubjectE
		else
			MsgBox "Found " + cert.SubjectE
		end if
	end if
next

 

Need a specific example? Send a request to support@chilkatsoft.com

© 2003-2007 Chilkat Software, Inc. All Rights Reserved.

Mail Component · XML Parser