Printers

Hello,

for some reason this does not work in Access 2000 but worls fine in 2003.
Any ideas?

Private Sub cFax_Click()
sReportName = "rPayroll"

Application.Printer = Application.Printers("WinFax")
DoCmd.OpenReport sReportName, acViewNormal, _
wherecondition:="[weDate] = " & Chr(34) & dFilter & Chr(34)

Application.Printer = Nothing
End Sub


Thanks,
Ernst.

.

Relevant Pages

  • RE: Time stamp function trouble shooting
    ... --The reason why it gets stuck in between is becasuse; ... "Jacob Skaria" wrote: ... Private Sub Worksheet_Change ... and then the sheet remains unprotected with the function disabled. ...
    (microsoft.public.excel.programming)
  • Re: CommandButton not responding
    ... code in class named 'clsBtnEvnts' ... Private Sub UserForm_Initialize ... Do not ask me why it is working ..., I suspect the couple Excel 2000 ... The reason your code was not working correctly before is because you had ...
    (microsoft.public.excel.programming)
  • Re: List box values not changing on sub-form
    ... there's no reason you should be storing it redundantly. ... Private Sub MyListbox_AfterUpdate ... the list box's MultiSelect property is set to None.) ...
    (microsoft.public.access.forms)
  • Re: Closing Process minimizes my application
    ... Public Class Form1 ... is exited and when your form is minimized for *some" reason, ... Private Sub Button1_Click(ByVal sender As System.Object, ... Dim myThread As New System.Threading.Thread ...
    (microsoft.public.dotnet.languages.vb)
  • Re: Not saving the record to my table. Any ideas why?
    ... There is a bug with the Close action/method, such that Access silently loses the entry if the record cannot be saved for any reason ... Dim stLinkCriteria As String ... Private Sub Form_BeforeUpdate ... Dim strMsg As String ...
    (microsoft.public.access.formscoding)
Loading