I find the following CODE online (Print to PDF). Which work perfectly for me, the only issue and/or modification I am looking for "Popup Window to save the file at any location", instead at fixed location.
Option Compare Database
Option Explicit
Function PrintToPDF(SrcFile As String)
On Error GoTo PrintToPDF_Err
'Function can be called from any report with this: "PrintToPDF(Screen.ActiveForm.Name)"
[Code] ....
I need code for save dialog file ,and select the file from textbox and save it to the selected location.i have only this code and i dont know what else i can do with this because it just opens the save file dialog !
View 1 Replies View RelatedI want to find a way to grab the text from the window that shows the location of the file using vba in Access.
View 3 Replies View Relatedi had a database that allowed me from a form to store a file location for a record on a form, so i any time i could access the record, and then open the file, usually a pdf, it wasnt stored as a hyperlink, but as long text
i made the mistake of not copying the files for safe keeping when i got a permanent position..i am now back self employed, i need to recreate the database.
So I have this relatively simple problem: I need to create a button that once clicked will open the Save As dialog box and allow the user to save a copy of the current database where he wishes. The filename should contain todays date in DDMM format along with some pre-set text e.g. DDMM PresetText.
I am using Access 2010.
hi,
can i set the location of my windowform?
i have created a dummy tabstyle form. It exsist out of 3 forms. Those forms are on top of eachother. is there a way that i can lock the windowlocation. for example: form.left = 0
or someting like that?
thanks
I have created an asp popup window that is called by a javascript function from another asp page. The popup window is generated from a database. The code on the mainpage to generate the popup window is:
Code:<SCRIPT LANGUAGE="JavaScript" TYPE="text/javascript"><!--function showCalendar(i) {// declare variablevar tbm;// assign field name to variable // based on argumentif(i==1) tbm='FrontPage_Form1.PerDate1';if(i==2) tbm='FrontPage_Form1.PerDate2';if(i==3) tbm='FrontPage_Form1.PerDate3';if(i==4) tbm='FrontPage_Form1.PerDate4';if(i==5) tbm='FrontPage_Form1.PerDate5';if(i==6) tbm='FrontPage_Form1.PerDate6';if(i==7) tbm='FrontPage_Form1.PerDate7';if(i==8) tbm='FrontPage_Form1.PerDate8';if(i==9) tbm='FrontPage_Form1.PerDate9';if(i==10) tbm='FrontPage_Form1.PerDate10';// call pop up calendar// passing field name variablewindow.open('../../calendar/calpop.asp?tbm='+tbm,'ncal');}function showDirectory(i) {// declare variablevar dept;// assign field name to variable // based on argumentif(i==1) dept='FrontPage_Form1.TaskOwner1';if(i==2) dept='FrontPage_Form1.TaskOwner2';if(i==3) dept='FrontPage_Form1.TaskOwner3';if(i==4) dept='FrontPage_Form1.TaskOwner4';if(i==5) dept='FrontPage_Form1.TaskOwner5';if(i==6) dept='FrontPage_Form1.TaskOwner6';if(i==7) dept='FrontPage_Form1.TaskOwner7';if(i==8) dept='FrontPage_Form1.TaskOwner8';if(i==9) dept='FrontPage_Form1.TaskOwner9';if(i==10) dept='FrontPage_Form1.TaskOwner10';// call pop up directory// passing field name variablewindow.open('../../ProfDirectory/DeptPeople.asp?dept='+dept);}//--></SCRIPT>...... <tr> <td width="118" height="22" align="center" nowrap> <p align="center"> <input type="text" name="PerDate1" readonly="true" size="8"> <A HREF="javascript:showCalendar(1);"><IMG SRC="../../calendar/10Min200011cal.gif" WIDTH="39" HEIGHT="21" ALT="Click here to select date" BORDER="0" align="center"></A> </p> </td> <td width="160" height="22" align="center"> <p align="center"><input type="text" name="TaskOwner1" size="8"> <A HREF="javascript:showDirectory(1);"><IMG SRC="../../calendar/10Min200011cal.gif" WIDTH="39" HEIGHT="21" ALT="Click here to select date" BORDER="0" align="center"></A></p> </td>
The first popup calls up a calendar. The calendar works fine. The second popup calls up a staff directory. This popup does not work.
Code:The code for the staff popup is:<SCRIPT LANGUAGE="JavaScript" TYPE="text/javascript"><!--function SetTaskOwner(d) {opener.document.<%=Request("dept")%>.value = d ;self.close ();}//--></SCRIPT>......<%Session.timeout = 1Set conn = Server.CreateObject("ADODB.Connection")txtDSN = "DRIVER={Microsoft Access Driver (*.mdb)};" & "DBQ=d:InetPubwwwrootpagescommoncivil.mdb"conn.Mode=adModeReadconn.open txtDSN,"",""Set Session("people_conn") = conn%><%sql = "SELECT WebData.* FROM WebData WHERE (((WebData.class)='faculty')) AND (((WebData.Status)='active')) ORDER BY WebData.LastName"pagetitle1="Faculty sorted by last name"Set rs = Server.CreateObject("ADODB.Recordset")rs.Open sql, conn%>....do while Not rs.eof.... owner = rs.Fields("UWID").Value webpage="javascript:SetTaskOwner(" & owner & ");" %> <tr> <td><a HREF="<%=webpage%>"><%=name%></a></td>.....rs.MoveNextloopconn.close'session.abandon%></table>
The popup appears and the database generate the results as expected. When I click on the hyperlink the javascript gives me an error. I can see in the status bar though that the hyperlink's value is: javascript:setTaskOwner(me), for example. So I think the error is due to the opener.document.<%=Request("dept")%>.value = d or self.close (); lines of javascript.
I would like to create a form that allows me to search for a folder on my desk top, then once located i can transfer that file to a specific location on another drive, Similar to the Browse / upload function you see on many applications.I am using Access 2003. Is this possible??
View 5 Replies View RelatedI am setting up a database for a group of roll on roll off students. It would be really usefull if i recieved somesort of pop up message informing me 2 weeks before any particular student is due for release from the course. I have all their details plus their release date in a table. :confused:
Thanks in advance
How I configure my Form Window to pop up as soon as I open my Access Database?
View 3 Replies View RelatedI've tried to add some basic login (not really security) to my database so that when a different name is entered into the login box a different form is opened.
I got this working but the login form stays in foreground and I can't click anything behind it and can't get to the design view to change any properties of anything.
I've also changed this login form to the startup item so it always loads when i start the database.
Is there way to get back to the design view or do i have to start again from my backup?
As the title says, ctrl-W works on all my other forms but not on the one which has Pop-up set to "Yes".
View 1 Replies View RelatedThe code below sets my printer to "Cute PDF writer" and then opens a report in print view, which creates a PDF version of my report. So far so good. But just before the last step, it brings up the Save As dialog box, asking for a filename and location.
Three points are important:I always want to call the PDF document "Specialty Report".I always want to save it to C:Documents and Settings80435 Desktop. I always want to overwrite the previous version.
Is there some code I can insert that would achieve this automatically with no further user interaction i.e. user clicks a button and the PDF file is created/overwritten?
Code:
'Produce the report
Dim defPrinter As String, NewPrinter As Printer
defPrinter = Application.Printer.DeviceName 'Get the default printer name
Set NewPrinter = Application.Printers("CutePDF Writer") 'Create a new printer object
Set Application.Printer = NewPrinter 'Set the default printer to the new printer
DoCmd.OpenReport "Specialty Report", acViewPrint 'Open the report in print view (which will PDF it)
Set NewPrinter = Application.Printers(defPrinter) 'Reset the printer back to the default printer
I have created a report with a subreport for my database. The user selects the project for which he/she wants to see a report. Once the project is selected, the report is displayed in a popup window and maximized in the print preview layout. This allows the user to view and read the report. Once this is done, there are no buttons or menus on the screen that allows the user to send the report to a printer or file.
Other than the report, there are minimize / maximize and close buttons at the top right of the window and page selection buttons at the bottom left of the window. If the user wants to print the report, they must either hit ctrl-P or right click the mouse on the screen to display a menu from which the user can select print to open a print dialog box. Is there any way to add a button or menu to the print preview that appears on the screen to make printing easier?
I wish to export a report to excel, but I wish to prompt the user to be able to choose where to save the file at. How can I have the "Save As" dialog box pop up, with the filter set to "*.xls"?
View 2 Replies View RelatedAccess 2010:
The database I'm working on stores label images, or better stated, it stores file paths where the label images are stored. These paths are used in reports and forms to view the label images within the database. What I'd like to do is to create a "save" or "email" button that will allow the user to select a location to save just a copy of the image in jpg format. I realize that it is possible to imbed the jpg image into a report and export it as a pdf. What I'd really like to do is find a way to save the image (perhaps by copying it from the path in the database and simply relocating it) and preserve the jpg extension if that is possible.
I am also aware that there are third party applications that will convert pdf reports into jpg files however network restrictions keep me pretty limited in my ability to download third party software.
I would like to disable this window : (which appears by right-clicking mouse on form headline)
So the users won't be able to close form by right-clicking. How to do it?
Hi,
I'm looking to take a screen dump of the current Access window, and save it to disk, as part of the error handling for my application. Does anybody have any suggested starting points? I've been Googling around for a while, but haven't really turned up anything concrete.
This (http://support.microsoft.com/?kbid=240653) was as close as I really got (sending the print screen keystroke), however I still need a way to save this data to the disk.
Any suggestions?
Thanks,
-Adam.
Hi,
When the user click the button, then it will give out a popup form to the screen, but I want to make the popup form's height as same as the screen/window/monitor's height, because the popup form's height is larger than the screen's height, and every user's monitor's height is different. So, I have to make it flexiable change of the height of the popup form.
How can I check the screen/window height by VBA function?
In Excel, it has Application.Height to check. In MS Access Form, I cannot find one for doing that.
Please let me know if you have one.
Thanks.
From a command button what would be the code to copy a file from one location to another i.e copy c:datasalesdata.mdb to e:databackupsalesdata.mdb
Jabez
I have recently been working on the code below and I have neally completed what I want to do.
Private Sub H_Enter()
Form!H = "hyperlink#E:WORKSPEC PROJECTWORKSPECS" & Form!S & Form!PC & Form!extension & "#"
End Sub
What I want to do is have the file location (bit I have bolded) stored in another form or table and have the code read it from there as the file locations may change, rather than having to enter it for each line I just want to enter it once and then as and when it changes I just change the one line but it changes all the hyperlinks
hope this makes sense.
i have a url file location to a pdf file on the 3rd column of a listbox.
is there anyway of opening the file from a button, refering to the the highlighted record row 3rd column pdf file location
i know that me.lstBox.column(2) gets me to the column but not the code to open the pdf file for the highlighted record
any help would be appreciated
I have been searching all over on how to create an import button on a form in access 2010 where I can set which table it should copy the data into but the user could locate the import file.
NOTE: the reason being I have locked all the ribbons...
If necessary I could make a specific import template file which would have all the headings locked...
My application is developed in Access 2003 version. Recently we moved from Access 2003 to Access 2010. Now users are facing usability issues like - in Access 2003 all the forms are opening in different windows and they can move to forms easily. But in Access 2010 all the Forms are opening in same window, if they want to move to different forms then they need to close the current window or press ctrl+F6. How can I enable/open forms multiple window in Access 2010.
View 3 Replies View RelatedExcuse me!
i would like to know how to use browse function (like in windowXP) to select the excel file i want instead of using transferspreadsheet code.
thx!
I have a query that combines few different tables in order to create a View (Query) that is then used to by and Excel sheet to update a list. The Excel is dynamical updated when new data is inputted in the Access Tables.
But one of the fields in a query is combination of path name and report name (another filed in one of the tables) that crate a complete path to a file that contains some additional information.
Now since the Excel is updated dynamical and users of this Excel sheet are not very advanced. I waned to make it easy for them to just click on the location of the file and the file opens up. But I am not able to make the Query that contains the file destination hyperlinked.
I am using Access 2007