prabha_friend
Prabhakaran Karuppaih
- Local time
- Tomorrow, 00:56
- Joined
- Mar 22, 2009
- Messages
- 1,013
My client's Ms Office trial license has expired. Planning to utilize the runtime instead of purchasing the application... if it works
Thanks.
With Hope,
Prabhakaran
Code:
Private Sub SaveToPenDrive()
Call DoCmd.OpenReport("Delivery_Weekly", acViewPreview, , "Customer=" & Me.ID.Value)
If Dir("E:\Software Bills\" & Date & "\", vbDirectory) = "" Then MkDir ("E:\Software Bills\" & Date & "\")
Call DoCmd.OutputTo(acOutputReport, "Delivery_Weekly", acFormatPDF, "E:\Software Bills\" & Date & "\" & Me.NameVal.Value & ".pdf")
End Sub
With Hope,
Prabhakaran