Print 2 Images On One Page
How do I merge 2 tiff images to one page and print it ?
View Complete Forum Thread with Replies
See Related Forum Messages: Follow the Links Below to View Complete Thread
How To Print Images That Fit To The Page Size Specified In Print Common Dialog?
i need some help in printing the whole image tat fit onto the paper size i specified in Print Common Dialog. I hav a PictureBox array & each PictureBox contains a smaller Picturebox inside. For example : Picture1(index) has a smaller Picture2(index) inside. There are vertical & horizontal scrollbars next to each Picture1(index).
i already hav the basic Print Common Dialog code below. Here's the problem -> I can print out the pictures displayed inside Picture2(index) but the printout will turn out truncated or just part of the whole picture when im printing to a 4R photo size for example and the image displayed in Picture2(index) is larger then the bounding Picture1(index) & i need to use the scrollbars to scroll and view the other portions of the image.
So how to modify the code below to print out the whole image tat fit nicely to the paper size i specified. Thanxs.
'---------------------------------------------------------------------
'CODE
'---------------------------------------------------------------------
CommonDialog1.CancelError = True
On Error Resume Next
CommonDialog1.Action = 5 ' Start the Print Common Dialog
If (Err.Number = cdlCancel) Then Exit Sub
'when Cancel is pressed, exit subroutine
'Code to print the array here
For Pics = Picture2.LBound To Picture2.UBound
If Picture2(Pics).Picture > 0 Then ' If the PictureBox is not empty
Printer.PaintPicture Picture2(Pics).Picture, 0, 0
Printer.EndDoc
End If
Next
'---------------------------------------------------------------------
Problem With Print, Page Setup, And Print Preview In A Text Editor...
Yes, I have another question.
When I use these exact same functions (with WebBrowser.ExecWB in place of txtScrapbook.Text) in my web browser, it works perfectly. But when I use them in reference to a text box, it doesn't.
Can you tell me where the problem lies, or give me an alternative method? I have a common dialog box already for other functions, so feel free to make use of it if you need to. Thanks.
Code:Private Sub PageSetup_Click()
txtScrapbook.Text OLECMDID_PAGESETUP, OLECMDEXECOPT_DODEFAULT
'opens page setup dialog
End Sub
Private Sub Print_Click()
txtScrapbook.Text OLECMDID_PRINT, OLECMDEXECOPT_PROMPTUSER
'opens common dialog box prompting user to print current web page/parts of current web page
End Sub
Private Sub PrintPreview_Click()
txtScrapbook.Text OLECMDID_PRINTPREVIEW, OLECMDEXECOPT_DODEFAULT
'opens print preview dialog
End Sub
Print Picture Box (print A Form That Is Too Large For The Screen Or Page)
I got a picture box (Picture1), which contain several picture box'es, labels and
Flex Grid tables, -which I would like to print. Picture1 is quite high (higher than the screen). I found some code that i modified, but the printing only get the labels proper. The Flex Grids and picture box'es only show the border, and not the contents.
Code:Private Const WM_PAINT = &HF
Private Const WM_PRINT = &H317
Private Const PRF_CLIENT = &H4& ' Draw the window's client area.
Private Const PRF_CHILDREN = &H10& ' Draw all visible child windows.
Private Const PRF_OWNED = &H20& ' Draw all owned windows.
Private Declare Function SendMessage Lib "user32" Alias _
"SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, _
ByVal wParam As Long, ByVal lParam As Long) As Long
Private Sub Print_Click()
Dim rv As Long
Me.ScaleMode = vbTwips ' default
With Picture2
.Top = Picture1.Top
.Left = Picture1.Left
.Width = Picture1.Width
.Height = Picture1.Height
End With
Me.Visible = True
DoEvents
Picture1.SetFocus
Picture2.AutoRedraw = True
rv = SendMessage(Picture1.hwnd, WM_PAINT, Picture2.hDC, 0)
rv = SendMessage(Picture1.hwnd, WM_PRINT, Picture2.hDC, _
PRF_CHILDREN + PRF_CLIENT + PRF_OWNED)
Picture2.Picture = Picture2.Image
Picture2.AutoRedraw = False
Printer.Print ""
Printer.PaintPicture Picture2.Picture, 0, 0
Printer.EndDoc
End Sub
Edited by - Zigar on 11/27/2003 3:31:21 AM
Print Column Header On Each Print Out Page
I am trying to put the header of each column on each print out page.
Right now I have it only appearing on the first page of my printouts.
How do you do that in Excel 2003?
HELP Print Listview Print To Many Page
HI
I am using this to print Listview
When I print 1 page then it is ok but
if data from Listview go on 3 or 4 page then fyrst page is ok
efter fyrst page I only get 1 data on on each page
so this can be many page
Can somone help me what is wrong in this ??
Printer.Font = "Tahoma"
Printer.FontBold = True
Printer.FontUnderline = False
Printer.FontSize = 10
Printer.Print "Print from listview"
Printer.FontUnderline = False
Printer.Print vbNewLine
Printer.CurrentX = 1440
Printer.CurrentY = 1440
PrintListView lvwDataCopy
Printer.EndDoc
Private Sub PrintListView(lvw As ListView)
Const Margin = 60
Const COL_MARGIN = 240
Dim ymin As Single
Dim ymax As Single
Dim xmin As Single
Dim xmax As Single
Dim num_cols As Integer
Dim column_header As ColumnHeader
Dim list_item As ListItem
Dim i As Integer
Dim num_subitems As Integer
Dim col_wid() As Single
Dim X As Single
Dim y As Single
Dim line_hgt As Single
xmin = Printer.CurrentX
ymin = Printer.CurrentY
' ******************
' Get column widths.
num_cols = lvw.ColumnHeaders.Count
ReDim col_wid(1 To num_cols)
' Check the column headers.
For i = 1 To num_cols
col_wid(i) = _
Printer.TextWidth(lvw.ColumnHeaders(i).Text)
Next i
' Check the items.
num_subitems = num_cols - 1
For Each list_item In lvw.ListItems
' Check the item.
If col_wid(1) < Printer.TextWidth(list_item.Text) _
Then _
col_wid(1) = Printer.TextWidth(list_item.Text)
' Check the subitems.
For i = 1 To num_subitems
If col_wid(i + 1) < _
Printer.TextWidth(list_item.SubItems(i)) _
Then _
col_wid(i + 1) = _
Printer.TextWidth(list_item.SubItems(i))
Next i
Next list_item
' Add a column margin.
For i = 1 To num_cols
col_wid(i) = col_wid(i) + COL_MARGIN
Next i
' *************************
' Print the column headers.
Printer.CurrentY = ymin + Margin
Printer.CurrentX = xmin + Margin
X = xmin + Margin
For i = 1 To num_cols
Printer.CurrentX = X
Printer.Print FittedText( _
lvw.ColumnHeaders(i).Text, col_wid(i));
X = X + col_wid(i)
Next i
xmax = X + Margin
Printer.Print
line_hgt = Printer.TextHeight("X")
y = Printer.CurrentY + line_hgt / 2
Printer.Line (xmin, y)-(xmax, y)
y = y + line_hgt / 2
' Print the rows.
num_subitems = num_cols - 1
For Each list_item In lvw.ListItems
X = xmin + Margin
' Print the item.
Printer.CurrentX = X
Printer.CurrentY = y
Printer.Print FittedText( _
list_item.Text, col_wid(1));
X = X + col_wid(1)
' Print the subitems.
For i = 1 To num_subitems
Printer.CurrentX = X
Printer.Print FittedText( _
list_item.SubItems(i), col_wid(i + 1));
X = X + col_wid(i + 1)
Next i
y = y + line_hgt * 1.5
Next list_item
ymax = y
' Draw lines around it all.
Printer.Line (xmin, ymin)-(xmax, ymax), , B
X = xmin + Margin / 2
For i = 1 To num_cols - 1
X = X + col_wid(i)
Printer.Line (X, ymin)-(X, ymax)
Next i
End Sub
Print A Page Without My Print Button!!!
My question concern my web page:
How can i print an html page without it's print button.
I figure out how to hide the button when pressed(with layers)
but when it's finish printing or the user cancel,
how can i make the button visible,i know how but on
what event.
some1 have an idea??
Loading Images Onto A Web Page
I am new to internet programming. I am also in a hurry. What I am trying to do is load a bunch of pictures onto a web page. However, I want to load them duynamically into a forms table. Does anyone know how to do this or point me to some sample code.
Thanks,
Blake
Multi Page Report W/dynamic Images
Here is the situation. I'm able to display one image but I have two images on the report. The report is a two page report. One image on page one and one on page two. Here is the code I'm using:
Code:
Private Sub Section5_Format(ByVal pFormattingInfo As Object)
PPNNumber = Me.Database.Tables.Item(1).Fields.Item(177).Value
CardNumber = Me.Database.Tables.Item(4).Fields.Item(91).Value
PictureFileName = Right$("000000" + Mid$(Str(PPNNumber), 2), 6) + Right$("00" + Mid$(Str(CardNumber), 2), 2) + ".jpg"
100 Set Picture2.FormattedPicture = LoadPicture(UniversDatPath + "PICTURE" + PictureFileName)
Set Picture1.FormattedPicture = LoadPicture(UniversDatPath + "sketch" + PictureFileName)
ErrorHandler:
If Err = 53 Then
PictureFileName = "NOAVAIL.jpg"
Err = 0
GoTo 100
End If
End Sub
One image on the main report and the other is on a subreport. I get an error on PICTURE1.formattedpicture which is "PERMISSION DENIED" Error 70. When that line is executed. I imported my report from Crystal reports 8.5. This was a .rpt. All subreports were rpt also. That created my .dsr report from within vb6. Because I imported from an existing .rpt file do all subreports contained in the main report have to be reimported to establish that they are .dsr files in order to dynamically change images on any of them which contain a ole object?? If you need further info just post it. I will respond.
Saving Web Page Images In Temp Folder!
Using the WebBrowser control, the following code ought to save 'all' images existing in a web page in the user's hard disk (please note that this isn't my code):
VB Code:
Option Explicit' Use component M$ HTML Object LibraryPrivate Declare Function URLDownloadToFile Lib "urlmon" Alias "URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, ByVal szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long Private Function [b]GetFile(URL As String) As String[/b] 'Purpose: returns file title of a URL or local path GetFile = Right$(URL, Len(URL) - InStrRev(URL, "/"))End Function Private Sub [b]Form_Load()[/b] WebBrowser1.Navigate2 "http://www.yahoo.com" Dim objDoc1 As HTMLDocument Dim objDoc2 As HTMLDocument Dim i As Integer Set objDoc1 = New HTMLDocument 'Create document element from url Set objDoc2 = objDoc1.createDocumentFromUrl("http://www.yahoo.com", "") 'Wait till document has loaded Do While objDoc2.readyState <> "interactive" DoEvents Loop 'Loop through images For i = 0 To objDoc2.images.length - 1 'download images and save them in app.path URLDownloadToFile 0, objDoc2.images.Item(i).href, App.Path & "" & GetFile(objDoc2.images.Item(i).href), 0, 0 'MsgBox i Next i Set objDoc1 = Nothing Set objDoc2 = Nothing BeepEnd Sub
There are 2 problems with this code. First, not all the images get saved in the user's hard disk. For e.g. if you navigate to www.yahoo.com, under normal circumstances, 18 images will be saved in IE's Temporary Internet Files folder but the above code only saves 7 images in the folder specified in the code. Any idea how do I overcome this?
Secondly, have a look at the DoEvents line. Because of this line, it takes about 4-5 seconds for the browser to open up but if the DoEvents line is commented, then the browser opens up in a jiffy but not a single image gets saved in the specified folder. Any idea how do I make the above code work without using DoEvents?
BTW, what does the Beep in the above code do?
Thanks,
Arpan
Somebody Help Me!!Retrieving Images From A Databse To Show Up On A Web Page
Hello Again
How are you doing?
I am a bit stuck trying to retrieve images from the database and show them on a web page. I am almost certain that to be able to do this I am going to have to create a component in VB which will first fetch all the images from the database into an ADODB Recorset Object. The rest I am not sure.
I would really appreciate it if you could help me out with this. As of now I am clueless about this. So please help me out.
My email is: orahul@yahoo.com
Rahul
Retrieving Images From A Databse To Show Up On A Web Page
Hello Again
How are you doing?
I am a bit stuck trying to retrieve images from the database and show them on a web page. I am almost certain that to be able to do this I am going to have to create a component in VB which will first fetch all the images from the database into an ADODB Recorset Object. The rest I am not sure.
I would really appreciate it if you could help me out with this. As of now I am clueless about this. So please help me out.
My email is: orahul@yahoo.com
Rahul
How Can I Print Two Images
I have one image into a .tif file and the other one into other .tif File, I need to print both images and the same page. I have been trying with Kodak Image Adimin controls and Kodak image edit control but these print me one image and one page and the other one and another page.
I hope you can understand me and help me.
How To Take Print Out Of Images
Hi All
I have made a software in VB,in which is completely image oriented.
I have stored the images which is scanned in the database and can be retrived.
now i want to make a section of search where if sombody gives the product name in the input box or textbox then the picture should display with its detail and anyone can take printout of the that particular image.
Can anybody suggest me in this regard.
Thanks.
BHO Question- How To Save Images To Disk (from Within A HTML Page In IE)??
Hai all,
I am writing a BHO application in VB6. I am now able to access the HTML content from within IE windows.
All was going well for me until I had to do this:
I have to copy all image/css files in the HTML document to a folder on the hard-disk.
I DONT want to do this by copying the images from Temporary Internet Files folder. Is there any possible method by which we can directly read out the image files from the IE window? (just as we read out HTML with outerHTML())
I also dont want to use sockets to read the files from the server again.
Below is some code which will print out the names of all the images in the current document. I hope some addition here would do the job for me!?!?
Code:
Dim HTMLDoc As mshtml.HTMLDocument
Dim ElementCollection As Object
Dim tmp_imageName As String
Set HTMLDoc = ie_Obj.document
Dim HTML_img_element As mshtml.HTMLImg
For Each HTML_img_element In HTMLDoc.images
tmp_imageName = HTML_img_element.src
debug.Print tmp_imageName
Next
any help would be greatly appreciated!
thanks for ur time!
regards,
Pradeep V
ActiveReports Images And Page Numbers - Urgent Help Needed
Hi,
I'm using ActiveReports to pull up 4 records/images across and 3-4 records/images down, per page. I have bound each label to the MDB, so not much code needed there. What I do need is to display a different image for each record in an Image control. The actual image name on the drive is made up from the ProductID.
For example, an MDB field contains say 'XYZ123' only. I then need to append '.jpg' to the end of it to display the actual image. In this case, 'XYZ123.JPG'. How do I make this happen?
See http://www.qldemail.com/ee/example.jpg for what I am trying to do.
Lastly, I need to start auto Page numbering from Page 4, not Page 1. Is there a way of doing this?
Thanks.
BHO Question- How To Save Images To Disk (from Within A HTML Page In IE)??
Hai all,
I am writing a BHO application in VB6. I am now able to access the HTML content from within IE windows.
All was going well for me until I had to do this:
I have to copy all image/css files in the HTML document to a folder on the hard-disk.
I DONT want to do this by copying the images from Temporary Internet Files folder. Is there any possible method by which we can directly read out the image files from the IE window? (just as we read out HTML with outerHTML())
I also dont want to use sockets to read the files from the server again.
Below is some code which will print out the names of all the images in the current document. I hope some addition here would do the job for me!?!?
Code:
Dim HTMLDoc As mshtml.HTMLDocument
Dim ElementCollection As Object
Dim tmp_imageName As String
Set HTMLDoc = ie_Obj.document
Dim HTML_img_element As mshtml.HTMLImg
For Each HTML_img_element In HTMLDoc.images
tmp_imageName = HTML_img_element.src
debug.Print tmp_imageName
Next
any help would be greatly appreciated!
thanks for ur time!
regards,
Pradeep V
Print All Images From A Folder
i hope you understand what i want to do.
i have x number of images in a directory (bmp), i want to print them like 12 per page, sometimes i can have 2 images, sometimes 50.
I was thinking in load the images in a datareport, but, how can i "tell" the datareport to make pages until there is no more images.
If anyone knows another solution, pleas tell me
sorry about my english :S
thanks again
How Print Images From File..?
Hi there,
I have an database app with vb6 and i want to print an image stored like a string on my database. I use a Datareport module and image are in a folder with files *.jpg format. How i print this image with other information of dtabase in a datareport ?
Print A List Of Images
how can i print a list of images in a page??
i want to have a function which can let user to choose how many images to be printed in a page
any samples?? any suggestions??
How Do I Print Images And Texts On The Apps
Guys,
Help needed badly !!!
I am very very new to programming and visual basic is the
first i have been studying by myself. I purchased a book
authored by Evangelos Petrutsos named "Mastering Visual
Basic 6". In the book, he explained all about the common
dialogue control and how you can print document to it.
But what is missing is, he did not wrote any sample on
how to print the form itself (form1.picture) that contained
pictures. How do i go about it?
Right now, i am writing a program that my wife can actually
use and it requires printing the text and the background
picture.
Please help me !!!
Maverick_X2000
BTW: How do i resize the form and the msflexgrid will auto
matically resize itself according to the form's dimension?
Thank you very much !!!
Print Images From Recordset On DataReport
Hello,
Can anyone help me with the following please?
I want to print images from a recordset using an Access Database on the datareport.
I can load and display the images on the form and also navigate through the records by using the path of the location of the images. But what I can't do is print the images from the recordset on the datareport. I have tried using OLE Container but it does not work.
Can anyone help please? I am using VB6.
Thanks very much for your replies.
Kind regards,
Extinct_Dodo
Print Page That Contains Last Value
Hi,
I am using VB6 to access an excel document. What I want to do is find the last value of a range (a1:a100) and print only the page that the last value appears on.
Example:
Say the last value in that range is in cell a79, and a79 appears on the third page of the file, vb6 now only prints page 3 (which contains a79).
I hope that makes sense and that you are able to assist me.
Thanks again.
Daniel.
Page Set Up Before Print
Hi All,
Glad to be the member of this Forum.
Is it possible to make "Page 1 of ?" option as the default footer in Page Set up. That is every I shouldn't be selecting the option before printing.
Please help.
Thanx
Print A A4 Page
I have two fields in my database
They are :name and ID
The original layout is:
Name ID
Tom 1
Mike 2
Jack 3
Allan 4
I would like to print it like:
Name ID Name ID
Tom 1 Jack 3
Mike 2 Allan 4
anyone knows ? thank you !!! thank you !
Keep asking question until the end of the world....
Help Please With 2 Page Print Out.
Ok I am new to VB6 and I ran into a problem. When I print out a report from a text box the report ends up being 2 pages which it is suppose to be, but here is the problem. The first page prints out fine with a top margin of about 1/2 inch, but the second page looses the top margin data and prints the first line of the second page about 2 mm from the top of the page instead of 1/2 inch top margin.
I just want the second page to have the 1/2 top margin also what do I need to do?
here is my code so far.
Private Sub cmdPrint_Click()
'USE API TO PRINT
If (DisplayPrinter(txtReport.hWnd, centerForm:=True)) Then
Printer.ScaleLeft = -0.5 * 1440 'left margin
Printer.ScaleTop = -0.5 * 1440 'top margin
Printer.CurrentX = 0
Printer.CurrentY = 0
Printer.Font = "ARIAL"
Printer.FontSize = 12
Printer.Print txtReport.Text
Printer.EndDoc
MsgBox "Report has printed successfully."
End If
End Function
any suggestions or code would really be appriciated. Please make it as simple as possiable, since I am really new at vb6 thanks,
Print On New Page
Hello i have 2 questions, my first one is how do i print to my printer?
I think its something like Print.Printer but im not sure.
For my second question: i know that there is a code that when i add it it will print automaticly to a new page on my printer even when the page isnt full yet. I thought it was something like Chr12 to print on a new page but i forgot what it was. Hope anyone can help me out here.
Print New Page
I would like to know, How I can print the picture and put the picture in a new page after print the contents in the listview?
Code:
For i = 1 To ListView1(0).ListItems.Count
Printer.Print Tab(5); ListView1(0).ListItems(i); _
Tab(25); ListView1(0).ListItems(i).ListSubItems(1); _
Tab(45); ListView1(0).ListItems(i).ListSubItems(2); _
Tab(65); ListView1(0).ListItems(i).ListSubItems(3); _
Tab(85); ListView1(0).ListItems(i).ListSubItems(4); _
Tab(105); ListView1(0).ListItems(i).ListSubItems(5); _
Tab(125); ListView1(0).ListItems(i).ListSubItems(6); _
Tab(145); ListView1(0).ListItems(i).ListSubItems(7)
Next
Printer.Print "Legend": ForeColor = vbBlack
Set Picture2 = LoadPicture(App.path & "output.bmp")
Printer.PaintPicture Picture2, 60, 13000, 2000, 800
Printer.EndDoc
Print A Web Page
How to print a web page pogramatically from within Vbcode? (The web page should not appear on the screen ie. it should be loaded in background or in a web control)
Print 1st Page Of PDF
How do I Print the 1st page of a PDF? I currently use:
VB Code:
ShellExecute(hDesktop, "Print", "somefilename.pdf", vbNullString, "C:",0)
but it prints it all when I just want the first page.
thanks
---edit---
the program used Crystal Report Application server, so i just used the export feature to word and used the word application object to print page 1, but thanks for all of the interest.
Help. How To Print More Than 1 Page ?
Hi peeps, i have 2 probs.
Im new and have spent days on this forum learning all that i have learned so far.
THANKS ALL
After much searching i have finally found how to print the contents of my msflexgrid.
I have 2 problems that i am hoping your goodselfs can help with.
1. ) The data i have in the flexgrid is more than 1 page but can not get the rest to print. how can i get the printer to manually feed the next page and continue printing. ??
current code i am using is.
Private Sub Command5_Click()
Printer.ColorMode = vbPRCMMonochrome
Printer.PrintQuality = vbPRPQDraft
Printer.Orientation = vbPRORLandscape
Printer.PaintPicture Grid1.Picture, 0, 0
Printer.EndDoc
End Sub
2. ) Less inportant.
whilst printing the flexgrid, i would like to print in the background my logo so it is like a hologram. ?
Not sure if this can be done with the print command or if it can be included into the msflexgrid as a background image.
Hope you can help.
Thanks.
Print The Web Page
Working with the printer is a pain...
I had an idea to display what I wish to print as a web page in a hidden webbrowswer and the tell that webbrowser to print
webbrowser1.print
but there is not print method
there must be a way!
Print Fit To Page
Hi, I have an Access database and I've created a print button on one of my forms. When I click print it prints on 2 pages and I want to squeeze it onto 1 page. I can do this by adjusting the page setup but I want to do it in the visual basic code somehow so that all the users won't have to change their page setup. I've searched everywhere and can't find an answer to my problem, can someone please help?
Print From A Web Page
Hi,
I have a web site. I have a listing of all the word documents on the web site with a selection box for each. When I select some docs and click Print Button, I need to print all those docs onto a local printer ?
Can I use VB script for that ? If so, how ? Thanks for your help,
Cuteguy141.
How To Print At Last Page
hi......
can anyone please explain how to print the page footer only at the final page in data report (VB 6)
for example,
l've 3 page report n i only want the total of sales print at final page, Page 3 only.
TQ.....
Print First Page Of Doc
I need to change the printer settings in order to print the first page of a pdf file. Here is my print code, what can i do to make it print just the first page.
strPrinterName = Printer.DeviceName
strDriverName = Printer.DriverName
strPortName = Printer.Port
'Perform error checking
strCommandLine = "c:Program FilesAdobeAcrobat4.0 ReaderAcroRd32.exe /t """ + _
strfilename + """ """ + _
strPrinterName + """ """ + _
strDriverName + """ """ + _
strPortName + """"
RunProcess strCommandLine
thanks
JM
Print Web Page
Do u know: how to print a web page? To print it in text format (html codes) and graphic format(like we see in web browser). I have a hard time to figure it here. Could u help? Thanks!!!
Images Print Size In Crystal Report 8.5
Dear Sir,
Your suggestions really helpful for those who want to learn Crystal report. Good Job.
I have a problem.
I am using Crystal Report 8.5 (Crystal report viewer Control) with vb6.0.
I have to create a report, which arrange Images (*. Jpeg, *. Tiff) in a particular way so that they can use optimum space on A4 page.
The images are to be chosen by my client dynamically / at run Time.
I have completed the Job by using ‘AddPictureObject’. The Project is Executing Fine.
Now, the problem is comes with ‘Printing Size’ and ‘Actual Size.’
Currently my client is using Adobe Photoshop for arranging and printing the images.
Photoshop Print’s the images in ‘Print size’ (same when inserting image in Ms Word) not in ‘Actual size’ (Same as when open through Internet Explorer or Crystal report). Crystal report shows the image in ‘actual size’ not in ‘print size’.
What should I do to get the images in ‘Print Size’?
(If I am changing the Size of image then the image gets distorted. I can’t distort image, due to they are Jewelry images and need to be very clear.)
Thanks in advance.[B]
Print Two Forms On One Page
How do I get two forms under the same project to print on a letter size page?
The print button is initialized from Form1 which collects the info. Form2 & 3 are formatted just for printing. This is all a standard exe file.
Any help would be apprciated.
Print Web Page Oddity
IE.ExecWB OLECMDID_PRINT, OLECMDEXECOPT_DONTPROMPTUSER, 0, 0
This works fine except it will print one extra blank page. When I change it to prompt the user only one page is printed. I removed the header and footer for both and they are the same webpage. Any ideas as to why not prompting the user would result in an extra blank page being printed?
Thanks,
Mark
Print First And Last Page In Excel
I am trying to build a macro in VB to print out only the first and last page of Excel reports that I produce. Is there anything that returns the last page?
|