<%@ LANGUAGE="VBSCRIPT" %> <% DIM Main %> Permission to Reproduce
GO TO CMA Home
GO TO Inside CMA
GO TO Advocacy and Communications
GO TO Member Services
GO TO Publications
GO TO Professional Development
GO TO Clinical Resources

GO TO What's New
GO TO Contact CMA
GO TO Web Site Search
GO TO Web Site Map

Publications

Permission Request Form <% If Request.Form("publication") = "" Or Request.Form("date") = "" Or Request.Form("article") = "" Or Request.Form("author") = "" Or Request.Form("items") = "" Or Request.Form("purpose") = "" Or Request.Form("copies") = "" Or Request.Form("format") = "" Or Request.Form("name") = "" Or Request.Form("member") = "" Or Request.Form("address") = "" Or Request.Form("email") = "" Or Request.Form("telephone") = "" Then %> <% If Request.Form("check") <> "" Then %>

Please ensure that all required fields have been completed. <% End if %>

* Denotes a required field.

Title of publication:*
">
Volume:
">		 Issue:
">		 Date of publication:*
">

Title of article/chapter:*
">
Author(s):*
">
Item(s) to be reproduced (e.g., Pages 14-16, Fig. 3, Table 4):*
">

Purpose for reproduction (state target audience and method of distribution) or title of publication in which copy will appear:*
Number of copies:*
">		 Format (e.g., paper, online, CD-ROM):*
">

Name of requester:*
">
Are you a member of the CMA?*    Yes    No
Mailing address (please include company name if applicable):*
Email address:*
">
Telephone number:*
">		 Fax number:
">

     

<% Else Main = "Fax number: " & StripText(Request.Form("fax")) & VbCrLf & Main Main = "Telephone: " & StripText(Request.Form("telephone")) & VbCrLf & Main Main = "Email: " & StripText(Request.Form("email")) & VbCrLf & Main Main = "Address: " & StripText(Request.Form("address")) & VbCrLf & Main Main = "CMA Member: " & StripText(Request.Form("member")) & VbCrLf & Main Main = "Name: " & StripText(Request.Form("name")) & VbCrLf & Main Main = "Format: " & StripText(Request.Form("format")) & VbCrLf & VbCrLf & Main Main = "Number of Copies: " & StripText(Request.Form("copies")) & VbCrLf & Main Main = "Purpose: " & StripText(Request.Form("purpose")) & VbCrLf & Main Main = "Items to reproduce: " & StripText(Request.Form("items")) & VbCrLf & Main Main = "Author(s): " & StripText(Request.Form("author")) & VbCrLf & Main Main = "Title of article: " & StripText(Request.Form("article")) & VbCrLf & Main Main = "Date of publication: " & StripText(Request.Form("date")) & VbCrLf & Main Main = "Issue: " & StripText(Request.Form("issue")) & VbCrLf & Main Main = "Volume: " & StripText(Request.Form("volume")) & VbCrLf & Main Main = "Title of publication: " & StripText(Request.Form("publication")) & VbCrLf & Main vFromName = StripText(Request.Form("name")) vFromAddress = StripText(Request.Form("email")) vRemoteHost = "192.168.2.1" vRecip = "permissions" vToAd = "cma.ca" 'Mailer.AddRecipient "CMA Publications", "permissions@cma.ca?subject=Copyright permission" vSubject = "Permission Request Form Submission" vBody = Main if sendmail(vRecip, vToAd, vRemoteHost, vFromName, vFromAddress, vSubject, vBody) then Response.Write "

" & VbCrLf & "Your request has been sent." else Response.Write "

" & VbCrLf & "There was a problem sending your message. The error was " & Mailer.Response end if End if %>