top2nd.jpg (21953 bytes)
bottom6.jpg (8109 bytes)

Guest Book

To receive a valuable personalized discount coupon using the latest printing technologies, just supply us with the information below. Your coupon will be good for discounts on your next graphic communications purchase at U.L. We are anxious to hear from you and look forward to sending you a valuable coupon and information.

First Name

Last Name

Organization Name

Address

City

State

Zip Code

Country

Work Phone

Fax Number

E-mail Address


bottom5.jpg (7571 bytes)

line.jpg (2355 bytes)

ullogoliter.jpg (1622 bytes)[Home] [New Client Area] [Client Area] [Guestbook]
  [UL Staff] [Products Services] [Gallery] [What's New]

<% '********************************************************************** '* Java.JMailer spec. '* Methods: '* SendMail - Send mail and return TRUE if mail is send '* Properties: '* MailServerHost - Your Mail serve Host or IP address '* MailTo - Receiver mail address '* MailFrom - Sender mail address '* MailSubject - Subject '* MailMessage - Message '* ErrorString - In case of error Explanation of error '* DebugMode - Set to TRUE to get detailed report of communication between '* Mail Server and Java Mail component. Default is FALSE '* DebugString - If DebugMode is set to TRUE after invocing SendMail '* method read this property to get detailed communication string '* between Mail Server and this component '********************************************************************** ' Create object Set mail = CreateObject("Java.JMailer") ' Your mail server address (Host name or IP number) mail.MailServerHost = "mail.spkn.uswest.net" ' Receiver Mail address mail.MailTo = "recept@unitedlithographers.com" ' Sender Mail address mail.MailFrom = "inland.com" ' Mail subject can be Empty mail.MailSubject = "Guestbook" ' Mail message text mail.MailMessage = "An order has been submitted to the Guestbook Database" ' And finally send mail a = mail.SendMail ' SendMail method return TRUE if operation was succesful or FALSE if not ' In case of error in ErrorString property you can find Error message If a Then Response.Write "Your order has been received and an email notification sent to our staff." Else Response.Write "Error by send mail: " & mail.ErrorString End If Set mail=Nothing %>