I am trying to create a button to delete record, I have used the wizard and it works fine but now I want to have a confiirmation message to confirm that they really want to delete this record.
below is my code. The prompt works but the record never deletes.
Any Idea's
Private Sub cmdDeleteRec_Click()
On Error GoTo Err_cmdDeleteRec_Click
DoCmd.SetWarnings False
If MsgBox("Are you sure you want to delete this record?", vbYesNo, "Warning.........") = vbYes Then
Me!frm_Entry.SetFocus
DoCmd.RunCommand acCmdDeleteRecord
DoCmd.SetWarnings True
Else
DoCmd.SetWarnings True
End If
is there any way to get rid of deletion confirmation when you run a make-table query. though I unchecked all boxes under Confirm on Edit/Find tab, still popping up.
Is there any way to customize append query confirmation message? Unclicking Confirm Tools-->Options-->Edit/Find-->Confirm-Action Queries disables all warning messages.
My query takes some records from one table and append them to another table. When I run the query, first warning message says "Warning you r about to run an append query that will modify data in your table" (this is the message I do not want to see) and then if OK is clicked, the message says "you are about to append XXX rows...(this is the message I would like to customize)
I am building a simple db from scratch using the limited knowledge i have, and a lot of the information gained from searching these forums as a guest. I've now reached a point where I can't seem to find what I'm looking for, so any help would be gratefully received!!
I have a single table, single form and single report (told you it was simple;)). The table has nearly 2000 records and 2000 pictures (linked). On the form I can print every record with a single click of a command button. This is great, but I would like a message box to popup and confirm the print action, as this is gonna be expensive if its clicked on every record!!
If anybody can help, I would be chuffed!! I searched the forums and can't seem to find anything on this!!
Sorry if there is already a post on this(I cant seem to find it).
Is it possible to remove the confirmation message when running a delete query? i know you can remove all the other query confirmations through tools>options etc but i cant seem to get rid of this one.
I'm wondering if its possible to have a "would you like to save changes, yes/no" thing pop up after data has been added or changed to a form, or have the option to save when closing a form and if no is chosen then any data changed is not saved.
When i try to insert data into a backend Oracle table (with ODBC) using a form, (i use docmd.runsql "insert....") Access gives me a message like"You are trying to append 1 row to the table are you sure you want to append?"
i want to suppress this message as i have to insert into 2 tables and delete from 3 tables when the user enters some data in the form, so it asks the user five times (say 2 times for insert and 3 times for delete..) when it inserts or deletes each table. the user doesnt want this to click every time when they do that... how do i suppress these messages, is it Access-specific or oracle specific? I am not able to do this..! is this any kind of exception that i have to put in??
My training table consist of 3 fields and using unbound form
1st field custid (text field)
This can't be NIL or Can't duplicate
What I am looking for learning point of view (duel check at same field with different behaviour).If record is duplicate "Popup message" and curser move back to same field.If field is empty "popup message" Do you want to continue, If yes, move back to field if NO, close form..Therefore, on Before Update event I wrote the following.
Private sub txtcid_beforeupdate (cancel as Integer) If Dcount("[custid]", "[customerdetails]", "[custid]='" & me.txtcid & "'") > 0 Then MsgBox "Customer ID already Exists !!!!" Cancel = True Me.Txtcid.Undo
[code]....
Just a quick update "I tried to used YES or NO option in Exit event too, but no success.
I have a form and I have created an event procedure on the "before update" property of the form. My procedure is:
Private Sub Form_BeforeUpdate(Cancel As Integer) Dim pwd As String pwd = InputBox("Is the information you entered correct?") If pwd <> "yes" Then MsgBox "Record Not Saved" Me.Undo Else MsgBox "Record Saved" End If End Sub
the record is not saving under any situation. What do I have wrong?
I am designing a transactions database for some of my clerical staff. I've inserted a data entry subform into the main transactions form (which also has a subform that summarizes all the selected company's past transactions). This data entry subform actually has as it's record source a table that simply stores that one record temporarily.
So when the user is finished entering their current transaction, I have a Save button that actually just opens a popup form which displays the data they entered into the data entry subform, giving them a chance to verify their entry is accurate. This form has a Save button which runs an append query and a delete query, adding the record to the permanent Transacations table and also clearing the temp table.
The problem I have, I think, is that when the popup form opens, the main form data entry subform still has that record locked as exclusive. I believe this is the case because while I am indeed able to make changes to the fields on the popup form, none of these changes appear in the temp table. In other words, the user is not actually able to use the confirmation pop up form to make any necessary edits to their entry. This makes the form sort of useless!
I have a database that logs complaints. I've added a field to calculate the age of a complaint based on the date received and the date resloved. To update this field I have an update query that runs after someone closes an update form. My problem is that I recieve two dialog boxes one that confirms that I'm will be updating the table and another that tells me how many rows were updated. I would not like those boxes to appear so the update would look transparent.
All I am trying to do is insert to have a form with a "Delete Record" button on it. The problem is I don't want anyone to be able to delete a record, I would like someone to have to insert a password to confirm the delete.
I have a query based on two tables, joined on one field (this field is the primary key in Table A. Table B doesn't have a primary key). When working inside this query, it gives me the option to delete records. However, when I try, the row disappears from the query but then if I save and close and either re-open table A or the resulting query, that record is back. It doesn't actually delete. If I go to table A directly and delete it, it's gone for good.
How can I make it so that when I delete the record inside the query it actually deletes? And if that's not an option, can I make it so that it doesn't seem like I can delete records inside the query so that people don't make the mistake?
I have two simple tables. I want to delete the records from Table1 that are on Table2. I've created a select query that gives me what I want but when I change to a delete query, I get this message: "Unable to delete from specified tables"
I think my problem has something to do with security but I can't figure out what to change.
Hi All, I have a form with a comboBox to select "employees". I am using the combo.dropdown command to display 8-rows of employees. I also use the Not_In_List procedure to check for NEW employees, and if not in the list , then the msgBox appears asking "Do you want to add this employee?"
The problems is the MsgBox is behind the dropdown menu of listed employees. Is there a way I can bring the MsgBox to display on top of everything, something like "acDialog", close the drop.down?
I use a command button to post an invoice amount. I would like to prevent accidental overwriting of a current invoice amount. This code overwrites the amount even after clicking “No”. I would like the cancel the action when “No’ is clicked. Please help!
Private Sub PostInvoice_Click() On Error GoTo Err_PostInvoice_Click
If IsNull(InvoiceBalance) Then [InvoiceTotal] = Me.InvoiceTotal1 [InvoiceBalance] = Me.InvoiceTotal1 [DueDate] = Me.InvoiceDate + 30
Else MsgBox "You are about to overwrite the current invoice balance"
MsgBox "Are you sure you want to overwrite the current invoice amount", vbYesNo If vbYes Then [InvoiceTotal] = Me.InvoiceTotal1 [InvoiceBalance] = Me.InvoiceTotal1 [DueDate] = Me.InvoiceDate + 30 Else Exit Sub
I have a Macro that I made to archive 4 different tables...using append queries and delete queries and attached the macro to a button on a form. I had to disable the warnings because there were just too many of them...i was wondering if there is a way to customize one warning (like: Are you sure you want to do this? YES NO) is there a way to do this and add it to my existing macro. I want to give the data enterer a chance to make sure they understand what is going on. I know i could create another form as a secondary confirmation screen and have done this for the time being but a pop up warning would look much more professional
I would like to display a pop-up message on a form when a specific field has been changed. I know how to add teh pop up message for that section; however, I would like the pop-up message to display data from a sql statement. Here is the sql:
select PurchSpecialHandling FROM InventoryMaster1 WHERE Part=(input from form)
I need to know what to place for the input from form, how to assign a variable to the result, and display the data. Thanks!
I have created a form with a command button called "Dual Degrees".
This is based on a query. When this button is pressed, it returns a report with the corresponding image on it. It works well, but when there are no students in the database with dual degrees, it returns an error message. The message is: "Run-time error '13': Type Mismatch.
When I press the debug button, It defaults to this: Me! [ImageFrame].Picture = Me! [DEANS_SIGNATURE] End Sub
Is there a way to for a pop-up message to appear when the Dual Degrees button is pressed saying "No Dual degrees to print" if there are no students in the dastabase with dual degrees?
I want to create my own message box that will tell the user after they click the trasnfer button that they are about to transfer records to another table. They should be able to click ok or cancel. Access already has some warning boxes but I disabled those and just want to create one.
I am trying to write the code which will show a Message Box if another field in a table is "Not Null" . Here is what I am attempting:
Upon exit of [JobFieldname] Look at record in [Table].[Jobinfo]. where [JobFieldname] match If [Yes/Nofieldname] = "Yes" then Open Message Box "My message Here"
Can someone help me? I havn't found the answer looking through the threads.
I use a list box with textfield to fill a form in but when I fill in data which is not in the listbox, I get a warning from MS Access: "The data you privide is not an item from the listbox , Please choose an item from the list." No probleme at this point!
But me I want set off this wornings and to use my own worning message. I have tried D0cmd.setwornings False.
I get my own worning message but after I still get the message from MS Access.
Any Idea how to solve this probleme. I will be gratiful.
Can you please also help me with this, it is the database that I am trying to set up for a Shopmobility Sceme and need to tie up some loose ends before I go live.
I have condensed the original database and left the relevant part in.
On the Usage form when I enter a vehicle number I would like it to automatically show Type, Make & Model
And when I type Membership Number in I would like it to automatically on the usage form show Authorised, first name & Last Name.
Also on the usage form. when I enter Time Out and Time Back it gives me a total in the field but does not show up in the usage table.
Many thanks for your last input that is now working fine.
