Description
Represents a MacroPdf417 bar code.
For a list of all members defined in this module, see MacroPdf417 members.
Interfaces
| Implemented Interface | Description |
|---|
| Object | |
Example
[ASP - VBScript]
<!-- METADATA TYPE="typelib" UUID="{DF9225FE-94A4-490D-8CAD-E8366CE621D3}"-->
<%
'Create a Document
Dim MyDocument
Set MyDocument = Server.CreateObject( "DynamicPDF.Document" )
Dim MyPage
Set MyPage = MyDocument.AddPage()
'Read text from a file
Dim MyFSO
Dim MyTextFile
Set MyFSO = Server.CreateObject( "Scripting.FileSystemObject" )
Set MyTextFile = MyFSO.OpenTextFile( Server.MapPath( "../Text/TextData.txt" ), 1, 0 ) 'Reading file
Dim text
text = MyTextFile.ReadAll
MyTextFile.Close()
Set MyTextFile = Nothing
Set MyFSO = Nothing
'Add barcode
Dim MyMacroPdf417
Set MyMacroPdf417 = MyPage.AddMacroPdf417( text, 10, 10, 24, 0.3 )
MyMacroPdf417.Compaction = DPDF_Compaction_ByteCompaction
MyMacroPdf417.Color = "Black"
'Draw PDF
MyDocument.DrawToWeb
Set MyPage = Nothing
Set MyDocument = Nothing
%> |
See Also
MacroPdf417 Members
© Copyright 2007, ceTe Software
