X509_CertRequest

Creates a PKCS-10 certification signing request (CSR).

VB6/VBA

Debug.Print "Testing X509_CertRequest ..."
Dim nRet As Long
nRet = X509_CertRequest("myreq.p10.txt", "mykey.epk", _
  "CN=myuser,O=Test Org,C=AU,L=Sydney,S=NSW", "", "password", 0)
If nRet <> 0 Then
  Debug.Print nRet & " " & pkiGetLastError()
Else
  Debug.Print "Success"
End If

Output

Testing X509_CertRequest ...
Success

VB.NET

Console.WriteLine("Testing X509_CertRequest ...")
Dim nRet As Integer
nRet = X509.CertRequest("myreq.p10.txt", "mykey.epk", _
  "CN=myuser,O=Test Org,C=AU,L=Sydney,S=NSW", "password", 0)
If nRet <> 0 Then
    Console.WriteLine(nRet & " " & General.LastError())
Else
    Console.WriteLine("Success")
End If

[Contents]