I am using the following code to backup the tables on my "D" Drive..I want to add a code by which it not only save backup on my drive but also send these files to my email address XYZ@gmail.com
Dim CurrentDay As String
Dim CurrentMonth As String
Dim CurrentYear As String
CurrentDay = Day(Now)
CurrentMonth = Month(Now)
CurrentYear = Year(Now)
I need a way that I can simply have a User click a button on a form of the database and it will do automatically create a zip file of the entire database and start Outlook and attach the zip file and send it to me.....
I think this was covered a while back and I did a search and couldn't find anything on it; Is there a way to attach and send multiple report .snp's to one email. I've been using SendObject.
What i would like to do is replace the DoCmd.OutputTo line with a DoCmd.SentTo line to email the reports to the appropriate faculty instead of just saving them in the folder.
I used this line but it did not work: DoCmd.SendObject (acSendReport, , acFormatPDF, "vtblfaculty.email&'@xxx.edu'","me@xxx.edu",,"test ","this is a test",-1,,)I have been working on this forever!
Public Sub something3() Dim db As Database Dim rs As DAO.Recordset Set db = CurrentDb Set rs = db.OpenRecordset("SELECT DISTINCT tblsection.Faculty, left(vtblfaculty.firstname,1)&vtblfaculty.lastname AS fn, vtblfaculty.email FROM vtblfaculty INNER JOIN tblsection ON tblsection.faculty=vtblfaculty.faculty WHERE term=" & Forms!frmimport!cbxTerm)
Body (pre filled with "Dear ([Contact]if possible) Please find enclosed your documentation for your recent telephone order bla bla bla and our logo.jpg if possible)
then i would like to attach to the email the cover letter/invoice(report), book page(report) and the book (pdf) from the hard drive (r.eports changed to pdf)
if i can press a button on the form to send it that would be good.
if i could link it to a query to send a batch of them that would excellent.
The Database is Named: b4s.mdb The table is called: Main Table The input form is called: Client The letter/invoice report is called: b4sletinv The Book page report: b4sbook The pdf book is located at c:Documents and SettingsAdministrator4sfinal.pdf The query for the batch is called: coverlet&proforma
I have to write a code for my database,i have folder with files "pending Review" and a table with column "tblExcelLocation". when i run my database all the files from pending review folder goes to "tblExcelLocation" on a click of button.But,if the files already exists it should not insert those files and insert the rest.For this i tried to write a code but i think i m unable to do that .
Code: Loop through files in folder folderspec = "O:QA FilesQC ReportingPending Review" Set fs = CreateObject("Scripting.FileSystemObject") Set f = fs.GetFolder(folderspec) Set fc = f.files
Every hour a zip file is created in an FTP folder. The zip file contains an .mdb access database file with any changes to the data since the last hours file.
What is the best method to get access to connect to the content of the zip files and pick up the changes to the data?
Ok I've been reading on backing up Dbs here. I have a db FE and BE I need to do back ups currently I backing up my FE with the autocompact db found in the sample forum but can't use it to back up my BE when it's open.
bascialy I'm trying to backup the BE daily but how do I do it if some is in it?
VBA Code to go in the on double_click event of a name field in a Subform bound to a table. The subform is just a copy of a data table and within the subform view, When the field "employee name" which contains e.g. John is double clicked, I would like access to Lookup and get John's email in the employee table under field "Email" and launch outlook application and insert it into the To field.
I assume hyperlinking the field can also achieve this similar to what excel does but I am fast learning that what is standard functionality in excel is a whole another story in Access..
I have a query (Access 2007) that contains a field named "email" (which contains email addresses, of course). I want to email everyone in the query and they are all going to receive the same message. My email to them doesn't have to be personalized and I don't need to collect data from the recipients. I don't even need a reply to the email I send.
I have a form which has a button to email the data out in a standard email message.
Private Sub Command60_Click() Dim MyDb As dao.Database Dim rsEmail As dao.Recordset Dim sToName As String Dim sSubject As String Dim sMessageBody As String
[code]...
This works well enough, however, FIELDS 11 through to 16 contain the venue address. This is all we ll and good if every field of the venue address is populated. here are times when not all of the fields are populated, for instance, the address might only be 5 lines.I know I can do this using IIf statements on a report, but how can i achieve the same thing for the email.
I have a database that I can use to create a query, grouping companies by city. I then want to send a specific email I have created in outlook to all of the email addresses in the query.I do not need to include names.
I recently created a database with an FE and BE, and I want to be able to back up the BE from the FE. In the FE, I added a menu item "Back up database...", and it works good for the FE, but I want it to back up the BE, where the data is located. The reason that I like the menu item is that it opens a "Save Backup As" dialog box, and it also adds the date to the name of the database. Also it will be easier for the people that are using the db.
I would like to create a module that will take a few of my tables in my database and back them up into a new database on one of my servers every day. The name and path of the database will change day by day based on the date. Can someone recommend some code...I tried this:
Dim strmydir As String strmydir = "\Jxflpr4DataDepartmentOps TechRaw Builder ArchiveArchived" & Format(Date, "YYYY-MM") & "" If Dir(strmydir, vbDirectory) = "" Then MkDir "\Jxflpr4DataDepartmentOps TechRaw Builder ArchiveArchived" & Format(Date, "YYYY-MM") & "" ElseIf Dir(strmydir, vbDirectory) <> "" Then End If
But it doesn't seem to want to copy the tables over. I tried separating the bottom half into a new function, but it still seems to be stopping for no apparant reason. It's not giving an error message, just bringing the debugger up on the second copyobject line.
Is there a better way to do this as I'm aware this code is very messy.
I was thinking of an idea to backup the database in a multiuser (FE/BE) environment, without disturbing the users. Please comment on it as if it has any drawbacks.
And also soemeone please help me do this, if its does not contain drawbacks.
************************************************** ******** Main Idea
What I want is to automate backup process at fixed intervals, in a FE/BE environment without disturbing the users i.e without disconecting the users. And I think it is possiblke and safe to do if we start the backup process when all users are inactive and stop any user activity or stop Frontend's interaction to the Backend, while in the backup process.
And If no such time is available as all users are inactive within a certian time then forcefully stop user interaction to the backend and start backup process.
To stop user interaction with the backend , we can close all objects (forms, reports, queries etc) and open an unbounded modal pop-up form , with no close exit button. This form can have timer and after 30 seconds or maybe 1 minute we can auto close this form so that the user can again use the application. We can stop new logons by placing an ini file in the folder where the Backend rsides. This Ini file can contain two keys ( "lock time" and "lock status"). At the frontend startup we can query these value from the inifile to check that new logons are allowed or not, and if the "lock time" is greater than 2 minute then bypass the lock status and allow new logons. It means that something went wrong with the last backup process and the ini file was not updated to new lock status. We can have a table or an in file store the normal and maximum time at which the backup process starts. These values can be queried and compared with the current time using a hidden form. If the normal time exeeds the current time then start looking for a state where all logged on users are inactive (i.e all objects are closed in the front end of all users). If such a state is found then warn the user that backup is going to start in 1 minute, lock new logons, after 1 minute close all open objects and then bring up a modal form that i have described in step 1 and start bakup process. And if no state is fount till the maximun time then warn all users that backup would start in 1 minute, lock new logons, after 1 minute close all open objects and then bring up a modal form that i have described in step 1 and start bakup process After the backup is complete set allow new logons in the inifile.
I'm having trouble with some code to backup my database. I thought I'd just have some code call a batch file that copies the backend to a new location. The problem is that when I call the batch file, it opens and runs from c:documents and settings\%username%, so the relative paths in my batch file do not work.
Is there a way to have access tell run the batch file from command prompt in it's actual location? Or maybe it would be better just to copy the back end from within the VBA code. But I don't know how to do that, either. Maybe there's a way to use the Backup Database function under Tools/Database Utilities? With Sendkeys maybe? (but I don't know the code to do it).
i have a db which is split into frontend and datatables, what i need to do is place a command button on the switchboard which allows me to backup the second part of the db. then if needed i need to be able to restore the datatables to the original location so there is no loss of data. if anyone can help this would be most appreciated. i know there is a few threads out there ref data backup but i've been unable to locate any answers
what would possibly cause a "Backup Database As" dialogue box to appear? it's the same as the "save as" box and allows you to save a copy of the access file you're working on but it says "Backup Database As" at the top.
it seems to come up periodically and im not sure what might be causing it.
I have a small mdb database that I archive every week, usually during the archive I delete all the forms expect (logon, switchboard, and three others) and keep the tables, queries, and reports. (use the forms to only enter data, which are not needed for the archive and deleting them reduces the file size)
is it possible to have something in vb, - that will run if its Friday 5pm - will backup the data base to a location on a mapped drive, - with a given file name mmddyy_data.mdb, - and have all but the 5 forms (mentioned above) deleted
I have made a query with the name "Confirmation" and it is setup like this:
Name trainee Email Training John John@mail.com Tr one Mary Mary@mail.com Tr two
I also made a button in a report with the title "Send Mail" now is my goal that if i press that button automatically multiple e-mail message's will be generated with data from people in that query. So if click on that "Send Email" button i want two different mails messages generated that will be send to John@mail.com and Mary@mail.com with in the mail body their data.
I created a database in Access and of course password protected the backend version. As a matter of course I backed up the mdb to cd in case of emergency.
Our network has been taken down due to some virus being bought in by a laptop user so I wanted to reinstall the mdb from the cd to my c: drive.
The problem is that the file is saying that it is 'Read Only' which I think is down to the password protection i put on there.
Question: Is there a way I can get round the security?