General :: Bound Form - Error No Current Record On Save
May 10, 2014
I have been working on a bound form that I can't seem to get working.
It records deliveries and what I am trying to achieve is after the form has been filled in the user will click a save button where the record will be added to the table and a record automatically printed via a report and emailed to the shop manager, but i keep getting the error "No Current record" no matter what way I try to do it, I have tried using to run the report. Is the best way for me to accomplish this o change it to an unbound for and run an insert query on click?
I have attached a copy of what I have been working on : DatabaseDelivery.accdb
View Replies
ADVERTISEMENT
Jan 17, 2014
I'm using: DoCmd.OutputTo acOutputForm, "Frm_EL_PL_Bulk_Send", acFormatPDF, outputFileName1...To save a form as a PDF. The issue is, it saves all the records in that set in continuous form, and I'm trying to get it to only save the record its on.
View 3 Replies
View Related
Jun 22, 2014
The following code is used in calculating the due date for actions. The due date for each action is calculated from a preceding action date, by adding a defined number of days. The relationship between the actions is defined by assigning the predecessor/preceding action.I am trying to use a nested loop to firstly assign the criteria data agaisnt which the rest of the record set must be checked in order to determine if the criteria data is a predecessor and than to use the predecessor's information to calculate the due date for the record being checked. I keep on getting a no current record error at the .edit inside the nested loop.
'**Calculate action Dates
Public Sub CalculateDates()
Dim db As DAO.Database
Dim rs As DAO.Recordset
Dim strSQL As String
Dim NumOfRec As Long
Dim CritCounter As Long
Dim EvalCounter As Long
[code]...
View 2 Replies
View Related
Aug 19, 2014
I have a bound form which is from tblEmployee, I'd like to have a dataset below (like a splitform but not a split as they have limits) so when i search in the box it gives me say all the smiths - i select for example david smith and it displays his information in the form objects above so they can be edited?
View 1 Replies
View Related
Oct 11, 2007
I have a Contacts form which has a Calls sub-form which itself has a Subjects sub-form. From the Contacts form the user can click a button which writes a pro-forma letter from a selection. The application then updates the Call & allows the user to select the Subject(s) from the Subjects available (drop-down menu). If the user wants to write a second letter immediately, I get the above message. If they do anything else first, they are OK.
I have tried refreshing the Contacts form & each of the others at various points in the process, explictly saving the record (caused another error) etc. without success.
Can you help?
View 3 Replies
View Related
Oct 31, 2014
I am working on a web database with a form which is bound to an underlying web table where the submissions occur.My challenge is that the fields on the form get submitted to the table even before the submit button is clicked regardless of whether the form was completely filled.
My request is that I want the form to only submit to the submission table only when the submit button is clicked.When I searched on the net, the only solutions I got are VBA written code but my web database cannot use VBA code.
VBA code:
Option Compare Database
Option Explicit
Private blnGood As Boolean
Private Sub cmdSave_Click()
blnGood = True
Call DoCmd.RunCommand(acCmdSaveRecord)
blnGood = False
End Sub
[code]....
View 1 Replies
View Related
May 25, 2014
I'm looking to add a button to my Customers form which will mailmerge the current record to a Word template and then save the Word doc as a new file (Ideally the customer's name).
I've looked at the Super Easy Mailmerge but I can't work out how to implement it without all of the variables (selecting documents etc.).
The files will all be saved to one location (C:CustomersExports) and this won't change.
This is also the location of the mailmerge template (C:CustomersExportsTemplate.docx)
View 9 Replies
View Related
Aug 4, 2012
How do i save a record as soon as text is entered into the textbox in a form?I need it to save without moving on to the next form without having to click a button
Code:
If Me.Dirty Then Me.Dirty = False
but it doesnt seem to work
View 3 Replies
View Related
Dec 4, 2013
I have 2 form, form1 and form 2 (picture attached)
In Form 1
(main form) there are "reference" field with key pressed event
then call form 2 (list of reference that user can choose)
In form 2
the problem is, when "enter" key pressed (keypress event), selection will move to next record
so the data that transferred to form 1 is wrong (next record)
The question is : how to save current record in form 2 before enter and send the data to form 1
View 3 Replies
View Related
Sep 11, 2013
I have a button on a FORM to print the current record with the following code:
DoCmd.RunCommand acCmdSelectRecord
DoCmd.PrintOut acSelection
But what I need is that before printing, open the preview to set the margins and page size ... or at least to pre-configure so that when you press the button, and comes preformatted.
View 2 Replies
View Related
Feb 12, 2014
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.
View 2 Replies
View Related
Jan 4, 2012
We have a database stored on a network drive used by a number of people across the organization over a Windows XP Network. I have an strange issue where some users get the error attached when trying to amend a record. However other users are able to amend the very same records. All the relevant user/windows permissions are identical. There is no security/permissions settings on the database for it to behave in this manner. The record seems to lock itself the moment you try to edit it.
View 2 Replies
View Related
Feb 1, 2014
I am working on a database and i have notice after making a form that when i enter a record using a form if i enter incomplete data on the form access automatically save that record and generate a id for that record.
For example I have a table that contain
StudentID,StdName,FatherName,DOB,Adress,Phone
And I have created a form for that table that also containing these fields.
Here I want to do that on the form I want a "Save" button , and the purpose of this button that when I click on this button then MS Access Save the record and then generate the ID for that record and if i close my form without pressing "SAVE" button access do not save that incomplete record.
View 10 Replies
View Related
Aug 6, 2012
I'm setting up a college database. On my enrollment form i have the following fields
Enrolment_ID
Student_ID
Course_ID
I'm receiving the error in my Student_ID field. It's telling me a related record is required in my Student Table.
The drop down shows the student name/date of birth/Education number
But if i set it to just show the ID it works fine, is there a work around for this as it will make life a lot easier for the dropdown to display the student names rather than the ID?
The dropdown is based on a query i have of accepted students....
View 2 Replies
View Related
Jun 7, 2005
Not sure what is happening here...
I keep getting an error message saying 'No Current Record'...especially when trying to create a new form or report using wizard.
I don't have this problem at home..only in work.
Any ideas?
Cheers
View 1 Replies
View Related
Apr 27, 2014
I have a access program and recently I began getting this Error out of the blue . I really need to fix this error because it shuts down my entire program . When I go to save a pic like i always do and it will not recognize the "quote Main ".
Code:
Forms![frm_Quote_Main]![HousePicture] = Me.PicSave
Forms![frm_Quote_Main]![ZoomValue] = Me.ZoomValue
Forms![frm_Quote_Main]![GoogleZoom] = Me.GoogleZoom
Error I receive
Runtime access error 2450 ............. ? Capture2.PNG
Capture.PNG
View 4 Replies
View Related
Feb 19, 2013
i want to use vba to lock or diable a date box on my form.
I have used[button].Enabled = False
This works ok for buttons but doesn't seem to work for my date
fieldMe.OrderDate.Enabled = False
I get an errormethod or data member not found. it highlights the .Enabled part...
View 7 Replies
View Related
Dec 11, 2013
I am looking for a complete working example of a fabricated ADO recordset bound to a form. The purpose of this is to provide a selection tool for records of a table in a multiuser database.
I could do this using a table to store the selections in the db, but I want to get a tool I can reuse in the future, obviating the need for extra tables and keeping track of users and multiple copies of the application ran by the same user.
So far I can display MEMO text, all the other values of my recordset (yes they are present) generate #ERROR in the form controls.Yes I did google. Apparently I am not the only one with this problem, but the solutions range from bizarre to weird.
Code:
.Append "MailSubject", adLongVarWChar, 10000
' .Append "MailSubject", adVarChar, 255
.Append "MailBody", adLongVarWChar, 10000
.Append "MailID", adBigInt
.Append "MailTemplateID", adInteger
.Append "RevisionID", adInteger
.Append "SentOn", adDBTimeStamp
.Append "myField", adInteger
Any complete (with form) working example that includes at least one integer field in a record ...
View 7 Replies
View Related
Apr 30, 2014
My database was working fine. Now, if I have to save or edit a record, I get a message Run time error 2107. The value you entered does not meet the validation rule defined for the field or control. I am able to enter and edit new records in the table. I did not change any validation in form. Then it goes to debug mode and highlighted this code (me.recordsource=Listsql - is highlighted)
Private Sub ListSearch_Click()
Dim dBS As Database
Dim Rst As Recordset
Dim Listsql As String
Set dBS = CurrentDb()
Listsql = "Select * from MasterData where employeeid ='" & [Forms]![MASTERFORM]![ListSearch] & "'"
[Code] ....
View 3 Replies
View Related
Aug 22, 2005
Hi all.
I have a small bug here which I can't seem to find a way round.
I have a subform setup to show Engineers assigned to a call. In the subform header I have a Command to add new Engineers. When this is pressed the form is changed to a Data Entry form to allow additions. This all works perfectly where there is an existing engineer on the Database.
The problem is with calls where there is no current engineer assigned.
With these calls I get an error popup saying "No Current Record" before the Data Entry screen comes up. Once the Data Entry screen comes up then an ID is assigned correctly and you can input fine so I am really just looking to see if there is a way to suppress the No Current Record popup.
Any suggestions appreciated.
JC
View 3 Replies
View Related
Sep 18, 2014
I get this error when I delete more than one record consecutively.
Here is my delete code;
Private Sub Komut98_Click()
Dim blnLast As Boolean
'MsgBox call must return the value in order to be checked.
'If user says no then cancelling is not required. It is only required
' that the deletion command is not invoked.
[Code] ....
View 5 Replies
View Related
May 9, 2014
I have a report that shows weekly schedules (each week start with Sunday date for the row) for multiple teams (columns). It prints 1 year at a time.I have to add the Sunday dates by hand into the table for each year. I have added 2016 but when I generate the report I get a "no current record" error.By the way, I am not a "programmer" but I can usually figure out whats going on when we have a problem by looking at other code in the system and by finding answers for similar problems on the forum!!
View 1 Replies
View Related
Feb 14, 2014
I have a vba code export a error message if the current date of a file is not correct.. I have tested the code it worked to send a error message to a error.txt file but he it doesn't look to the modified date
So instead of:
file1.txt (13-02-14)
Then
Send error message ("file not updated") to: Error.txt
IF NOT
no action requeried
This code does the following :
file1.txt (Modified date: 13-02-14)
Then
Send error message ("file not updated") to: Error.txt
file2.txt (Modified date: 14-02-14)
Then
Send error message ("file not updated") to: Error.txt
Code:
Sub CheckD()
Dim FSO As Object: Set FSO = CreateObject("Scripting.FileSystemObject")
Dim objFile As Object: Set objFile = FSO.GetFile("C:Users
ameDocumentsShow5621.txt")
If objFile.DateLastModified <> Date - 1 Then
[Code] .....
So also if it is the current date he send the error message to the error.txt file, it could be possible that i did something wrong.
View 2 Replies
View Related
Dec 7, 2012
I have have a form with 4 subforms in it, one of the subforms is based on a filtered query . For a reason I can not work out I cannot get it to requery when I add a new record.
To add a new record I select from a combo box and use a command button to save the record
I have tried using this in the buttons on click event
Code:
Forms.trialcatalogueF!TrialCompetitorsSF!competitorsSF.Form.Requery
with no result, however it does kinda work in the combo's after update event, just not until I select another value.
View 2 Replies
View Related
Jan 15, 2014
After I enter data into one field in a record I would like the form to save the record when I move to another field in the same record. It seems that the record is only saved when I exit it entirely. Is there a way to save a record when moving between fields in that record? Can this be done without using an Event Procedure for each field?
View 8 Replies
View Related
Sep 23, 2013
I have synchronized a form with a subform with the following code:
Private Sub YourField_DoubleClick() 'this code is behind the subform
Dim rs As Object
Dim strLinkValue As String 'value in link field of the subform
strLinkValue = Me![NameOfLinkFieldOnSubform].Value
Set rs = Forms!YourMainForm.Recordset.Clone
rs.FindFirst "[NameOfLinkFieldOnMainForm] = '" & strLinkValue & "'"
Forms!YourMainForm.Bookmark = rs.Bookmark
End Sub
Every thing works fine but now I would like that the row in subform remains selected in the subform when the user doubkeclicks the record in the subform.Now after doublecliking the subform highlight the first row.
View 4 Replies
View Related