I have a database too big to upload here at the moment, however i have a main data entry form that is based on more than one table, what i want to do is create an email form either as html or info point and have this form emailed out so that my colleagues can then fill in thus on its return add records to the database.
View RepliesI have a form with a tabbed area, each tab containing a subform. One of these subforms adds records to a table. Another subform shows the totals from that table.
But when I add records, the totals tab is not updated with the new quantities unless I close the form completely and go back in. I tried adding Me.Dirty = False to the subform that adds the records but that makes no difference.
It seems as though the 'totals' subform gets those values as the form is loaded and does not change, even when records are added and then that tab is selected.
How can I get the totals subform to show the updated totals?
I have a table with more than 60 fields and need to update it with records from another Access file with a table with an identical data structure.
Is it better to run an update query or an append query (i would have to delete the original records in the target table first) or a union query?
If I run an update query I will have to manually add each field to the query.
The update query will not add 'new' records. If I run an append it is quicker because I can use the * to match all fields, but i will have to delete the 'old' records first, as both tables use autonumber for the PK so the PK ID will be the same in each table (will get a key violation error).
If I import the 'new' table and run a union query it will match the fields and add the new records, but then i will have to create new table from that query.
I want whenever I'm updating or adding records to my form, the ID automatically take the value of the previous ID and increment it by 1.
The field type is text (mixed with number) - PM0000000.
I've done some research, what I understand is that I need to:
-do a lookup and
-find the MAX of the number portion.
Name of form - Payment
Name of table - Payment
Name of field - payment_id
I tried these, but to no avail...
Private Sub payment_id_Click()
payment_id = DLookup(("[payment_id]", "Payment", "[payment_id]=Forms![Payment]![payment_id]-1")payment_id + 1)
End Sub
[Code] .....
I need to keep a customer list and I need to update the email address of the existing customers in the customer list.
The customer list table called 'masterlist' and the table looks like this:
IDPhone CallerNameContactEmail
112345678Emily Office<blank>
287654321Emily Home<blank>
399536546Emily Mobile<blank>
4 75293924 Jack <j.k@mail.com>
The table contains email address of some of the existing customers, I have the same fields in this table, the table called 'Newemail'.
IDPhone CallerNameContact Email
112345678Emily Officec1@mail.com
287654321Emily Home<blank>
399536546Emily Mobilee1@mail.com
478954648Jenny <blank>
545454854Derek <blank>
645484542Kelvin k1@mail.com
How I can insert the email address from 'Newemail' into my existing customer list 'masterlist' i.e. contact email of ID 1 and 3 :confused: ? I would like to ignore ID 4-5 from the 'Newemail' table. And I would like to keep ID 4 from the 'masterlist' table.
Thanks!! :D
Code:
Public Function OPEN_SESSION() As Boolean
Dim objSession As Object
Dim strServer As String
Dim strMailFile As String
[code]....
but for some reason my form is not updating after sending the email.
I would like to know if there is a way to update information in my Access database via e-mail.
I tried to do this, but when I collect from the e-mail, it creates a new entry in the database.
I am currently updating an Access database, any way to send an OLE Object (in this case an Excel Spreadsheet) as an attachment to an email address using VBA code? I made a form that shows the Excel Spreadsheet when the record is brought up, but I need to know how to send just the Excel Spreadsheet and not the other information on the form.
Also, if there is an alternate way to have an Excel spreadsheet embedded into an Access form, i'm open to change. The user wants to be able to see the Excel spreadsheet and send it to their supervisor without having to locate the Excel spreadsheet on the hard drive.
I am having troubles adding email addresses to my CC box in my email. I am able to get the emails to populate into the "To:" space. Now I know I have the DLookup accessing the same record, but how can I make it so the CC_List puts the emails into the CC of the email?
Code:
Dim DailyReport As Integer
Dim EmailRecipiantsList As String
Dim RecipiantName As String
Dim CC_List As String
[code]....
I have some code that takes data from my database and creates an email with it. It also creates a folder and a word document. In the email, I would also like to include the file path as a link instead of just the path that it puts there now. Is this possible to do?
Code:
Option Compare Database
Private Sub SendEmail_Click()
On Error GoTo Err_open_word_Click
Dim oApp As Object
Dim path As String
[Code] .....
I have been able to create code to send email for my ticket system but now have a need to add an additional recipient. I would prefer this recipient to be add in the CC field. This email address will come from its own table. I have tried to figure this out myself but I can't get anything to work for me . I am fairly new to VBA and all of my experience is just through trial and error (mostly error). I have attached my original code below ....
Private Sub cmdMailTicket_Click()
On Error GoTo Err_cmdMailTicket_Click
Dim stWhere As String '-- Criteria for DLookup
Dim varTo As Variant '-- Address for SendObject
Dim stText As String '-- E-mail text
[Code] ....
My situation is that , I have a sub for sending an email to a single client on the current form. Using a record set works fine, I now wish to have
.Cc email address which is not part of the Record set ." its to the department head". strEmailAddress = rst![clientEmail] & " ;" & somebody@ntlworld.com
My question is can I type the somebody email address as indicated in red in the above line? to enable the email to go to both addressees .　
set DoCmd.SendObject , , acFormatRTF, clientEmail, _ , , strSubject, strEMailMsg, False, False?
I would prefer to use the Do Cmd SendObject is this is achievable
NameStr As String
I have made a name string
Now I would like to add the nameStr near "Dear " how can i do this?
strbody = "<H3><B>Dear [I want the placed nameStr here] </B></H3>" & _
bodyStr & _
"<br><br><B>Thank you</B>"
I am trying to work my way into putting the content of my report into the body of an e-mail. I have used the following code to do so but I keep on getting the error: "An Expression You Entered Is the Wrong Data Type for one of the Arguments"
Code:
Private Sub Command278_Click()
On Error GoTo ER
Dim db As Database
Dim rstOpenPurchaseOrders As Recordset
Dim strSQL As String
[Code] .....
I have a text field "Record Last Updated" on a form formatted for date/time that I would like to update after a record is changed or added. So for every change or addition the field would update to the current date. The code I am currently trying to use is as follows:
'Assign current system date to Last Updated field if change of data occurs in any field
For Each ctl In Me.Form.Controls
If (ctl.ControlType = acTextBox) Or (ctl.ControlType = acComboBox) _
Or (ctl.ControlType = acListBox) Then
If Nz(ctl, "") = ctl.OldValue Then
Else
txtLastUpdated.Value = Date
End If
End If
Next ctl
This executes in the forms After_Update event procedure.
Problem is I get an error 3020 "Update or CancelUpdate without AddNew or Edit" when moving to the next record ? I have tried using .Edit and .Update but those come up as an invalid reference?
Any suggestions would be appreciated. Thanks in advance
I have vba code set up to automate a query output to email with outlook. I am having issues with the "TO" field. I have tried different types of code, such as the following:
1) MyMail.To = MailList.Fields("EmailAddress")
2) MyMail.To = MailList.Fields("EmailAddress") & ";"
Both of these work, but the issue I am having is the "TO" field in the outlook message looks like this:
admin@blahblah#mailto:admin@blahblah#
Why my code is adding the email address twice, I need to get rid of the #mailto:admin@blahblah# but I do not know how or why it keeps adding that end part.
I have a table in my DB called, devices. This contains all the information about various devices we have deployed in the field.
These devices are also contained in 2 other separate MySQL DB's.
What I need to do is add 2 additional field to my access table for the DeviceRecno and DeviceID of the same device from the MySQL DB's.
Adding the field is easy, but I cant think of a way to enter the recno and ID from the other DB's without typing them in manually for each one.
The common between them all is the serial number of the device, and I can get a list of serial numbers, recno's and ID in an excel sheet.
like a vlookup in excel to easily populate all the existing records with the recno and id's from the other db's?
When I created the access system there was no intention to link it to the other DB's for any reason, but that has now changed due to a lot of reasons.
I decide to add a new field to its related table. I always wait to create the form until I think my table is complete, but sometimes I just end up needing to add more info. Is there a quick way to update the form to include my new fields?
View 7 Replies View RelatedOk, I've run into two serious problems in testing, and another question that I'm hoping you guys can
help me solve. Below my questions is the code used for making the search query/email program.
Problem #1: In testing, this search program only is working for me for new data. Any data that I had
in the database prior to implimenting the program will not move past the search stage. In other words, I
will do a search, it will find the emails and bring them up in a box, I hit "OK" and it gets hung up and won't move on
to opening up a new Email with the addresses implemented. However if I enter new data in the database, say with a weird
name so its only bringing up the new entry and no old entry, it works fine and opens up the new email.
Problem #2: Items I would like to search like check boxes. Say I have a check box "Donor", this is listed in the database
as a 1 or 0. I can't have my boss searching 1 or 0. Is there a way to change this to, say, being recorded in the DB
as a Yes or No. That way he would check to search "Donor" and type Yes in the search box and this would search the DB
"Donor" column for "Yes" and bring up the results.
New Question: My boss and I reviewed the form as it is so far yesterday. He was asking if I could add a Print Labels option
in there. I'm wondering instead of adding another seperate search box and all that mess for a labels search print, can I rather
add two check boxes, one labeled "Print Labels" and the other labeled "Email". What this would do is depending on the check box
you selected it would either run the search and email like we have it, or clicking the other check box would run the search and print
labels.
Quote:
'Author: Michael Walts, but use it as you like'Important information! this code requires a reference to the Microsoft DAO object library
Option Compare Database
Option Explicit
Private Sub cmdEmail_Click()
'will hold the dynamic SQL query
Dim strSQL As String
'will hold the WHERE clause portion of our SQL query
Dim strWHERE As String
'will hold all the recipients of this message
Dim strRecipients As String
'the recordset we will use to get the emails of the records that match our criteria
Dim rst As DAO.Recordset
'if there is input in the search criteria, then we will run the query and send the e-mail
If txtSearch <> "" Then
'if you have more buttons, just add mosr cases (the value of the radio button
'= the Case number, so Value of the State radio button is 1, etc.)
Select Case opgSearch.Value
Case 1
strWHERE = "WHERE State = '" & txtSearch & "'"
Case 2
strWHERE = "WHERE City = '" & txtSearch & "'"
End Select
strSQL = "SELECT EMail FROM tblUser " & strWHERE
'run the query and get the results into the recordset
Set rst = CurrentDb.OpenRecordset(strSQL)
'Loop through the recordset and add all the EMails
Do While Not rst.EOF
strRecipients = strRecipients & ";" & rst!EMail
rst.MoveNext
Loop
'remove the first ; from the strRecipients
strRecipients = Right(strRecipients, Len(strRecipients) - 1)
MsgBox strRecipients
DoCmd.SendObject , , , , , strRecipients, "News Letter", txtBody, False
rst.CloseSet rst = Nothing
End If
End Sub
'stops a ' entered in the field from breaking the query
Private Function SQLSafe(safeMe As String) As String
SQLSafe = Replace(safeMe, "'", "''")
End Function
I have split the data base
Added a new table to the back end .But do not know how to update it to the front end
I have a database with details about employees in it.
There is a field with yearly salary in it and another with an ID number. Recently these slaaries have been increased by a non-standard amount. I have another table with the emplyee ID number and their new salary. I need to update the slaary figure in the first table with the salary figure in the second table. Is there anyway of doing this?
Any help would be most appreciated
Nick:)
Hi there people...i'm doing a databae project for A2 level coursework and have encountered a problem..please help me if you can.
I have a table of names. Also another table (actions) which contains several fields, but 2 of them are names, (1 being Proposer, and other being Actionee), are obtained from the names table.
However, when altering for instance the spelling of one of the names in the names table it does not update the spelling in the actions table. i have tried using the relationship-update option but this doesn't work because the names appear more than once in the actions table. if it were to appear just the once in the actions table then i wouldn't have any problem. but it is a requirement that the 2 names fields are in the actions table.
Any ideas of how to solve this?
How can i update record in a table, for example i have 2 table PURCHASE ORDER & DELIVERY RECEIPT, the PO Table has Fieldname [PO NUMBER] & [PO BALANCE], the DR Table has Fieldname [PO NUMBER] & [DELIVERY QTY], after i entry a value in [DELIVERY QTY], when i close the form the [PO BALANCE] will update, the sequence is like this [PO BALANCE = PO BALANCE - DELIVERY QTY], any idea how can i do this in access. I used the update query but all the records in a table was updated. Only i need to update is PO BALANCE that match on both PO NUMBER. thanks in advance.
View 1 Replies View RelatedIm using Microsoft Access 2003 and have a form 'frm_contacts' linked to a source table 'tbl_contacts'. My frm_contacts form has a button which when pressed opens a popup form 'frm_hottarget' of some additional fields from the same source table. The frm_hottargets form contains the field 'State' which is the same field in the frm_contacts form.
What i want is to have the State field from the popup frm_hottarget form to change to the value of the State field in the frm_contacts form as soon as the button is pressed. At the moment, the only way i can get the State field from the frm_hottargets form to change to the same value as the frm_contacts form is to close both forms and reopen them, or click the next record button and then back record button from the frm_contacts form.
Any ideas? Cheers
Hi,
I need some help, I’m trying to update 1 database which is in SQL on one server with data from another database which is on another server There are around 8000 records. It is taking for ever updating the data via MS Access Append Query and Update query. Do you know if there is any other faster way in code, which can be updated? Maybe in a loop doing 100 records at a time or any other suggestions.
Reason I need a faster way is the data on the SQL database is needs to be updated is linked to a website with data in , while the data is being updated the website crashes.
I would really appreciate your help.
Thanks
Hi,
I have a table with many records, and I would like to update for one of the fields, the same information as in the first record. Keep in mind that a group of records have the same attribute.
The same problem is easy to solve in EXCEL just by dragging down the info from the above cell - in this way you populate all the records with the same info as the first record, for a specific field.
How can I achieve this using ACCESS?
I want this:
FROM:
1 cost1 cost2
2 cost1
3 cost1
4 cost1
5 cost1
TO:
1 cost1 cost2
2 cost1 cost2
3 cost1 cost2
4 cost1 cost2
5 cost1 cost2
Thank you!