Description
Adds a Ean13 bar code object to the AreaGroup object and returns a New Ean13 object.
Syntax
Public Function AddEan13( _
ByVal CodeValue As String, _
ByVal X As Single, _
ByVal Y As Single _
) As Ean13
Parameters
- CodeValue
- The value stored in the bar code.
- X
- The X Coordinate of the Ean13 bar code.
- Y
- The Y Coordinate of the Ean13 bar code.
Return Type
A Ean13 object.
Example
[ASP - VBScript]
<%
' Create a PDF Document
Dim MyDocument
Set MyDocument = Server.CreateObject( "DynamicPDF.Document" )
' Create a Page and add it to the document
Dim MyPage
Set MyPage = MyDocument.AddPage()
Dim MyAreaGroup
Set MyAreaGroup = MyPage.AddAreaGroup( 400, 300 )
' Create a bar code
Dim MyBarcode
Set MyBarcode = MyAreaGroup.AddEan13( "123456789012", 50, 50 )
' Draw the PDF
MyDocument.DrawToWeb
Set MyPage = Nothing
Set MyDocument = Nothing
%>
|
See Also
AreaGroup Object
